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

5 lines
97 B
Plaintext

FOR i = 1 to 10
IF MOD(i, 2) = 0 THEN PRINT i; " is odd" ELSE PRINT i; " is even"
NEXT i
END