СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ!!! Начав тренировки,спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Сколько км пробежал спортсмен за каждый день недели?
Answers & Comments
vladmor
Рассчитывается программа тренировки на 1 неделю или 7 дней. Значит количество дней известно и можно использовать цикл for.
//Pascal var s:real; i:integer; begin s:=10; //пробег за первый день for i:=2 to 7 do s:=s+s/10; writeln('За неделю спортсмен пробежал ', s,' километров'); end.
Answers & Comments
//Pascal
var s:real;
i:integer;
begin
s:=10; //пробег за первый день
for i:=2 to 7 do
s:=s+s/10;
writeln('За неделю спортсмен пробежал ', s,' километров');
end.