RosettaCodeData/Task/Leap-year/BASIC/leap-year-6.basic
2019-09-12 10:33:56 -07:00

1 line
73 B
Text

10 DEF FN l(y)=y/4=INT (y/4) AND y/100<>INT (y/100) OR y/400=INT (y/400)