Ответы на вопрос:
Uses crt; var x: array[1..10,1..10] of integer; i,j,s,n: integer; begin randomize; write('размер матрицы: '); read(n); writeln('матрица: '); for i: =1 to n do begin for j: =1 to n do begin x[i,j]: =random(30)-10; write(x[i,j]: 5); end; writeln end; j: =n+1; for i: =1 to n do begin j: =j-1; s: =s+x[i,j]; end; writeln('сумма элементов побочной диагонали: ',s); end.
Популярно: Информатика
-
zLimboz12.06.2023 03:26
-
NarGog23.06.2023 13:02
-
maksimananchenko25.11.2021 04:17
-
ImanguloffAjdar04.02.2020 06:28
-
юлка1010.01.2023 06:29
-
alina283408.05.2022 19:25
-
ALINAscool989821.02.2023 17:51
-
лейс121504.08.2021 04:45
-
ganievadiyana25.02.2022 06:14
-
Valik12321127.05.2021 22:42