Предмет: Информатика,
автор: Elvf1995
Помогите написать на паскале
Начав тренировки лыжник в первый день пробежал 10 км. Каждый следующий день он увеличивал пробег на 10% от пробега предыдущего дня. Определить пробег лыжника за второй, третий, …, десятый день.
Ответы
Автор ответа:
0
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.
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.
Интересные вопросы
Предмет: Физкультура и спорт,
автор: oliinichenko2
Предмет: Химия,
автор: str1x2321
Предмет: Литература,
автор: annamykhailiak
Предмет: Химия,
автор: няшувсем
Предмет: Литература,
автор: nekit15