作者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