format 2 int j1Fy'os"!
DJVH}w}9_P
input x H!?Av$h`
y=x/2 -*~= 4m<
z=10*Y `O?Kftv*
4zkn~oy
a$=$str(z) >v7fR<(%s
b$=$rightstring(a$,1) ;IZ*o<_
c=sval(b$) [=7=zV;}4
if c==0 $N'AZY]4]
print "x 是偶数" jfP2n5X83
else s6bILz-u
print "x 是奇数" HY0q!.qog
endif Y~gDS^8
print x," ",y," ",z," ",a$," ",b$," ",c GqMa|8j