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

Есть ответ
18.12.2022
443

Ответ


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.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.