7 lines
182 B
Text
7 lines
182 B
Text
10 rem determine if integer is even or odd
|
|
20 print "Enter an integer:";
|
|
30 input i%
|
|
35 print
|
|
40 eo$="even"
|
|
50 if (i% and 1)=1 then eo$="odd"
|
|
60 print "The number ";i%;"is ";eo$;"."
|