数组分割成3份怎么写?

samll88

比如:
数组=随机数
怎么写一行代码.把任何随机数组分割成3份?


补充内容 (2024-11-25 07:38):
一行代码写错了,不限行数

zl2017

.版本 2
.支持库 spec

.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.局部变量 数组, 整数型, , "0"
.局部变量 数组1, 整数型, , "0"
.局部变量 数组2, 整数型, , "0"
.局部变量 数组3, 整数型, , "0"

.计次循环首 (9, i)
    加入成员 (数组, i)
.计次循环尾 ()

.计次循环首 (9, i)
    .如果真 (i ％ 3 ＝ 1)
        加入成员 (数组1, 数组 [i])
    .如果真结束
    .如果真 (i ％ 3 ＝ 2)
        加入成员 (数组2, 数组 [i])
    .如果真结束
    .如果真 (i ％ 3 ＝ 0)
        加入成员 (数组3, 数组 [i])
    .如果真结束

.计次循环尾 ()
调试输出 (数组, 数组1, 数组2, 数组3)