Инвертирование цифр числа в Applesoft Basic
Я использую эмулятор 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» и не понимаю, почему.
Что мне не хватает?
Спасибо.
1 ответ
Я только что заметил, что, просто изменив имя переменной «RE», код ведет себя правильно. Но я не понимаю, почему.