Составьте программу, которая будет считать сумму всех элементов массива. const N=40; var i, sum: integer; mas: array[1..N] of integer; begin for i:=1 to N do read(mas[i]); sum:=0; for i:=1 to N do sum:=sum+mas[i]; write(sum); end.
Задание

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

  • 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.