Add solution for Problem097 written in Common Lisp
user
```common lisp
;; Common Lisp Script
;; Manoel Vilela

(format t "~a~%" (mod (+ 1 (* 28433 (expt 2 7830457)))
                      (expt 10 10)))
```
assistant