СОСТАВИТЬ ПРОГРАММУ В ПАСКАЛЕ!!! Начав тренировки,спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Сколько км пробежал спортсмен за каждый день недели?

Рассчитывается программа тренировки на 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.