Предмет: Информатика, автор: LoLKeKson

Лыжник начал тренировку с 10 км, каждый день он увеличивал дистанцию на 12% от предыдущей, сколько км лыжник пройдёт за месяц, то есть за 31 день
Цикл
Работа на Паскаль

Ответы

Автор ответа: Аноним
2
// PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (p,s):=(10.0,10.0);
  for var i:=2 to 31 do begin
    p*=1.12; s+=p
    end;
  Writeln(s:0:1)
end.

Результат
2712.9
Похожие вопросы