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

anciferovalex anciferovalex    1   01.07.2019 16:00    0

Ответы
eminememetova2 eminememetova2  24.07.2020 23:24
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;
  ReadKey
end.

Турбо паскаль вывести таблицу сочетаний цветов фона и текста (textcolor и textbackgroundcolor) красн
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика