Pascal abc net.создайте пользовательский тип, который состоит из целочисленного двумерного массива размерностью 5*5.

Var
n,m:integer;
Y:array[0..4,0..4] of integer;

begin

for n:=0 to 4 do
for m:=0 to 4 do
readln(Y[n,m]);

end.