Задание

Составьте программу, которая будет считать сумму всех элементов массива.

  • const
  • N=40;
  • var i, sum: integer;
  • mas: array
    \[1\.\.N\]
    of integer;
  • begin
  • for i:=1 to N do read\(mas⟨1⟩\);
  • sum:=0;
  • for i:=1 to N do sum:=sum+mas
    \[i\]
    ;
  • write\(sum\);
  • end.