RosettaCodeData/Task/Leap-year/NS-HUBASIC/leap-year.basic
2023-07-01 13:44:08 -04:00

3 lines
177 B
Text

10 INPUT "ENTER A NUMBER, AND I'LL DETECT IF IT'S A LEAP YEAR OR NOT. ",A
20 IF A-(A/100)*100=0 AND A-(A/400)*400<>0 THEN RESULT$="NOT "
30 PRINT "THAT'S "RESULT$"A LEAP YEAR."