作者jubilee2 (3321)
看板Fortran
標題Re: [問題] 請問fortran找極值跟階乘
時間Sun Oct 17 12:22:15 2010
※ 引述《shamily145 (薏仁)》之銘言：
: 我現在用的fortran程式是Visual Fortran 6.0
: 現在遇到兩個作業上的問題要請教高手
: 就是要寫一個程式比較計算sin值和用泰勒算sin值
: 可是泰勒裡面有階乘，不知道要用什麼方法表示
寫個方程式
: 另外是要讀一個檔(自己建立，在裡面打幾個數字)
: 可是在程式裡面要假設不知道有幾個數字
: 並找出最大值和最小值
: 最後輸出只要最大值和最小值
: 請問如果用do的話要怎麼找出最大值和最小值?
integer stat
real Rmax Rmin readreal
open(.....)
rmax=-9999
rmin=9999
do while
READ(8,*,iostat=stat) readreal
if(stat<0) exit
rmax=max(readreal,rmax)
rmin=min(readreal,rmin)
end do
write(*,*) rmax,rmin
end
其它自己補語法
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.116.138.199
1F：→ shamily145:請問READ後面那括號IOSTAT=STAT是什麼意思呢?可以麻煩 10/17 12:51
2F：→ shamily145:你解釋一下嗎?我剛學，有些還看不太懂，謝謝~ 10/17 12:52
3F：推 shamily145:請問DO和DO WHILE有什麼不同 10/17 13:12
4F：推 meteorology:請問一下你手邊的書 有沒有一個章節叫檔案？？ 10/17 17:32
5F：→ meteorology:在那個裡面會有寫到IOSTAT的用法^^ 10/17 17:33
6F：推 shamily145:我現在這本是英文書，而且有些指令老師還沒教到... 10/17 17:39
7F：→ shamily145:所以我看不太懂= =而且我照打會有錯誤，沒辦法執行 10/17 17:40
8F：推 shamily145:請問READ(8,*,IOSTAT=STAT)代表什麼意思 10/17 18:27
9F：→ jubilee2:open裡面的 .... 既然你前面都說要讀檔案了 想說你應該會 10/17 20:00
10F：→ jubilee2:不然爬一下版 隨便一個範例應該都有 10/17 20:00
11F：→ jubilee2:IOSTAT 是讀取檔案的狀態 傳回值<0 就是讀取有錯誤 10/17 20:02
12F：→ jubilee2:do while(.true.) 也有漏掉 自己加一下 10/17 20:02
13F：→ shamily145:我照這樣打 他顯示的都是最後一個數字 不是最大最小值 10/17 20:18
14F：→ shamily145:我最大最小值已經找出來囉~謝謝 10/17 20:26
15F：推 h888512:存成array,讓他去替代 10/19 22:44