Спортсмен в первый день пробежал 5 км а последующие 9 дней на 5% больше то предыдущего дня. Выведете на экран километраж за каждый день и найдите, сколько спортсмен пробежал за 10 дней.

Question

Информатика

Алфея

29 января, 09:16

Спортсмен в первый день пробежал 5 км а последующие 9 дней на 5% больше то предыдущего дня. Выведете на экран километраж за каждый день и найдите, сколько спортсмен пробежал за 10 дней.

+4

Ответы (1)

Знаете ответ на вопрос?

Галактион · Answer 1

Program pr1;

Uses Crt;

Var

n, i:integer;

a, b, s:real;

begin

ClrScr;

s:=5;

a:=5;

for i:=2 to 10 do

begin

a:=a*1.05;

s:=s+a;

end;

writeln ('Спортсмен пробежал за 10 дней:', s) ;

readln;

end.