начав тренировки спортсмен пробежал 10 км, каждый следующий день увеличивал дневную норму на 10% от нормы предыдущего дня. Какую сумарную путь пробежал за 7 дней?
Answers & Comments
Mepkypuu
Var rast,summa:real; k:integer; begin rast:=10; summa:=10; for k:=2 to 7 do begin rast:=rast+rast/10; summa:=summa+rast; end; writeln(summa); end.
Answers & Comments
k:integer;
begin
rast:=10;
summa:=10;
for k:=2 to 7 do
begin
rast:=rast+rast/10;
summa:=summa+rast;
end;
writeln(summa);
end.