RosettaCodeData/Task/Leap-year/MUMPS/leap-year.mumps
2023-07-01 13:44:08 -04:00

2 lines
76 B
Text

ILY(X) ;IS IT A LEAP YEAR?
QUIT ((X#4=0)&(X#100'=0))!((X#100=0)&(X#400=0))