Кристина
4 год назад
спортсмен в первый день пробежал 5 км а последующие 9 дней на 5% больше то предыдущего дня. Выведете на экран километраж за каждый день и найдите, Как узнать сколько спортсмен пробежал за 10 дней.
ОТВЕТЫ
Dressler Maria
Oct 24, 2020
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.
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.
659
Смежные вопросы:
