Question

От коров при дойке получено M литров молока. Определить кол-во бидонов B для его

перевозки, если в один бидон входит L литров? Молоко выливать и оставлять на ферме

нельзя.



Составить программу для задачи
В паскали

Answer 1

uses

 Math;

var

 M, L: Real;

 B: Integer;

begin

   Write ('Введите количество литров молока: ');

   Readln (M);

   Write ('Сколько литров входит в один бидон: ');

   Readln (L);

   B := Ceil (M / L);

   WriteLn ('Потребуется ' + IntToStr (B) + ' бидонов.');

end;