RosettaCodeData/Task/Even-or-odd/TUSCRIPT/even-or-odd.tu
2013-04-11 11:14:19 -07:00

10 lines
119 B
Turing

$$ MODE TUSCRIPT
LOOP n=-5,5
x=MOD(n,2)
SELECT x
CASE 0
PRINT n," is even"
DEFAULT
PRINT n," is odd"
ENDSELECT
ENDLOOP