assoc alists

(define kiosks '((Nairobi . 12) (Mombasa . 8) (Kisumu . 5)))
(print (cdr (assoc 'Nairobi kiosks)))
(print (assoc 'Kisumu kiosks))

(define kiosks '((Nakuru . 4) (Eldoret . 3)))
(print (assoc 'Eldoret kiosks))
(print (assoc 'Nairobi kiosks))

(print (assq 'a '((a . 1) (b . 2))))

(print (cdr (assoc 'Mombasa '((Mombasa . 8) (Kisumu . 5)))))