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

5 lines
97 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
FOR i = 1 to 10
IF MOD(i, 2) = 0 THEN PRINT i; " is odd" ELSE PRINT i; " is even"
NEXT i
END