Дана матрица 5 на 5. Надо создать такую программу которая будет выводить…

Uses crt; const n=5; m=5; var a: array[1… n,1… m] of integer; i,j,max,t: integer; beginfor i: =1 to n dobeginfor j: =1 to m doread (a[i,j]); end; t: =1; writeln; repeatmax: =a[t,1]; for i: =t to t dofor j: =1 to m doif a[i,j]>max then max: =a[i,j]; writeln (max); inc (t); until t>nend.