format 2 int m0As t<u
~x!up9
input x 5e$1KN`
y=x/2 \7i_2|w
z=10*Y tH)jEY9
Jn^b}bk t
a$=$str(z) QOo'Iv+EL
b$=$rightstring(a$,1) Vn4wk>b}$2
c=sval(b$) &:g:7l]g
if c==0 ^t5My[R
print "x 是偶数" \?>M?6D
else 7jIBE
print "x 是奇数" ^L5-2;s<U'
endif n'v\2(&uYN
print x," ",y," ",z," ",a$," ",b$," ",c oR&z,%0wMK