Составить программу ** определение суммы элементов массива( одномерный двумерный)

Question

Составить программу на определение суммы элементов массива( одномерный двумерный)

Comments

Сколько элементов в массиве?

---

Сколько хотите, это не принципиально

---

В лс

Answer 1

Вот программа для массива состоящих,например из 7 чисел

var
a:array[1..7]of integer;
i,n,m:integer;
begin
m:=0;
Writeln('введите числа:'); 
For i:=1 to 7 do 
Readln (a[i]);
for i:=1 to 7 do
m:=a[i]+m;
writeln(m);
end.