Массив, Выделение элементов массиве Опции

[Kylich]

Такой вопрос.
Как в массиве выделить найденные элементы?

[Kylich]

А если вввести массив, и вывести рядом с ним этот же, но только уже с найденными элементами?

Сообщение отредактировано: Kylich - 24.10.2009 13:08

[Lapp]

А если вввести массив, и вывести рядом с ним этот же, но только уже с найденными элементами?

Представь себе, что ты нашел на карте нужное место - город или улицу. Карта от этого изменилась? Нет конечно (рисовать на карте метки не разрешается).

Вот как-то так попробуй сделать:

for j:=1 to m do begin  {поиск минимальных элементов в столбцах}
  min[j]:=1; 
  for i:=2 to n do if a[i,j]<a[min[j],j] then min[j]:=i;
end;

for i:=1 to n do begin      {вывод матрицы}
  for j:=1 to m do begin
    if i=min[j] then TextColor(Red) else TextColor(LightGray);
    Write(a[i,j]:4)
  end;
  WriteLn
end;