#lang racket

(provide (all-defined-out))

(define (read-input)
  (printf "Enter a string: ")
  (read-line))