getdist func中的变量值

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

你好

我正在尝试一些非常简单的事情，但我已经没有想法了

（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整除的数字，可能是这样的

copy

(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

要检查可分性，还可以使用：

copy

(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时，表达式返回余数。

[编程交流] getdist func中的变量值

发表回复

精选推荐