format 2 int 6
63o
D Ez,u^
input x rwm^{Qa
y=x/2 j)A#}4jd
z=10*Y 4fEDg{T
%,$ n^{v
a$=$str(z) ._mep\#.:
b$=$rightstring(a$,1) +X}i%F'
c=sval(b$) {zdMmpQF
if c==0 WjV15\,
print "x 是偶数" 1yy?1&88S
else ~wc:/UM|
print "x 是奇数" _X6'uJ
endif s{hKl0ds
print x," ",y," ",z," ",a$," ",b$," ",c -yYdj1y;