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

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.