Функция
Day_Of_Week (Date) : Byte |
Top Previous Next |
Назначение
|
Вычисление
дня недели (с 1 по 7). |
Описание
|
function
Day_Of_Week (D : Date) : Byte; |
Параметры
|
D
: Date - дата. |
Возвращаемое
значение |
Результатом
является номер дня недели указанной даты (1 - понедельник, 2
-Вторник, ј
7 -
воскресенье). |
Пример
|
Day_Of_Week(Date(13,3,1972))
=1; |