procedure main()
every|writes(read(),"es ")
end