Вычислить сумму всех элементов массива

[Максим4455]

Пожалуйсто помогите решить задачу по Паскалю
Вот условие:
Вычислить сумму всех элементов массива

[ZX Spectrum-128]

Хотелось бы увидеть ваши попытки решить задачу.

[Stilet]

Вычислить сумму всех элементов массива

Покажешь как массив вводишь?

[dimka123]

S:=0;
Вводишь массив.
S:=A[i]+S;
writeln('summa',S)

[Serge_Bliznykov]

Сообщение от dimka123

S:=0;
Вводишь массив.
S:=A[i]+S;
writeln('summa',S)

а цикл где?!!!

ну тогда уже так:

Вводишь массив.
S:=0;
for i:=1 to N do
  S:=A[i]+S;
writeln('summa',S)