いろんな言語で宿題スレat TECH

---

499:デフォルトの名無しさん
09/07/17 21:28:54
>>488
import System.Random (getStdRandom, randomR)
import qualified System.IO.UTF8 as U

main = do
a <- getStdRandom $ randomR (0,10) :: IO Int
c <- getLine
U.putStrLn $ if (read c) == a then "あたり！！" else "残念乱数は" ++ show a ++ "です"

---

次ページ

続きを表示

1を表示

最新レス表示

レスジャンプ

類似スレ一覧

スレッドの検索

話題のニュース

おまかせリスト

オプション

しおりを挟む

スレッドに書込

スレッドの一覧

暇つぶし2ch