774919153 发表于 2023-5-4 11:26:34

学着编了一个小程序不能运行，请大佬帮忙解答一下

(defun max(x y)
         (if(>x y) x y)
)

(defun c:xxx( )
(setq a (getreal "输入第一个数： ”))
(setq b (getreal "输入第二个数： ”))
(setq c (max a b)）
(print(list"最大的数: "c))
)


加载完显示
已成功加载 123.lsp。
命令: ; 错误: 输入的列表有缺陷


start4444 发表于 2023-5-4 11:37:09

有些符号输错了，最好找个编辑器
(defun max(x y)
         (if(> x y) x y)
)

(defun c:xxx( )
(setq a (getreal "输入第一个数："))
(setq b (getreal "输入第二个数："))
(setq c (max a b))
(print(list"最大的数: "c))
)

774919153 发表于 2023-5-4 14:37:30

start4444 发表于 2023-5-4 11:37
有些符号输错了，最好找个编辑器
(defun max(x y)
         (if(> x y) x y)


谢谢，但是又出现了新的问题。
命令: XXX ; 错误: 参数太多
命令:
:dizzy:

774919153 发表于 2023-5-4 15:10:30

start4444 发表于 2023-5-4 11:37
有些符号输错了，最好找个编辑器
(defun max(x y)
         (if(> x y) x y)


解决了，还是有一点标注错误，非常感谢。
页: [1]
查看完整版本: 学着编了一个小程序不能运行，请大佬帮忙解答一下