其他语言中常用的in_array()方法

精易学习者

  

子程序名	返回值类型	公开	备 注
在数组中	逻辑型
参数名	类 型	参考	可空	数组	备 注
参_文本	文本型
参_文本数组	文本型
回_索引ID	整数型

变量名	类 型	静态	数组	备 注
局_回调逻辑	逻辑型
局_成员数	整数型
局_i	整数型
局_奇数	逻辑型
局_起始值	整数型
局_总循环次数	整数型

局_起始值 ＝ 0
局_成员数 ＝ 取数组成员数 (参_文本数组)
如果真 (局_成员数 ＜ 1)
返回 (假)
判断 (局_成员数 ％ 2 ＝ 1)
局_奇数 ＝ 真
局_奇数 ＝ 假
判断 (局_奇数)
如果真 (参_文本 ＝ 参_文本数组 [1])
回_索引ID ＝ 1
返回 (真)
局_起始值 ＝ 1
局_总循环次数 ＝ (局_成员数 － 1) ÷ 2
局_总循环次数 ＝ 局_成员数 ÷ 2
变量循环首 (1, 局_总循环次数, 1, 局_i)
如果真 (参_文本数组 [局_起始值 ＋ 局_i] ＝ 参_文本)
回_索引ID ＝ 局_起始值 ＋ 局_i
局_回调逻辑 ＝ 真
跳出循环 ()
如果真 (参_文本数组 [局_成员数 － 局_i ＋ 1] ＝ 参_文本)
回_索引ID ＝ 局_成员数 － 局_i ＋ 1
局_回调逻辑 ＝ 真
跳出循环 ()

变量循环尾 ()
返回 (局_回调逻辑)

.版本 2<br /> <br /> .子程序 在数组中, 逻辑型, 公开<br /> .参数 参_文本, 文本型<br /> .参数 参_文本数组, 文本型, 数组<br /> .参数 回_索引ID, 整数型, 参考 可空<br /> .局部变量 局_回调逻辑, 逻辑型<br /> .局部变量 局_成员数, 整数型<br /> .局部变量 局_i, 整数型<br /> .局部变量 局_奇数, 逻辑型<br /> .局部变量 局_起始值, 整数型<br /> .局部变量 局_总循环次数, 整数型<br /> <br /> 局_起始值 ＝ 0<br /> 局_成员数 ＝ 取数组成员数 (参_文本数组)<br /> .如果真 (局_成员数 ＜ 1)<br />     返回 (假)<br /> .如果真结束<br /> .判断开始 (局_成员数 ％ 2 ＝ 1)<br />     局_奇数 ＝ 真<br /> .默认<br />     局_奇数 ＝ 假<br /> .判断结束<br /> .判断开始 (局_奇数)<br />     .如果真 (参_文本 ＝ 参_文本数组 [1])<br />         回_索引ID ＝ 1<br />         返回 (真)<br />     .如果真结束<br />     局_起始值 ＝ 1<br />     局_总循环次数 ＝ (局_成员数 － 1) ÷ 2<br /> .默认<br />     局_总循环次数 ＝ 局_成员数 ÷ 2<br /> .判断结束<br /> .变量循环首 (1, 局_总循环次数, 1, 局_i)<br />     .如果真 (参_文本数组 [局_起始值 ＋ 局_i] ＝ 参_文本)<br />         回_索引ID ＝ 局_起始值 ＋ 局_i<br />         局_回调逻辑 ＝ 真<br />         跳出循环 ()<br />     .如果真结束<br />     .如果真 (参_文本数组 [局_成员数 － 局_i ＋ 1] ＝ 参_文本)<br />         回_索引ID ＝ 局_成员数 － 局_i ＋ 1<br />         局_回调逻辑 ＝ 真<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .变量循环尾 ()<br /> 返回 (局_回调逻辑)

新手写的不好，也想贡献点代码

376

666666666666精易非常好，支持中!!!!!!!!!!!!