내가 노력하고 다음 코드 : 그것은 다음과 같은 출력으로 작동 (require-extension srfi-13)
(require-extension regex)
(print (string-substitute* "This is a test" '(("a test" . "NO TESTING ZONE"))))
: This is NO TESTING ZONE
내가 (GRacket 라켓을 선택하지) 라켓의 코드를 다음의 실행 만들었습니다 #lang racket
(print "Hello World!")
그것은 6.2 메가 바이트의 실행과 3.6 메가 바이트의 TGZ을 만듭니다. 이것은이 간단한 프로그램에 대해 매우 큰 것처럼 보입니다. 치킨 계획에 의해 동일한 코드 (print "Hello World!")으로
비록 목록을 호출하고 그것이 짝수 일지 또는 이상한지를 확인하는 것이 이런 방식으로 작동합니다. 목록 [2 6 4 5]을 취해서 짝수 위치에있는 모든 요소를 검사하여 t 또는 f를 인쇄한다고 가정합니다. [2 #t 4 #f]. 목록에서 모듈화하려고 시도했는데 오류가 발생한 것 같습니다. 현재 목록을 확인하고 짝수 또는 홀수인지 확인하는 방법이 있습니까?
프로 시저를 작성하려고합니다. 쌍이 a로 시작하면 b를 반환합니다. 쌍이 b로 시작하면 c를 리턴합니다. 쌍이 c로 시작하면 a를 리턴합니다. (define e '((a b) (b c) (c a)))
(define (make-encoder e)
(cond ((eq? 'a (car (assq 'a e)))
(cadr (assq 'a e
내 기능은 다음과 같습니다 입력을 수용해야합니다 (getlist '(a b '(a b) 1 2 '() '(1 2)))
기능해야 다음 원래 목록에서 모든 목록의 목록을 출력. 그래서 출력은 "((a b)()(1 2))"
처럼해야하지만이 점점 오전 : "((quote (a b)) (quote()) (quote (1 2)))"
내가 올바른 값을 얻고
(call-with-output-file "b.txt"
(lambda (output-port)
(display "hello, world" output-port)))
추가 모드에서 b.txt를 여는 방법. 그러면 결과가 텍스트 파일에 추가됩니다. 나는 다음과 같은 대답을 발견했다. 그러나 그것은 내가 기대하는 것이 아닙니다. Append in sche
나는 끝에 연산자를 사용하여리스트를 평가하는 계획 프로그램을 작성 중이다. 예 : (평가 '(1 2 +)) -> 3 내가 기본 운영자 작업 기능을 가지고 (+, -, *, /)하지만 문제는 내가 중첩이있을 때 온다 명부. 예 : ('평가 (1 (2 3 +) *)) -> (아무것도) 내가 조건을 실종? (define (evaluate lis)
(co
변경할 수없는 이진 검색 트리를 만들려고합니다. 나는 빈리스트를 생성하기 위해 생성자를 생성하고 다음 코드를 사용하여 트리에 하나씩 요소를 추가하는 메서드로 시작했다. #lang racket
(define (constructTree) '())
(define (addToTree Tree k v)
(cond [(null? Tree)
(co