source code clone download copy to clipboard report bug / make suggestion

1
2
3
4
5
main =  do
        putStrLn "Sum all natural numbers from 1 to? "
        integerInput <- getLine
        putStrLn (show (sum ([1..(read integerInput)])))
        

clone download copy to clipboard

• upload with new input
  You have reached a limit of free submissions this month.
  You cannot send submissions this month anymore because of exceeding your monthly limit. Please recharge your account.
  
• # 2:   hide show   clone   input   118 days 2 hours ago    Success

  result: Success     time: 0.01s    memory: 3716 kB     returned value: 0

  input:

  5

  output:

  Sum all natural numbers from 1 to? 
  15
  
• # 1:   hide show   clone   input   118 days 2 hours ago    Runtime error

  result: Runtime error     time: 0.01s    memory: 3716 kB     signal: -1

  input: no
  output:

  Sum all natural numbers from 1 to? 
  

  stderr:

  prog: <stdin>: hGetLine: end of file