Найти номер строки и номер столбца максимального элемента матрицы…

Question

Найти номер строки и номер столбца максимального элемента матрицы, в delphi

Answer 1

49

breev

04 августа 2022

Var a,i,j,b,p,p1,max: longint; m: array[0… 501,1… 500] of longint; beginread (a,b); for i: =1 to a dofor j: =1 to b doread (m[i,j]); p: =1; p1: =1; max: =m[1,1]; for i: =1 to a dofor j: =1 to b doif m[i,j]>max thenbeginp: =i; p1: =j; max: =m[i,j]; end; writeln (p,',p1); end.

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

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

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

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

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