Помогите.
Турбо Паскаль
Вывести таблицу сочетаний цветов фона и текста (textcolor и textbackgroundcolor)
Красный текст красный фон - Красный текст оранжевый фон - Красный текст желтый фон - ...
Оранжевый текст красный фон - Оранжевый текст оранжевый фон - Оранжевый текст желтый фон - ...
... и так таблицу цветов 7 на 7, со всеми цветами радуги.

uses CRT;var i,j:integer;begin  TextMode(CO80);  for i:=0 to 15 do  begin    TextColor(i);    for j:=0 to 7 do begin      TextBackGround(j);      Write(i:2,'/',j:2,' ')    end;    Writeln  end;  ReadKeyend.