いろんな言語で宿題スレ

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

いろんな言語で宿題スレ - 暇つぶし2ch307:デフォルトの名無しさん
09/06/26 22:29:32
>>305
-- Haskell

import Data.List (find)
main = do
n <- getLine
let Just m = find ((read n <=) . (2^)) [1..] in print (m-1)

次ページ

続きを表示

1を表示