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

for i = 1 to 10
  if (i mod 2) then print i;" is odd" else print i;" is even"
next i
end