format 2 int lK%pxqx
4}{HRs?
input x &UUIiQm~
y=x/2 *]fBd<(8
z=10*Y Da!A1|"
ln7{c #lE
a$=$str(z) aD,sx#g0
b$=$rightstring(a$,1) KDW%*%!
c=sval(b$) k~u$&a
if c==0 =N`"%T@=
print "x 是偶数" 2l#Ogn`k
else cs7TAX
print "x 是奇数" %0}qMYS
endif V+X>t7.Q
print x," ",y," ",z," ",a$," ",b$," ",c *doK$wYP