format 2 int BM /FOY;
66eJp-5e8
input x \~,\|
y=x/2 8N'hG,
z=10*Y d%'#-w'
:\"0jQ.y|
a$=$str(z) raPOF6-_rH
b$=$rightstring(a$,1) @s-P!uCaT
c=sval(b$) I{(!h90
if c==0 OU,FU@6,7w
print "x 是偶数" *2a" 2o
else }UW*[dCf>C
print "x 是奇数" G:$kGzhJ
endif Gr2}N"X=
print x," ",y," ",z," ",a$," ",b$," ",c C][hH?.