RosettaCodeData/Task/Leap-year/Harbour/leap-year.harbour
2016-12-05 23:44:36 +01:00

2 lines
97 B
Text

FUNCTION IsLeapYear( nYear )
RETURN iif( nYear % 100 == 0, nYear % 400 == 0, nYear % 4 == 0 )