87711077664ZE

09.12.2022 21:41 •  Информатика

30 ! ! в программе описан двумерный массив a следующим образом const n=5; m=6; type arr=array[1..n,1..m] of integer; var a: arr; определить, как изменится в программе массив в результате вызова процедуры par(a). procedure par(var a: arr): var i,j,maxa,mina,maxi,mini,b: integer; begin maxa: =a[1,1]; mina: =a[1,1]; maxi: =1; mini: =1; for i: =1 to n do for j: =1 to m do if a[i,j]> maxa then begin maxa: =a[i,j]; maxi: =i end else if a[i,j] begin mina: =a[i,j]; mini: =i end; if maxi< > mini then for j: =1 to m do begin b: =a[maxi,j]; a[maxi,j]: =a[mini,j]; a[mini,j]: =b end end;