СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ!!! Начав тренировки,спортсмен в первый день пробежал 10 км....

Question

СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ!!!
Начав тренировки,спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Сколько км пробежал спортсмен за каждый день недели?

Answer 1

Рассчитывается программа тренировки на 1 неделю или 7 дней. Значит количество дней известно и можно использовать цикл for.

//Pascal
var s:real;
i:integer;
begin
  s:=10; //пробег за первый день
  for i:=2 to 7 do
     s:=s+s/10;
writeln('За неделю спортсмен пробежал ', s,' километров');
end.