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