Склавиатуры вводится массив из m чисел.найти сумму элементов массива.

271

365

Посмотреть ответы 2

Ответы на вопрос:

ania51

Информатика

4,5(44 оценок)

Var m: integer; var i: integer; var mass: array of integer; begin write('razmernost masiva: '); readln(m) ; mass: =new integer[m]; for i: =0 to m-1 do begin write('a[',i,']: '); readln(mass[i]); end; var sum: integer; sum: =0; for i: =0 to m-1 do sum += mass[i]; writeln('summa vseh elementov massiva: ', sum) end.