全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:696
推到 Plurk!
推到 Facebook!

質數問題!!!

尚未結案
ankin
一般會員


發表:12
回覆:7
積分:3
註冊:2002-10-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-03-20 16:02:41 IP:211.74.xxx.xxx 未訂閱
請問站長....如何判斷某數值是不是質數...
Jasonwong
版主


發表:49
回覆:931
積分:581
註冊:2006-10-27

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-03-20 16:24:28 IP:211.22.xxx.xxx 未訂閱
引言: 請問站長....如何判斷某數值是不是質數...
你可以將某數值 除以2,除以3,除以5,除以7,除以11 如果以上都沒辦法除盡的話... 那某數值就是質數了... -- 聰明的人,喜歡猜心;雖然每次都猜對了,卻失去了自己的心 傻氣的人,喜歡給心;雖然每次都被笑了,卻得到了別人的心
------
聰明的人,喜歡猜心;雖然每次都猜對了,卻失去了自己的心
傻氣的人,喜歡給心;雖然每次都被笑了,卻得到了別人的心
delphiwww
資深會員


發表:145
回覆:363
積分:368
註冊:2002-03-13

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-03-20 17:06:37 IP:202.145.xxx.xxx 未訂閱
function prime(num:integer):boolean; var i:integer; begin    if (i>2) then    begin       result:=not ((num mod 2)=0);       i:=3;       while result and (i<=sqrt(num)) do       begin           result:=not (num mod i)=0;           i:=i+2;       end;    end else    begin       if i>0 then          result:=true       else          result:=false;       end; end;
引言: 請問站長....如何判斷某數值是不是質數...
系統時間:2024-06-28 18:39:48
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!