Mail

В этот день много лет назад...
14 декабря. В 1503 году (522 года назад) - Родился Мишель де Нотрдам, или Нострадамус (Nostradamus)(14.12.1503- 2.07.1566), лейб-медик Карла IX, получил известность как автор "Центурий", содержавших предсказания грядущих событий европейской истории. Нострадамус принадлежал к древнему иудейскому роду Иссахар, которому приписывался особый пророческий дар. В 22 года он поступил в университет в Монпелье. В 1546 в Эксе его застала чума. Будучи уже к тому времени искусным фармацевтом, он изобрел противочумное средство. Его первая жена и двое детей скончались от неизвестной болезни. Потрясенный смертью близких, Нострадамус отправился в путешествие по Италии и Франции, став странствующим врачом. В 1548 он женился вторично, этот брак оказался удачным, и жена подарила ему шестерых детей.

Turbo Pascal Documentation

Процедура OutTextXY
Модуль Graph

     Функция: Пересылает строку на устройство вывода.
     Описание:  OutTextXY(Х,Y  :  integer;  текст_строка   :
string)
     Примечания: Строка, заданная параметром "текст_строка",
выводится в точке (Х,У). Если строка слишком длинная и выхо-
дит за пределы экрана или текущей области просмотра, то  она
усекается.
     Процедура OutText используется для вывода текста в мес-
те  расположения текущего указателя, процедура OutTextXY ис-
пользуется для вывода текста в любом заданном месте экрана.
     Прочее: См. также процедуры OutText, SetTextStyle, Set-
TextJustify, GetTxtSettings, TextHeight, TextWidth.
     Пример:

uses Graph;
  var
    Gd, Gm : integer;
  begin
    Gd := Detect;
    InitGraph(gd, Gm, '');
    if GraphResult <> grOk then
       Halt(1);
  MoveTo(0,0);
OutText('Неэфффективно');
  OutTextXY(GetX,GetY,'Также неэффективно');
OutTextXY(0,0,'Превосходно!');{ заменяет выведенное ранее }
Readln;
CloseGraph;
end.