Complete code for guess-the-number

First lisp program!!!!