Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Начав тренировки,спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Какой суммарный путь
пробежит спортсмен за 7 дней?
c помощью for i

Ответ оставил Гость

I: Integer;   
f,x,y: Real;
.......
x:= 10;
f:= x;
for i:= 2 to 7 do begin // так как 1 день он уже пробежался
y:= (x/100)*10;         
x:= x + y;         
f:= x + f;
end;
WriteLn(Всего  спортсмен пробежал ,f:5:2, километров);
ReadLn;