арифметическая прогрессия

[andreis459]

Дана арифметическая прогрессия 1, 3, 5, 7… Составить программу
определения суммы первых пяти ее членов. Вывести значение искомой
суммы и всех ее слагаемых.

[AncientHero]

Зачем выводить сумму слагаемых?

[andreis459]

Составить программу определения суммы первых пяти ее членов. Вывести значение искомой
суммы и всех ее слагаемых.

[AncientHero]

var n,a,i:longint;
begin
read(n);{n-количество элементов в прогрессии} 
writeln('Сумма первых пяти элементов = 25, элементы прогрессии от 1 до n:'); 
a:=1; 
for i:=1 to n do begin write(a,' ');a:=a+2;end;
end.