いろんな言語で宿題スレ

いろんな言語で宿題ス ..

575:デフォルトの名無しさん
09/07/28 00:32:46
>>572
nil は [] で代用した

-- Haskell
import Data.List (delete)

t572 :: (Ord a) => [a] -> [a]
t572 xs | length xs < 3 = []
| otherwise = delete (maximum xs) xs

main = print $ t572 [1,3,2]

次ページ