找回密码
 加入
搜索
查看: 2990|回复: 5

[效率算法] 判断数组

  [复制链接]
发表于 2013-2-16 21:34:38 | 显示全部楼层 |阅读模式
数组内存有 1 2 3 4 ... 100 的数字

如何判断这连串的数出现"断点"了?比如:

1 2 3 4 5 7 8 9 10
发表于 2013-2-17 08:07:17 | 显示全部楼层
用for循环~
Dim $str[9] = [1, 2, 3, 4, 5, 7, 8, 9, 10]
For $i = 1 To 9
        If $str[$i - 1] <> $i Then
                MsgBox(0, "", "数字不连续,在第" & $i - 1 & "、" & $i & "个元素处不连续。")
                ExitLoop
        EndIf
Next
发表于 2013-2-16 23:13:37 | 显示全部楼层
这个没什么好想的吧?就一个for遍历数组完事
发表于 2013-2-17 08:27:53 | 显示全部楼层
用最后一个数减去第一个数再加一,如果和数组的元素个数不一样,就代表不连续。
发表于 2013-2-17 08:28:49 | 显示全部楼层
简单的for循环
发表于 2013-2-17 08:29:06 | 显示全部楼层
10-1 + 1 = 9
Count(ary) = 10

9 <> 10 。不连续
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 06:27 , Processed in 0.073968 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表