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

Question

Информатика

Гелюся

20 апреля, 14:44

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

+1

Ответы (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.