8. дан двумерный массив. определить: а) сумму всех элементов массива; б) сумму квадратов всех элементов массива.

176

201

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

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

kurzinovaa

Информатика

4,4(12 оценок)

program pr1; uses crt; const n=20; var mas: array[1..n,1..n] of integer; i,j,v: integer; beginclrscr; v: =0; randomize; for j: =1 to n dofor i: =1 to n do mas[i,j]: =random(10); for j: =1 to n dofor i: =1 to n do v: =v+mas[i,j]; writeln('summa=',v); {a}v: =0; for j: =1 to n dofor i: =1 to n do v: =v+sqr(mas[i,j]); writeln('summa sqr=',v); {б}end.