Выделение цветом, Числа массива при распечатке отметить отличающимся цветом. Опции

[InFuz]

вот моя процедура печати

procedure Print (var M:mas; N:integer);
var i:integer;
begin
for i:=1 to N do
write (M[i],'; ');
writeln;
end;

как ее надо модифицировать чтобы числа массива, подлежащие обработке, при распечатке исходного массива отметить отличающимся цветом.

[граф Монте-Кристо]

textcolor("номер цвета") - кажется,так.

[InFuz]

А куда конкретно его нужно сунуть. Как это должно выглядеть.
И список номеров - цветов, если можно.

[граф Монте-Кристо]

Сунуть - можно в любое место, всё, что идёт на вывод ниже этой строчки - будет окрашено. Цвета точно не помню, 0 вроде бы чёрный, 15 - белый.

[InFuz]

прикольно смотрится спасибо (IMG:style_emoticons/default/biggrin.gif)

[InFuz]

хотя еще есть один вопрос, а как сделать чтобы она именно выделяла элементы а не все подряд красила, чтобы была напечатана сторака а в ней лишь некоторые элементы былы окрашены.

[граф Монте-Кристо]

Ну напишите условие,если элементы нужные,то один цвет,ненужные - другой.