史萊姆論壇

史萊姆論壇 (http://forum.slime.com.tw/)
-   程式語言討論區 (http://forum.slime.com.tw/f76.html)
-   -   fortran1到100的質數 (http://forum.slime.com.tw/thread158608.html)

lineage175 2005-10-11 11:02 PM

fortran1到100的質數
 
要怎樣用fortran寫1到100的質數
有人會嗎QQ?
教一下^^...感恩

snoopy 2005-10-12 12:56 AM

好老的程式語言
不過求質數演算法很簡單
去網路找cㄉ範例改一下就可以了

mini 2005-10-12 03:39 PM

http://www.cnpedia.com/Result/Eword....or%20(FORTRAN)
的確很古老 ^^ (幾乎只記得名字 其他什麼都不記得了)
教學 : http://140.136.191.181/html/frank/do...tran/index.htm


所謂質數(prime numbers)就是「除了自身和1 之外,找不到任何數可以整除該數」的整數。

好像可以用 mod 餘數涵式來解
不過個人的直覺是用兩個迴圈來運算
i=2 to 100
j=2 to i

再加一個判斷是否是質數的計數旗標 prime_number=1
整數變數 = i / j
浮點變數 = i / j
當 浮點變數 = 整數變數 時 prime_number=prime_number-1

結束 j 迴圈後隨即判斷 prime_number是否為0
是的話即列印

因為 整數變數 只能裝 整數 所以 會與 浮點變數 差在 小數點
舉例
整數變數 = i / j ; 5/2=2
浮點變數 = i / j ; 5/2=2.5

整數變數 = i / j ; 5/3=1
浮點變數 = i / j ; 5/3=1.6666

整數變數 = i / j ; 5/4=1
浮點變數 = i / j ; 5/4=1.25

整數變數 = i / j ; 5/5=1
浮點變數 = i / j ; 5/5=1
所以只有最後一次符合 prime_number 會等於 0
5 是質數


以上如有錯誤怪

猜謎人 2005-10-24 12:33 AM

fortran雖是很古老
可是我在驢子上見過現在仍有很多這種程式
工科還是有在教嗎


所有時間均為台北時間。現在的時間是 11:12 AM

Powered by vBulletin® 版本 3.6.8
版權所有 ©2000 - 2025, Jelsoft Enterprises Ltd.

『服務條款』

* 有問題不知道該怎麼解決嗎?請聯絡本站的系統管理員 *


SEO by vBSEO 3.6.1