アカウント名:
パスワード:
より多くのコメントがこの議論にあるかもしれませんが、JavaScriptが有効ではない環境を使用している場合、クラシックなコメントシステム(D1)に設定を変更する必要があります。
あと、僕は馬鹿なことをするのは嫌いですよ (わざとやるとき以外は)。-- Larry Wall
エラトステネスの篩 (スコア:0)
(defun prime-p (n)
(let ((v (make-array (1+ n) :initial-element t)))
(setf (aref v 0) nil)
(setf (aref v 1) nil)
(dotimes (i (1+ n))
(when (aref v i)
(do ((j (+ i i) (+ i j)))
((> i n))
(setf (aref v j) nil))))
(aref v n)))
;; C で
Re:エラトステネスの篩 (スコア:3, 参考になる)
Re:エラトステネスの篩 (スコア:0)
# 掛け算は FFTで速くできる、とかきいたが。
Re:エラトステネスの篩 (スコア:3, 参考になる)
商と余りを求める除算の計算量はよく知りません。素朴には O(d^2) 時間でやっているように思いますが。
鵜呑みにしてみる?
Re:エラトステネスの篩 (スコア:0)
Re:エラトステネスの篩 (スコア:2, 参考になる)
non-restoring division も初耳なので、 SRT 除算まで理解するのは大変そうです。
鵜呑みにしてみる?