スポンサーサイト

上記の広告は1ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

[Haskell]

掲示板の質問より、(cの内容ですが)
Haskellで作ってみました。
------------
入力はn(正の整数)で、n=a^2+b^2となるa,bが
存在するときはa,bの組を一つ、しないときはNoを出力するんですが、やり方がまったくわかりません。
どなたかお願いします。
環境はLinux,gccです。

-------------


-- ここのnを変更
n = 1000

set n = [(a,b) | a<-[1..n], b<- [1..n] ]

f (a,b) = if n == a*a+b*b then True
else False

g [] = (-1,-1)
g h = head h

-- 全部見たいときはここのコメントの部分を実行して
-- main = print $ g $ filter f $ set n

main = print $ g $ filter f $ set n
スポンサーサイト

テーマ : プログラミング
ジャンル : コンピュータ

[Haskell] 配列2

前回の記事にミスを発見したので追記です。

>-- 実装されていないようです。使うとコンパイルエラーになります
>amap :: (IArray a e', IArray a e, Ix i) => (e' -> e) -> a i e' -> a i e

Data.Array.amap という関数は存在せずに
Data.Array.IArray.amapに存在しています。

Data.ArrayはData.Array.IArrayの拡張版だと思っていたので、少し勘違いをしてしまいました。
Data.ArrayとData.Array.IArrayの根本的な違いについては只今研究中です。

続きを読む

テーマ : プログラミング
ジャンル : コンピュータ

プロフィール

かみさまみならい

Author:かみさまみならい
FC2ブログへようこそ!

最近の記事
最近のコメント
最近のトラックバック
月別アーカイブ
カテゴリー
ブロとも申請フォーム

この人とブロともになる

ブログ内検索
RSSフィード
リンク
上記広告は1ヶ月以上更新のないブログに表示されています。新しい記事を書くことで広告を消せます。