putStrLnを使用して結果を表示

Question

Idone.comサイトを使用していますが、このコードを実行したいが、putStrLn構文を知らないstdinからコンパイルするこのコードを使用しますが、stripエラーです。

main = putStrLn (show (sumaCifras x)) 
sumaCifras:: Int -> Int 
sumaCifras x = div x 1000 + mod (div x 100) 10 + mod (div x 10) 10 + mod x 10 

Answer 1

このスコープにバインドされていないmain関数でxを使用するため、コンパイラに問題があります。まず、入力から値を読み取り、それを関数に渡す必要があります。あなたは2つの方法でそれを行うことができます。あなたはintとしてxを使用したい場合は、あなたが機能を「読み」を使用する必要があり

main = do 
     x <- getLine 
     putStrLn (show (sumaCifras (read x :: Int))) 

：言語を命令型に使用される人々のための

より自然は、それがそのようになります。ここでの構文を、「やる」ですコンパイラは何を期待するかを知るでしょう。

より機能的な方法でそれを書くために、あなたは「>> =」演算子はそれがここで（最初のモナドアクションから結果値を取得すること

main = getLine >>= (\x -> putStrLn(show (sumaCifras (read x :: Int))) 

のようにそれを渡すために、モナド変換を使用することができます入力を取得するIOアクション）を右の関数に適用します（ここでは、入力をIntegerとして読み込み、関数を適用してputStrLnに返し、画面に出力します）。 "do"構文は本質的に単なるモナド演算の構文的砂糖なので、プログラムの実行やパフォーマンスには影響しません。

あなたはそれを書くことで、機能的にそれを書面でさらに一歩行くことができ、完全にポイントフリー

main = getLine >>= (putStrLn . show . sumaCifras . (read :: String -> Int)) 

ので、ここであなたは、読み取り機能のためではなく、引数にこの機能を適用するための型シグネチャを持っていることに注意してください、 String - > Int。ここで最初に実行されるのは、getLine関数です。それから得られた入力は、読み込みに渡され、そこでIntにキャストされます。次にsumaCifrasが表示され、putStrLnで文字列にキャストされます。