Решите в паскале, через if корова в день ест 10 кг сена и 4 кг комбикорма. на сколько дней корове хватит а кг сена и b кг комбикорма?

var
  a, b: real;

begin
  readln(a, b);
  writeln(a / 10 < b / 4 ? trunc(a / 10) : trunc(b / 4), ' days');
end.