Начав тренировки лыжник в первый день пробежал 10 км. Каждый следующий день он увеличивал пробег на 10% от пробега предыдущего дняю Определить пробег лыжника за n-ый день тренировок.
ПАСКАЛЬ
Var p:real; i,n:integer;
begin
write(n = ); readln(n);
p:=10;
for i:=2 to n do p:=1.1*p;
writeln(p = ,p);
end.
Пример:
n = 5
p = 14.641
Оцени ответ
