Спортсмен пробегал 10 км в день. начав тренировки, он увеличивал норму ** 10% от нормы...

Question

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

Comments

Сколько спортсмен пробежал в первый день?

---

function F(L: real; n: integer): real;begin if n = 1 then Result := L else Result := L + F(L * 1.1, n - 1)end;begin var L := 10; var n := 7; Write(F(L, n))end.

---

begin var L := 10.0; var n := 7; var Sum := 0.0; for var i := 1 to n do begin Sum += L; L := L * 1.1; end; Write(Sum)end.

Answer 1

program raf105;

var x,y,day:real;

begin

x:=10;

while day

begin

 x:= x+x/100*10;

 y:= y+x;

 day:= day+1;

end;

writeln('Суммарный путь, который пробежит спортсмен за 7 дней тренировок: ',round(x),' км.');

end.

Программа написана на языке PascalABC