format 2 int kNK0KL
NzAh3k
input x \^6 [^\@[
y=x/2 "BsK'yo.
z=10*Y 6):1U
SY|K9$M^
a$=$str(z) pO *[~yq5
b$=$rightstring(a$,1) 2d*bF.
c=sval(b$) e1g3a1tnWl
if c==0 Mf14> `<`
print "x 是偶数" *%/O (ohs@
else #
bHkI~
print "x 是奇数" L ~'98C
endif <O7!(
print x," ",y," ",z," ",a$," ",b$," ",c #OPEYJ;*9d