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

8 lines
126 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
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