В первый день тренировок спортсмен пробежал 10 км, каждый последующий день он увеличивал дневную норму на 2 километра от нормы предыдущего дня. Через сколько дней спортсмен будет пробегать в день более 20 км?
Помогите написать программу в паскале по этой задачке.
Пожалуйста!!!!
Answers & Comments
programHelloWorld;
var run,day: integer;
begin
run := 10;
day := 1;
while run<20 do
begin
write('День:');
write(day);
write('Километраж:');
writeln(run);
day:= day +1;
run := run+2;
end;
write('День:');
write(day);
write('Километраж:');
writeln(run);
end.