import Data.Char;main=interact$map toUpper