4o4osan 发表于 2022-7-5 18:40:19

getdist func中的变量值

你好
 
我正在尝试一些非常简单的事情,但我已经没有想法了
 
(setq间隔5)
(setq dist(getdist“\n输入间隔:”))
 
查夫达尔

hmsilva 发表于 2022-7-5 18:53:33

嗨,查夫达尔,
如果您是指提示中的间隔值,可能是这样的
 
(setq interval 5)
(setq dist (getdist (strcat "\nEnter Interval < " (itoa interval)" >:")))
 
 
编辑:如果你的目标是强迫用户输入一个可以被5整除的数字,可能是这样的
(setq interval 5)
(while (not
      (progn
          (initget 7)
          (setq dist (getreal (strcat "\nEnter Interval < " (itoa interval) " >:")))
          (= (fix (/ dist 5)) (/ dist 5))
      )
      )
)

 
 
亨里克

Lee Mac 发表于 2022-7-5 19:00:58

要检查可分性,还可以使用:
(zerop (rem dist 5))

hmsilva 发表于 2022-7-5 19:12:49

 
 
更简洁。
谢谢李!
 
 
亨里克

Lee Mac 发表于 2022-7-5 19:26:51

别担心!

aswad 发表于 2022-7-5 19:34:11

rem dist是什么意思?

Lee Mac 发表于 2022-7-5 19:40:33

 
当将变量“dist”持有的数值除以5时,表达式返回余数。
页: [1]
查看完整版本: getdist func中的变量值