Паскаль
Дано кол-во детей и вместимость автобуса. Сколько нужно автобусов
Нужно написать Что то наподобие "uses crt, begin"
желательно пошагово
Var a,b:integer;
begin
writeln(kolicestvo detei=);
readln(a);
writeln(vmestimosti avtobusa=);
readln(b);
writeln(nujno ,(a div b)+1,avtobusov);
readln;
end.
Оцени ответ
