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

Ответы 1

  • 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.
    answer img
    • Автор:

      mooney
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years