帮我看看哪里错了？

ato

  

子程序名	返回值类型	公开	备 注
测试

变量名	类 型	静态	数组	备 注
num	整数型		7
i	整数型
ret	文本型
数据数组	文本型		8
count	整数型		10

数据数组 ＝ { “”, “3”, “6”, “6”, “6”, “5”, “6”, “9” }
变量循环首 (0, 7, 1, i)
num [i] ＝ 到整数 (数据数组 [i ＋ 1])
count [num [i] ＋ 1] ＝ count [num [i] ＋ 1] ＋ 1
变量循环尾 ()
数组排序 (num, 真)
变量循环首 (1, 6, 1, i)
如果真 (i ＞ 0 且 num [i] － num [i － 1] ＝ 2 且 count [num [i]] ＝ 0)
ret ＝ ret ＋ 到文本 (num [i] － 1) ＋ “, ”

变量循环尾 ()
调试输出 (ret)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 测试<br /> .局部变量 num, 整数型, , "7"<br /> .局部变量 i, 整数型<br /> .局部变量 ret, 文本型<br /> .局部变量 数据数组, 文本型, , "8"<br /> .局部变量 count, 整数型, , "10"<br /> <br /> 数据数组 ＝ { “”, “3”, “6”, “6”, “6”, “5”, “6”, “9” }<br /> <br /> .变量循环首 (0, 7, 1, i)<br />     num <i> ＝ 到整数 (数据数组 [i ＋ 1])<br />     count [num <i> ＋ 1] ＝ count [num <i> ＋ 1] ＋ 1<br /> .变量循环尾 ()<br /> <br /> 数组排序 (num, 真)<br /> <br /> .变量循环首 (1, 6, 1, i)<br />     .如果真 (i ＞ 0 且 num <i> － num [i － 1] ＝ 2 且 count [num <i>] ＝ 0)<br />         ret ＝ ret ＋ 到文本 (num <i> － 1) ＋ “, ”<br />     .如果真结束<br /> <br /> .变量循环尾 ()<br /> <br /> 调试输出 (ret)

我都懵了，越来绕进去了

black0216

num [0] 肯定是没有的，从1开始

补充内容 (2024-4-17 18:00):
num ＝ 到整数 (数据数组 [i ＋ 1])  
就你这里，右边的你知道 i + 1
直接变量循环从1开始呗

afu45

变量循环首 (0, 7

从0到7
一共是8个  溢出了

ttuzi

易语言的循环从1开始,不是0

ato

black0216 发表于 2024-4-17 17:59
num [0] 肯定是没有的，从1开始

补充内容 (2024-4-17 18:00):

但得出来的结果为什么会是空的？

black0216

ato 发表于 2024-4-17 18:05
但得出来的结果为什么会是空的？

额，具体情况具体改，不是直接照搬，你想达到什么效果我也不清楚

补充内容 (2024-4-17 18:09):
看着你这像是别的语言硬翻译过来的代码，不然你上原代码好得多

ato

afu45 发表于 2024-4-17 18:00
变量循环首 (0, 7

从0到7

我头脑都蒙了能帮我改改吗？

80554326

你没错 错的是整个世界

ato

black0216 发表于 2024-4-17 18:07
额，具体情况具体改，不是直接照搬，你想达到什么效果我也不清楚

补充内容 (2024-4-17 18:09):

搞定了，谢谢你哈！！感谢



.版本 2
.支持库 spec

.子程序 测试
.局部变量 num, 整数型, , "7"
.局部变量 i, 整数型
.局部变量 ret, 文本型
.局部变量 数据数组, 文本型, , "8"
.局部变量 count, 整数型, , "10"

数据数组 ＝ { “”, “3”, “6”, “6”, “6”, “5”, “6”, “9” }

.变量循环首 (0, 7, 1, i)
    num <i> ＝ 到整数 (数据数组 [i ＋ 1])
    count [num <i> ＋ 1] ＝ count [num <i> ＋ 1] ＋ 1
.变量循环尾 ()

数组排序 (num, 真)

.变量循环首 (1, 6, 1, i)
    .如果真 (i ＞ 0 且 num <i> － num [i － 1] ＝ 2 且 count [num <i>] ＝ 0)
        ret ＝ ret ＋ 到文本 (num <i> － 1) ＋ “, ”
    .如果真结束

.变量循环尾 ()

调试输出 (ret)

补充内容 (2024-4-17 18:14):
.版本 2
.支持库 spec

.子程序 测试
.局部变量 num, 整数型, , "7"
.局部变量 i, 整数型
.局部变量 ret, 文本型
.局部变量 数据数组, 文本型, , "8"
.局部变量 c...

afu45

你的说清楚 你这代码是想实现什么