Функция Last_Day |
Определяет количество дней в месяце даты d.
function Last_Day (d : date) : byte;
d : date - дата.
Количество дней в месяце заданной даты.
Last_Day( Date(20,1,1992) ) = 31; Last_Day( Date(1,2,1996) ) = 29; Last_Day( Date(1,2,2000) ) = 28;