main = do
nota1 <- readNum
nota2 <- readNum
promedio = (nota1 + nota2) / 2
if promedio >= 60
then putStr(nombre
++ " ha pasado el curso") else
putStr(nombre
++ " no ha pasado el curso") where
readNum = do
bWFpbiA9IGRvCgkgbm9tYnJlIDwtIGdldExpbmUKCSBub3RhMSA8LSByZWFkTnVtCgkgbm90YTIgPC0gcmVhZE51bQoJIHByb21lZGlvID0gKG5vdGExICsgbm90YTIpIC8gMgoJIGlmIHByb21lZGlvID49IDYwCgkgdGhlbiBwdXRTdHIobm9tYnJlICsrICIgaGEgcGFzYWRvIGVsIGN1cnNvIikKCSBlbHNlCgkJcHV0U3RyKG5vbWJyZSArKyAiIG5vIGhhIHBhc2FkbyBlbCBjdXJzbyIpCiAgICAgICB3aGVyZQogICAgICAgICByZWFkTnVtIDo6IElPIEZsb2F0CiAgICAgICAgIHJlYWROdW0gPSBkbwogICAgICAgICBsaW5lIDwtIGdldExpbmUKICAgICAgICAgcmVhZElPIGxpbmU=