Welcome to DrRacket, version 7.6 [3m]. Language: racket, with debugging [custom]; memory limit: 128 MB. > 1 întregi 1 > 1.3 float 1.3 > 1/3 fracții 1/3 > #t boolean #t > #f #f > abc$ fără quote, Racket încearcă evaluarea . . abc$: undefined; cannot reference an identifier before its definition > 'abc$ literali (simboluri) pentru a nu evalua ceva care arată a identificator, folosim quote 'abc$ > "abc" șiruri de caractere "abc" > (symbol->string 'abc$) șirurile de caractere nu sunt același tip cu literalii "abc$" > (elem elem elem) S-listă . . elem: undefined; S-lista este văzută ca listă de apel, încearcă apelarea lui elem > (1 2 3) . . application: not a procedure; expected a procedure that can be applied to arguments given: 1 arguments...: > (+ 1 2 3) apel al funcției + 6 > (cons 1 2) '(1 . 2) > (first (cons 1 2)) . . first: contract violation expected: (and/c list? (not/c empty?)) given: '(1 . 2) > (car (cons 1 2)) 1 > (cdr (cons 1 2)) 2 > (list 1 2 3 4) '(1 2 3 4) > '(1 2 3 4) construcție listă prin specificare ca S-listă, neevaluată '(1 2 3 4) > '(+ 1 2) '(+ 1 2) > (eval '(+ 1 2)) 3 > (cons 1 '(2 3 4)) '(1 2 3 4) > (car '(1 2 3 4)) lista văzută ca pereche între primul element... 1 > (cdr '(1 2 3 4)) ... și restul listei '(2 3 4) > '(1 . (2 . (3 . (4 . ())))) '(1 2 3 4) o înlănțuire de perechi cu lista vidă pe ultima poziție este o listă > (last '(a . (b . (c . d)))) dacă nu avem structura de mai sus, nu este listă . . last: contract violation --> argumentele pentru last nu sunt de tipul care trebuie expected: (and/c list? (not/c empty?)) given: '(a b c . d) > '() lista vidă '() > null lista vidă '() > '(1 . (2 . (3 . (4 . '())))) '(1 2 3 4 quote ()) > () . #%app: missing procedure expression; probably originally (), which is an illegal empty application in: (#%app) > '() '() > (+) 0 > (cons) . . cons: arity mismatch; the expected number of arguments does not match the given number expected: 2 given: 0 > '(cons) '(cons) > ((car '(cons)) 1 2) . . application: not a procedure; expected a procedure that can be applied to arguments given: 'cons arguments...: > ((eval (car '(cons))) 1 2) '(1 . 2) > (first '(1 2 3 4)) 1 > (second '(1 2 3 4)) 2 > (last '(1 2 3 4)) 4 > (car (cdr '(1 2 3 4))) 2 > (car (cdr (cdr '(1 2 3 4)))) înlănțuire acces 3 > (caddr '(1 2 3 4)) shorthand pentru (car (cdr (cdr ))) 3 > (length '(1 2 3 4)) 4 > (append '(1 2 3 4) '(a b c d)) '(1 2 3 4 a b c d) > (if (> 3 2) '(1 2) 5.6) if are mereu 3 argumente '(1 2) > (if (< 3 2) '(1 2) 5.6) 5.6 > (if (> 3 2) ( (lambda (a b) (+ a b)) 1 2 ) 5.6) 3 > (if (> 3 2) ( (lambda (a b) (+ a b)) 10 2 ) 5.6) 12 >