我正在尝试在DrRacket中开始编写方案.我让DrRacket工作了很短的时间,然后我起身去喝咖啡,回来后现在它不会启动.当我点击DrRacket.exe时,它不会显示DrRacket用户界面,而是显示一个带有以下文本的控制台框:
read-bitmap: expects type <path-string or input-port> as 1st argument, given: '#
(#<procedure:draw-honu> 270 270); other arguments were: 'unknown/alpha #f #t
[退出.关闭框或Ctrl-C关闭控制台.]
我尝试重新安装没有成功.我也确保我有64位版本而不是32位版本.
我试图truncate在方案中使用该函数,DrRacket继续发出此消息
ProblemA.rkt:27:46: truncate: this function is not defined in: truncate
是否有导入或我可以添加的内容,以便编译器可以找到该库truncate？
基本上我想做整数除法的方案,以便98/10 = 9代替9.8,但truncate功能不工作.
我的列表抓取用户输入,并创建一个列表 - 此列表以字符为单位.
我想能够检查是否(car myList)是一个性格像#\1或者#\2,然后更改名单的车进1或2.
我正在使用DrRacket.
到目前为止,这个问题一直试图打电话给(set! (car myList) 1)或(list-set! (car myList) 1 )
两者都是我环境中未定义的引用.
我刚刚开始参与计划,参加大学任务.
如果有人有时间,任何帮助将不胜感激
谢谢
好的,我正在大学上学这门课程,我们刚刚完成了第一次任务.我遇到了这个奇怪的事情.有时程序会冻结,绝对不做任何事情而不给我任何形式的警告,为什么这是......
采取以下程序:
(define (calc-week-day y1 m d w y2) ; anta y2 > y1
(define (days-between-months m1 m2 y)
(if (= m1 m2)
0
(+ (month-length y m1) (days-between-months (+ m1 1) m2 y))))
(define (days-between-years y1 y2)
(if (= y1 y2)
0
(+ (year-length y1) (days-between-years (+ y1 1) y2))))
(define (days-til-months-end d m y)
(- (month-length y m) d))
(define (calculate-day day offset)
(cond ((> day 6) (calculate-day 0 (- offset 1)))
((= offset 0) day)
(else (calculate-day …我有一个字符串列表kumo.我打印三个字符串.我在三条线上得到它们.我希望它们在一行上用空格分隔.我使用以下代码:
(display (first kumo))
(display (fourth kumo))
(display (second kumo))
要么
(printf "~a~a~a" (first kumo)(fourth kumo)(second kumo))
是否可以取消引用列表中包含的变量,以获取其值？例如:
(define one 1)
(define two 2)
(define list '(one two))
(display (list-ref list 0))
这里list-ref引用one并以字母display显示one.可以改为one取消引用同音变量包含的值吗？