IPB

> NormVid.PAS
Чат
Форум
Загрузка...
 

Язык:
Русский
English


 { Пример программы для NormVideo, TextBackground и TextColor }

uses Crt;

begin
 { Зеленые символы на черном фоне }
  TextColor(Green);
  TextBackground(Black);
 WriteLn('Привет!');
 { Мигающие светло-красные символы на сером фоне }
  TextColor(LightRed + Blink);
  TextBackground(LightGray);
 WriteLn('Ещё раз привет!');
 { Желтые символы на синем фоне }
  TextColor(14);
 { Константа Yellow = 14 }
  TextBackground(Blue);
 WriteLn('Ну, привет же !!!');
  NormVideo;
 { Восстанавливаем атрибуты }
 WriteLn('Нет никого ??? Тогда, пока !');
end.
 
 К началу страницы 
Тэги:
 

Код для вставки: :: :: :: ГОСТ ::
Поделиться: //
 



-
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"