[求助]：怎样使变量递增？如：a1 a2 a3……an？

zhynt

以递增的形式增加变量数
如有变量a1加1后有变量a2再加1后有变量a3一直到变量an。

lsjjm

(setq m 0)
(while (< m n)
  (set (read (strcat "a" (itoa (1+ m)))) value)
  (setq (1+ m))
)

zhynt

嗯，不错，不过不完整：

2. 
   
3. (defun aaa ()
   
4.   (setq m 0)
   
5.   (setq n 0)
   
6.   (while (<= m 10)
   
7.     (set (read (strcat "a" (itoa (1+ m)))) n)
   
8.     (setq n (1+ n))
   
9.     (setq m (1+ m))
   
10.   )
    
11. )
    

<br /> (defun aaa ()<br />   (setq m 0)<br />   (setq n 0)<br />   (while (<= m 10)<br />     (set (read (strcat "a" (itoa (1+ m)))) n)<br />     (setq n (1+ n))<br />     (setq m (1+ m))<br />   )<br /> )<br />

谢谢你。

gchen

我有一个问题，就是你这么定义变量的理由是不是因为要随机产生变量，即用多少就产生多少，看程序使用情况来定？如果是这样，那么如何声明这些局部变量呢？因为它是不确定的。

zhynt

就是啊，我就是在项这些问题，一直没有头绪。

ll_j

为什么一定要使用“随机”的变量名呢？直接使用表不就行了吗？构成嵌套的表，需要的时候就加一项。

zhynt

能不能给个提示？怎么实现？

gchen

我明白他的意思了，就是说你的变量名只用一个，而数据就用表的形式储存，因为表的大小是没有限制的，所以你尽管往里面添加就是了。

zhynt

对呀！茅塞顿开，我明白了。看来我进入了一个误区。

快乐王子刚

我想看看看