(define s (x->string(read))) (print (string-reverse s))