pc logo程序语言问题

来源:百度知道 编辑:UC知道 时间:2024/05/25 10:59:44
小学pc logo语言问题:
编写一个过程:从键盘上输入一个2位数的数字,电脑反序输出。例如,输入37,电脑输出73。

to fan
make "n read
make "a int :n/10
make "b :n-:a*10
(pr :b*10+:a)
end

to fx
print [输入一个数字]
make "sz read
(print word last :sz first :sz)
end
我的简单快捷……
第二个人说有点不对,在决赛里可以使用任何命令。

TO FX :A :N
IF :A<10 THEN PR :N+:A*10 STOP
FX :A-10 :N+1
END

执行:FX 一个两位数 0

to js:l :n
if:l<10 then(pr:l :n)stop
js:l-10 :n+1
end

运行:JS一个两位数 0