[求助]：长度计算问题

zxcs

有五个数，代表长度，
例如：3  5  8  10  20，
当其中的8加30变长了，等于38，
那么后面的10也要加30变长，等于40，
20也要加30变长，等于50，
前面的3和5不变


这个怎么解决！？

自由的鱼

什么意思？

zxcs

比如，有一条长30米的线路，分成4节，
起点到第一个点是5，起点到第二个点是5+3，
起点到第三个点是5+3+10，起点到第四个点是5+3+10+12，
当起点到第二个点的长度+2，那么到第三个第四个点的长度都+2，最后总长变成32米

lsjjm

问题说的不是很清楚，是否这样理解：最后要输出第一点到其他各点的长度？
试试这个：
[PHP]
(defun c:test (/ ll ss)
  (while (setq l (getreal "\nInput Legnth of Segment:"))
    (setq ll (append ll (list l)))
  )
  (setq n 1 s (car ll))
  (while (< n (length ll))
    (setq s (+ s (nth n ll)))
    (setq ss (append ss (list s)))
    (setq n (1+ n))
  )
  ss
)
[/PHP]