Guest User

Untitled

a guest
Jul 20th, 2018
86
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.14 KB | None | 0 0
  1. (define (grades list1)
  2. (cons (cond ((= (car list1) 100) 'S)
  3. ((= (car list1) 90) 'A))
  4. (cons (grades (cdr list1)) '())))
Add Comment
Please, Sign In to add comment