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.
Оцени ответ
Вход
Регистрация
Задать вопрос
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.