Задание массива с клавиатуры For i:=1 to n do For j:=1 to m do For j:=1 to m do Begin Begin Write (A[,i,,,j,]=); Readln (A[i,j]); Write (A[,i,,,j,]=); Readln (A[i,j]); End; End; Задание типизированной константой Const A:array[1..2,1..2] of integer=((
{}