Question

Написать программу. Дано: Арифметическая прогрессия с шагом 2 Найти: Сумму 10 первых членов прогрессии.
Язык паскаль.

Answer 1

===== PascalABC.NET =====

begin

 var a0 := ReadInteger('Укажи начальное значение:');

 Println('Сумма равна', SeqGen(10, i -> a0 + 2 * i).Sum)

end.