Вpascal abc посылки отправляются только в вагонах. в один вагон помещается p посылок какое наименьшее число вагонов потребуется для отправки всей партии в n посылок.

Program poezd;
var
P,N:integer;
begin
Writeln ('введите данные о вместимости поезда');
Readln(P);
Writeln('введите данные о количестве посылок');
Writeln('количество поездов -равно ', N/P);
End.