Массив А вводится с клавиатуры. Найти сумму его элементов. Размер произвольный. паскаль

Question

Информатика

Васа

6 октября, 15:55

Массив А вводится с клавиатуры. Найти сумму его элементов. Размер произвольный. паскаль

+2

Ответы (1)

Знаете ответ?

Евграф · Answer 1

Var

a: array[1 ... 100] of integer;

i, n, s: integer;

begin

readln (n) ;

s : = 0;

for i : = 1 to n do

begin

Readln (a[i]) ;

s : = s + a[i];

end;

writeln ('s = ', s) ;

end.