Составить программу на языке программирования Паскаль…

Program Z; uses crt; const N=5, M=6; var A: array [1… N,1… M] of integer; i,j: integer; begin ClrScr; Randomize; for i: =1 to N dobegin for j: =1 to M do begin A[i,j]: =Random (21); write (A[i,j]: 4); end; writeln; end; readlnend.