format 2 int FP;Ccl"s
v1%uxthW
input x V#cqRE3XNi
y=x/2 U}MXT<6
z=10*Y 5$wpL(:R(
R,F[XI+=N
a$=$str(z) bKrhIU[
b$=$rightstring(a$,1) Ytz)d/3T
c=sval(b$) qjf[zF
if c==0 eU<]o<
\Qo
print "x 是偶数" s}jHl8
else H2um|6>
print "x 是奇数" ag*mG*Z
endif LM7$}#$R
print x," ",y," ",z," ",a$," ",b$," ",c ^j".