format 2 int JvJ)}d$,&
CWD
$\K G
input x o
7V&HJ[
y=x/2 X&i" K'mV
z=10*Y )R@Y$*fm
y7z ,I
a$=$str(z) +~;#!I@Di
b$=$rightstring(a$,1) 6iEA._y
c=sval(b$) v=IcVHuf
if c==0 $7Tj<;TV
print "x 是偶数" ;~}!P7z
else m
.En!~t
print "x 是奇数" 1u*
(=!
endif x
;]em9b
print x," ",y," ",z," ",a$," ",b$," ",c `K2vG`c