【问题标题】:Issues with MID$ functionMID$ 函数的问题
【发布时间】:2019-11-08 12:50:47
【问题描述】:

我正在尝试在新行上打印出给定字符串的每个字符。

1 INPUT ""; A$
2 E%=0
3 IF E% < LEN(A$) GOTO 5
4 END
5 PRINT MID$(A$,E%,E%+1)
6 E% = E% + 1
7 GOTO 3

我一直在努力

5 中存在非法数量错误

我不知道为什么。

【问题讨论】:

  • 这是哪个“BASIC”?有100个。你的行号在哪里?发布代码时应包含它们。
  • 我使用的是 BASIC V2
  • 在什么类型和版本的计算机系统上?使用哪个程序编写代码?
  • 我正在使用 VIC-20 模拟器,写入内核

标签: basic commodore


【解决方案1】:

您的代码存在三个问题,其中两个相关。

首先,E% 应该从 1 而不是 0 开始。 其次,因为 E% 从 1 开始,您应该检查

1 INPUT ""; A$
2 E%=1
3 IF E% <= LEN(A$) GOTO 5
4 END
5 PRINT MID$(A$,E%,1)
6 E% = E% + 1
7 GOTO 3

接下来您应该研究 FOR/NEXT 循环。

【讨论】:

    猜你喜欢
    • 2014-11-16
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2017-12-22
    • 1970-01-01
    • 1970-01-01
    • 2016-10-08
    • 1970-01-01
    相关资源
    最近更新 更多