Функция Day_Of_Week

Назначение

Вычисление дня недели (с 1 по 7).

Описание

function Day_Of_Week (d : date) : byte;

Параметры

d : date - дата.

Возвращаемое значение

Результатом является номер дня недели указанной даты (1 - понедельник, 2 -Вторник, ( 7 - воскресенье).

Пример

Day_Of_Week(Date(13,3,1972)) = 1;