Каждый компьютер имеет часы и календарь. Каждый пользователь может спросить у компьютера, сколько времени и какое сегодня число, а при желании и подправить то и другое. Для работы с временеми датойна Паскале необходим новый для вас модуль DOS. Мы рассмотрим четыре процедуры этого модуля, которые работают с временем и датой:
GetTime | Узнать время |
SetTime | Установить время |
GetDate | Узнать дату |
SetDate | Установить дату |
Чтобы воспользоваться этими процедурами, вы должны придумать имена переменным, обозначающим дату и время:
God год (с 1980 по 2099)
Mes месяц (1-12)
Den день месяца
Den_Ned номер дня недели (от 0 (воскресенье) до 6 (суббота))
Chas час
Min минута
Sec секунда
Sotki сотые доли секунды
Все эти переменные должны быть целочисленными, однако не типа Integer, к которому вы привыкли, а типа Word. Таково требование упомянутых процедур. Переменная типа Word должна быть целым числом из диапазона 0 - 65535.
Вот программа, которая узнает у компьютера, какое сегодня число и сколько времени:
USES DOS;
VAR God, Mes, Den, Den_Ned, Chas, Min, Sec, Sotki : Word;