format 2 int pR6A#DgB
3{4/7DcX
input x ?>.g;3E$
y=x/2 '<D `:srV
z=10*Y nqxq@.L2
)~.&bEm\
a$=$str(z) FPMSaN P
b$=$rightstring(a$,1) $',GkK{NX
c=sval(b$) <`xRqe:&9
if c==0 Kt90mA
print "x 是偶数" R_Gq8t$
else /GuSIZg"_
print "x 是奇数" aT1CpY=T|.
endif {#*? S>DA
print x," ",y," ",z," ",a$," ",b$," ",c nG^M 2)(8