作业帮 > 综合 > 作业

fortran达人帮忙改下程序,错误已指出,但我不懂改,主程序错误argument S (number 6)

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/09 02:54:53
fortran达人帮忙改下程序,错误已指出,但我不懂改,主程序错误argument S (number 6)
主程序
program main
external f1,f2
double precision x,y,E,a,b,f1,f2
open(9,file="v(x,y).dat",status='unknown')
a=3.14/3.0
b=2.0*3.14/3.0
do i=1,n
x=0.0-2.0+i*0.05
if(x
正确程序如下:----------------------------
!主程序
program main
external f1,f2
double precision x,y,E,a,b,f1,f2,Ex,Ey
open(9,file="v(x,y).dat",status='unknown')
a=3.14/3.0
b=2.0*3.14/3.0
do i=1,n
x=0.0-2.0+i*0.05
if(x