(setf a (make-array 9))(setf i 0)(loop (setf (aref a i) i) (setf i (+ i 1)) (if (> i 8) (return))) 数组赋值0~8 相关文章: 2021-07-23 2021-12-18 2021-12-13 2021-05-07 2021-07-16 2021-04-07