Помогите написать на паскале
Начав тренировки лыжник в первый день пробежал 10 км. Каждый следующий день он увеличивал пробег на 10% от пробега предыдущего дня. Определить пробег лыжника за второй, третий, …, десятый день.
Program asd; var a,b:integer; begin a:=10; writeln('1=10'); for b=2 to 10 do begin writeln(b,'=',a+((a/100)*10); a:=a+((a/100)*10); end; end.
Неправильно =( Но спасибо.