iCAx开思网

标题: 谁会LISP中的循环语句 [打印本页]

作者: yujeff 时间: 2006-11-2 13:47
标题: 谁会LISP中的循环语句
有谁知道在Autolisp语言中，循环＋判断的语句怎么写Sample Text

作者: xubojian 时间: 2006-11-2 14:16
(defun c:add (/ n x)
  (setq n 0
x 0
  )
  (while (<= n 100)
(setq x (+ x n)
n (1+ n)
)
  )
  (prompt (strcat "从0到100的自然数和为: " (itoa x)))
  (princ)
)

欢迎光临 iCAx开思网 (https://www.icax.net/)