function DaysInAMonth (const Year, Month: Word):Word;ОписФункція DaysInAMonth видає кількість днів у вказаному Році, Місяці.Прикладbegin
ShowMessage ('Днів в Лютому 2000 =' +IntToStr (DaysInAMonth (2000, 2)));end;