format 2 int 2(AuhZ>
R3|r`~@@
input x g\]~H%2 ,
y=x/2 'YvRkWf:KC
z=10*Y *CCh\+S7m
v3b+Ddp
a$=$str(z) H>]A|-rG#
b$=$rightstring(a$,1) ps_q3Cyp
c=sval(b$) ]Ns)fr6
if c==0 IXv9mr?H}
print "x 是偶数" Q.,2G7[ <
else `8/D$
print "x 是奇数" txik{' :
endif l i)
5o
print x," ",y," ",z," ",a$," ",b$," ",c lWakyCS