RosettaCodeData/Task/Even-or-odd/QBasic/even-or-odd.basic

4 lines
85 B
Plaintext

FOR i = 1 TO 10
IF i AND 1 THEN PRINT i; " is odd" ELSE PRINT i; " is even"
NEXT i