LMDE2(Linux Mint Debian Edition 2; 64bit) での作業を想定。
GCC 6.3.0 (GFortran) でのコンパイルを想定。
Fortran には長けていないので、コードに誤りがあるかもしれない。
1. Fortran コードの作成
prime_numbers.f95
123456789101112131415161718192021222324252627
****************************************************! 素数一覧! : 入力値以下の素数を全て出力する!! date name version! 2017.04.20 mk-mode.com 1.00 新規作成!! Copyright(C) 2017 mk-mode.com All Rights Reserved.!****************************************************!program prime_numbersimplicit noneinteger i,j,nlogical is_primeprint*,"自然数を入力してください N:"read*,ndo i=2,nis_prime=.true.do j=2,int(sqrt(dble(i)))if(mod(i,j)==0)thenis_prime=.false.! 割り切れるので素数ではないexit end if end do if(is_prime)print*,i! もし素数ならば出力end doend program