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

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;