format 2 int mZ &]
2c*2\93>
input x 7x:F!0:
y=x/2 F13%)G(
z=10*Y > hesxC!
3?6 Ber y=
a$=$str(z) h@/>?Va
b$=$rightstring(a$,1) !j'guT&9]
c=sval(b$) ,DQ
>&_DK
if c==0 BC&^]M
print "x 是偶数" C890+(D~
else QD6Z=>?S
print "x 是奇数" M,Po54u
endif oPE.gn_$
print x," ",y," ",z," ",a$," ",b$," ",c GYTbeY