format 2 int 0N$7(.
p|t" 4HQ
input x I.jqC2G
y=x/2 ?f"5yQ-B
z=10*Y w5HIR/kP
$:F+Nf
8
a$=$str(z) BqNeY<zB*
b$=$rightstring(a$,1) MF4(
c=sval(b$) LUMbRrD-
if c==0 ?n`m
print "x 是偶数" 5;/n`Bd
else 7z4k5d<^_
print "x 是奇数" Bdt6 w(`^
endif 51q|-d
print x," ",y," ",z," ",a$," ",b$," ",c t^~vi'bB