format 2 int &yu3nA:7D
z^@.b
input x =m<; Jx5
y=x/2 $e(]L(o;
z=10*Y <d2?A}<
%BdQ.\4DS
a$=$str(z) m
2tw[6M
b$=$rightstring(a$,1) q> ;u'3}
c=sval(b$) n-HQk7=mQ
if c==0 E
cS+/
print "x 是偶数" /g|H?F0
else #Az#dt]H
print "x 是奇数" BQ X6Q<
endif
%[1\d)
print x," ",y," ",z," ",a$," ",b$," ",c XUI9)Ne