format 2 int j@98UZ{g\
U7(t >/
input x %"C%pA
y=x/2 9?6]Zag
z=10*Y "L)=Y7Dx
^=1:!'*3D
a$=$str(z) u~-,kF@
b$=$rightstring(a$,1) B S^P&TR!
c=sval(b$) /ll2lyS+
if c==0 Z'V"nhL
print "x 是偶数" Bm\OH#
else zfBaB0 P
print "x 是奇数" PAcbC|y
endif 4_i6qu(4
print x," ",y," ",z," ",a$," ",b$," ",c zNo(|;19