在Applesoft Basic中反转数字

Inverting a number digits in Applesoft Basic

提问人:Vinicius Lima Cordeiro 提问时间:9/8/2023 更新时间:9/8/2023 访问量:12

问:

我在以下链接中使用了 Apple II+ 模拟器:https://www.calormen.com/jsbasic/

运行以下代码:

10 HOME
20 DEF FNMOD(NUMBER) = NUMBER - INT(NUMBER / 10) * 10
30 LET N = 135
40 LET REVERSE = 0 : LET RE = 0

100 GOTO 1000
200 PRINT REVERSE

500 END

1000 RE = FNMOD(N)  
1030 REVERSE = REVERSE * 10 + RE
1040 N = INT(N / 10)
1050 IF N = 0 THEN GOTO 200
1060 IF N > 0 THEN GOTO 1000

它应该简单地反转第 30 行的数字,因此在此示例中打印“531”。但是,我让它打印“11”,我不明白为什么。

我错过了什么?

谢谢。

基本 Apple-II

评论


答:

0赞 Vinicius Lima Cordeiro 9/8/2023 #1

我刚刚注意到,只需更改变量“RE”的名称,代码就会表现出正确的行为。但我不明白为什么。