RosettaCodeData/Task/Even-or-odd/Tiny-BASIC/even-or-odd.basic

10 PRINT "Enter a number:"
20 INPUT N
30 IF 2*(N/2) = N THEN GOTO 60
40 PRINT "It's odd."
50 END
60 PRINT "It's even."
70 END