Создай переменную массива 5х5 и две переменные её индексов m, n
m:=0; n:=0;
После запусти двойной цикл
For i:=0 to High(A) do
For j:=0 to High(A) do
Begin
If ((A[i, j] > 0) and (m<5)) then
Begin
B[m, n]:=A[i, j];
Inc(m);
Inc;
End;
End;
Мы используем cookie-файлы, чтобы улучшить сервисы для вас. Если ваш возраст менее 13 лет, настроить cookie-файлы должен ваш законный представитель. Больше информации
Комментарии 12
m:=0; n:=0;
После запусти двойной цикл
For i:=0 to High(A) do
For j:=0 to High(A) do
Begin
If ((A[i, j] > 0) and (m<5)) then
Begin
B[m, n]:=A[i, j];
Inc(m);
Inc
End;
End;
Только не могу понять:
Почему цикл до High(A)?