这是猜数码.当我运行它时,我收到一个错误:找不到模块'Random'.我该怎么办 ?
module Main where
import IO
import Random
main = do
hSetBuffering stdin LineBuffering
num <- randomRIO (1::Int, 100)
putStrLn "I'm thinking of a number between 1 and 100"
doGuessing num = do
putStrLn "Enter your guess:"
guess <- getLine
let guessNum = read guess
if guessNum < num
then do putStrLn "Too Low!"
doGuessing num
else if guessNum > num
then do putStrLn "Too High"
doGuessing num
else do putStrLn "You Win!"
Run Code Online (Sandbox Code Playgroud)