Помогите написать на паскале

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

Question

Информатика

Любомира

18 апреля, 13:36

Помогите написать на паскале

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

+3

Ответы (1)

Знаете ответ?

Оливия · Answer 1

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.