Помогите написать на паскале Начав тренировки лыжник в первый день пробежал 10 км. Каждый следующий день он увеличивал пробег на 10% от пробега предыдущего дня. Определить пробег лыжника за второй, третий, …, десятый день.
Помогите написать на паскале Начав тренировки лыжник в первый день пробежал 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.
Не нашли ответ?
Похожие вопросы