format 2 int 8y:c3jzP_
/>FgDIO
input x A|Z'\D0
y=x/2 :70n% 3a
z=10*Y N3 O~_=/v?
iPoh2
a$=$str(z) vMT:j
b$=$rightstring(a$,1) ii,/omn:
c=sval(b$) wX7|a/|@
if c==0 {[Sd[P
print "x 是偶数" H!uB&qY
else N i\*<:_
print "x 是奇数" {tqLH2cO
endif (rDB|kc^7
print x," ",y," ",z," ",a$," ",b$," ",c 6<E4?<O%