| leslie2020 |
2020-12-03 08:53 |
format 2 int 8Lw B
B G
"P4- input x Fl(T\-Eu y=x/2 zbJT&@z z=10*Y g^zs,4pPU< &^4++ a$=$str(z) Q1@A2+ c b$=$rightstring(a$,1) o M Zq+> c=sval(b$) FVhU^ if c==0 2wF8 P) print "x 是偶数" FLEo*9u>b else !ct4;.2
D print "x 是奇数" EJ2yO@5O endif m,fAeln
print x," ",y," ",z," ",a$," ",b$," ",c Jmx Ko+-
|
|