Mail

В этот день много лет назад...
22 апреля. В 1838 году (188 лет назад) - Впервые пароход пересек Атлантический океан. В гавань Нью-Йорка прибывает английский корабль "Сириус". Он затратил на путешествие 18 дней и 10 часов и всего на несколько часов опередил конкурента - пароход "Грейт Вестерн", который ушел в море на четыре дня позже. В 1819 океан пересекал американский корабль "Саванна", но на нем паровые двигатели были вспомогательным средством и большая часть плавания прошла под парусами.

Turbo Pascal Documentation

Процедура GetDate
Модуль Dos

     Функция: Возвращает текущую дату, установленную в  опе-

рационной системе.
     Описание: GetDate(var год, месяц, число, день_недели  :
word)
     Примечания: Возвращаемые значения имеют следующие  диа-
пазоны:  "год" - 1980..2099, "месяц" - 1..12, "число" 1..31,
"день_недели" - 0..6 (где значение 0 соответствует воскресе-
нью).
     Прочее: См. также процедуры SetDate, GetTime, SetTime.