fork download
  1. main = do
  2. nombre <- getLine
  3. nota1 <- readNum
  4. nota2 <- readNum
  5. promedio <- (nota1 + nota2) / 2
  6. if promedio >= 60 then
  7. putStr(nombre ++ " ha pasado el curso")
  8. else do
  9. putStr(nombre ++ " no ha pasado el curso")
  10. where
  11. readNum :: IO Float
  12. readNum = do
  13. line <- getLine
  14. readIO line
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Luis
80
90
compilation info
[1 of 1] Compiling Main             ( prog.hs, prog.o )

prog.hs:8:2: parse error (possibly incorrect indentation)
stdout
Standard output is empty