Написать программу с использованием оператора while doВот задачав начале тренировочного...

Question

Написать программу с использованием оператора while do
Вот задача
в начале тренировочного периода лыжник во время тренировки пробегал 5 км,каждый день он увеличивал нагрузку на 5%.Рассчитать через какое время нагрузка лыжника во время тренировки превысит 20км

Answer 1

Лучше перепроверить.

Answer 2

Var 
a, b, c, summ, d, den:real;
beginwrite('Введите кол-во км начальные: ');readln(a);
write('Введите на сколько % увеличивается расстояние каждый день: ');readln(b);
write('Введите, до скольки КМ увеличивает расстояние в день лыжник: ');readln(c);

den:=0;
while aend.

Написал на Pascal. Вводить можно любые данные ( не только, которые вы дали)