Вычислить число положительных элементов квадратной матрицы…

Question

Вычислить число положительных элементов квадратной матрицы, находящихся над главной диагональю

Answer 1

95

sutrium

19 апреля 2023

program p3; var a: array[1… 100,1… 100] of integer; k,n,i,j: integer; begink=0for i: =1 to n dofor j: =1 to n doa[i,j]: =random (100) -50; for I: =1 to n dofor j: =1 to n doif (i>j) and (a[i,j]>0) then k: =k+1; for i: =1 to n dobeginfor j: =1 to n dowrite (a[i,j]); writeln; end; writeln (k) end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: