ビンゴの結果を整形表示です。乱数の扱いは難しいで書いた重複無し乱数の続き。 import Data.List import System.Random import Text.Printf line = 10 main = bingo(30) >>= putStrLn >> bingo(35) >>= putStrLn bingo :: Int -> IO String bingo n = do xs …

最初はJOINだと思っていたら、いきなり副問い合わせだったので予想外。 SELECT * FROM Products WHERE ProductID NOT IN ( SELECT ProductID FROM Sales ) ; 練習問題でこんな使い方が出てきました。 SELECT SaleID , Quantity , CustomerID , ( SELECT Cust…