RosettaCodeData/Task/Leap-year/Liberty-BASIC/leap-year-1.basic
2023-07-01 13:44:08 -04:00

10 lines
130 B
Text

if leap(1996)then
print "leap"
else
print "ordinary"
end if
wait
function leap(n)
leap=date$("2/29/";n)
end function