RosettaCodeData/Task/Leap-year/ZX-Spectrum-Basic/leap-year.basic
2023-07-01 13:44:08 -04:00

1 line
75 B
Text

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