Differences

This shows you the differences between two versions of the page.

Link to this comparison view

pp:23:laboratoare:racket:intro [2023/02/27 12:16]
bot.pp created
pp:23:laboratoare:racket:intro [2023/03/07 05:37] (current)
gabriel.pavaloiu [Perechi]
Line 158: Line 158:
 (cons 1 2) ; construiește perechea (1 . 2) (cons 1 2) ; construiește perechea (1 . 2)
  
-(car (cons 1 2)) ; întoarce primul element din pereche, adică 1 (cdr (cons 1 2)) ; întoarce al doilea element din pereche, adică 2+(car (cons 1 2)) ; întoarce primul element din pereche, adică 1 
 + 
 +(cdr (cons 1 2)) ; întoarce al doilea element din pereche, adică 2
  
 (cons 3 (cons 1 2)) ; construiește PERECHEA (3 . (1 . 2)) (primul element al perechii este un număr, al doilea este o pereche) (cons 3 (cons 1 2)) ; construiește PERECHEA (3 . (1 . 2)) (primul element al perechii este un număr, al doilea este o pereche)
Line 200: Line 202:
 (car (cdr '(1 2 3 4 5))) ; întoarce 2 (car (cdr '(1 2 3 4 5))) ; întoarce 2
 (cdr (car '(1 2 3 4 5))) ; cum (car list) nu întoarce o listă, ci un element, apelul produce eroare; funcția cdr așteaptă liste ca parametru (cdr (car '(1 2 3 4 5))) ; cum (car list) nu întoarce o listă, ci un element, apelul produce eroare; funcția cdr așteaptă liste ca parametru
-(cdr (cdr '(1 2 3 4 5))) ; întoarce (3 4 5)` `(car (cdr (cdr '(1 2 3 4 5))) ; întoarce 3+(cdr (cdr '(1 2 3 4 5))) ; întoarce (3 4 5) 
 +(car (cdr (cdr '(1 2 3 4 5))) ; întoarce 3
  
 </​code>​ </​code>​
Line 300: Line 303:
  
 <code lisp> <code lisp>
-; (if testexp thenexp elseexp) ​; sau fără bucata de else+; (if testexp thenexp elseexp)
 (if (< a 0) (if (< a 0)
     a ; întoarce a dacă a este negativ     a ; întoarce a dacă a este negativ
pp/23/laboratoare/racket/intro.1677492968.txt.gz · Last modified: 2023/02/27 12:16 by bot.pp
CC Attribution-Share Alike 3.0 Unported
www.chimeric.de Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0