Двумерный массив

[Юляшко]

Дан двумерный массив целых чисел из 4 столбцов и 3 строк. Переставить местами строку, содержащую минимальный элемент и последнюю строку..

[Google2010]

553-566-179 готов взяться! недорого

[Hacker19_90]

Ищем минимальный

min := Massiv[1,1];
Num_Stroki := 1;
for i := 1 to 3 do
begin
     for j := 1 to 4 do
     begin
           if min > Massiv[i, j] then
           begin
                 min := Massiv[i, j];
                 Num_Stroki := i;
            end;
     end;
end;
{Потом заменяем}
Temp := 0;
    for j := 1 to 4 do
    begin
          Temp := Massiv[3, j];
           Massiv[3, j] := Massiv[Num_Stroki, j];
           Massiv[Num_Stroki, j]:= Temp;
    end; 
    end;

[Hacker19_90]

Сообщение от Google2010

553-566-179 готов взяться! недорого

Сорри Google2010 не видел

[Юляшко]

спасибо Hacker19_90 все работает хорошо!