format 2 int #|} EPD9$
eOd'i{f@F
input x OWHHN<
y=x/2 X
gA(
D
z=10*Y vQ
DlS1L
$,7Yo
nc
a$=$str(z) `c_Wk]i
b$=$rightstring(a$,1) flU?6\_UC
c=sval(b$) WNV}@
if c==0 :W1B"T<
print "x 是偶数" WS ^%<
h#
else Ivc/g,
print "x 是奇数" !JwR[X\f
endif * @'N/W/8
print x," ",y," ",z," ",a$," ",b$," ",c jL#`CD