fork download
  1. ; your code goes here
  2.  
  3. (define square-list (lambda (L)
  4. (if (null? L) '()
  5. (cons (* (car L) (car L)) (square-list (cdr L))))))
  6.  
  7. (display (square-list '(1 2 3 4 5 6)) )
Success #stdin #stdout 0.02s 10828KB
stdin
Standard input is empty
stdout
(1 4 9 16 25 36)