kozima #6430(2008/06/04 08:30 GMT) [ Haskell ] Rating1/1=1.00
Haskell の方がきれいに書けますね。
1 2 3 4
import Data.List check (x:xs) = (all (< x) xs || all (> x) xs) && check xs check [] = True
Rating1/1=1.00-0+
[ reply ]
kozima
#6430()
[
Haskell
]
Rating1/1=1.00
Haskell の方がきれいに書けますね。
Rating1/1=1.00-0+