format 2 int \ KsKb0sM
Q );}1'c
input x ?r*}1WsH
y=x/2 gK"(;Jih$
z=10*Y eL'fJcjw<
{u0sbb(
a$=$str(z) Pf;RJeD
b$=$rightstring(a$,1) z
=\ENG|x#
c=sval(b$) )Jw$&%/{1
if c==0 6;@:/kl t
print "x 是偶数"
_,v>P2)
else +;)Xu}
print "x 是奇数"
1D2RhM%
endif *v: .]_;
print x," ",y," ",z," ",a$," ",b$," ",c P(o>UDy