-module a.
-export[m/0].
m()->S=string,[io:format("~s~s",[S:to_upper(io:get_line('')),S:to_lower(io:get_line(''))])||A<-lists:seq(1,14)].