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

126

173

Посмотреть ответы 3

Ответы на вопрос:

panaitov0221

Информатика

4,7(83 оценок)

Var a, b, c, summ, d, den: real; beginwrite('введите кол-во км начальные: '); readln(a); write('введите на сколько % увеличивается расстояние каждый день: '); readln(b); write('введите, до скольки км увеличивает расстояние в день лыжник: '); readln(c); den: =0; while a< c do begin d: =a/100*b; // узнаем, на сколько увеличивается растояние a: =a+d; den: =den+1; end; writeln(den); end.написал на pascal. вводить можно любые данные ( не только, которые вы дали)