Question

Помогите, пожалуйста! Срочно!!! Нужно решить задачу с помощью Pascal: Длина маршрута путешественника на велосипеде составляет M километров. В среднем за день путешественник может преодолеть не больше N километров. Сколько всего потребуется дней путешественнику, чтобы преодолеть запланированный маршрут?

Answer 1

Ответ:

var m, n: integer;

days: real;

begin

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

readln(m);

writeln('Введите количество километров в день');

readln(n);

if (m mod n = 0) then

days := m / n

else

days := m div n+1;

writeln('Дней, необходимых для преодоления маршрута: ', days);

end.