RosettaCodeData/Task/Even-or-odd/MSX-Basic/even-or-odd.basic

7 lines
116 B
Plaintext

10 CLS
20 FOR N = -5 TO 5
30 PRINT N;
40 IF (N AND 1) = 1 THEN PRINT "is odd" ELSE PRINT "is even"
50 NEXT N
60 END