Question

Сколько ящиков нужно для хранения s яблок, если в ящик
поместится ли k яблок в высоту и m в ширину?
нужно в паскале

Answer 1

Ответ:

var

 s, k, m, boxes: integer;

begin

 readln(s, k, m);

 boxes := s div (k * m);

 if s mod (k * m) > 0 then inc(boxes);

 writeln(boxes);

end.