【GNU】スクリプト言語 Guile【scheme】at TECH【GNU】スクリプト言語 Guile【scheme】 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト46:デフォルトの名無しさん 09/05/06 22:15:29 >>45 うちのマシンで一秒切るね 47:デフォルトの名無しさん 09/05/06 22:16:50 >>45 本体の最後こうすると速くなったよ (do ((i 2 (1+ i))) ((<= n (if (oddp i) (* (factors-count i) (factors-count (/ (1+ i) 2))) (* (factors-count (/ i 2)) (factors-count (1+ i))))) (values (* i (1+ i) 1/2) i))) 48:45 09/05/06 23:01:46 あーそのループは考えてたんだけど単純にかけ算で良かったんだ。 N=1000で0.1秒切るなぁ。すばらしい。 49:デフォルトの名無しさん 09/05/07 01:40:44 13番の50桁問題、難しくないじゃん guileで50桁前後の扱えないのかと思っていたら、普通に扱えた 50:デフォルトの名無しさん 09/05/08 13:11:15 がいらーとごーしゃー のけんか は あるの? 51:デフォルトの名無しさん 09/05/08 21:34:43 http://tsushima.2ch.net/test/read.cgi/newsplus/1241732267/2 これ面白いなw こんな文章を作るスクリプトなんかどうだろ 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch