|
days_in_month: array [boolean, 1..12] of Byte =
|
|
days_in_month: array [boolean, 1..12] of Byte =
|
|
((31,28,31,30,31,30,31,31,30,31,30,31),
|
|
((31,28,31,30,31,30,31,31,30,31,30,31),
|
|
(31,29,31,30,31,30,31,31,30,31,30,31));
|
|
(31,29,31,30,31,30,31,31,30,31,30,31));
|