从 5 号文件中读取 title,按照 100 语句所示的格式读取。把 title 写入 6 号文件,也按照 100 语句所示的格式写入。说白了,就是把 5 号文件的标题,拷贝到 6 号文件里去。
第一个参数 从5号设备(unit=5)读入。默认的5号设备就是键盘。第二个参数 读用的格式语句标号为50。即用标号为50的那行FORMAT(...)语句定义的格式来读。第三个参数 end=101 如果读时读到文件结束符,则用标号为101的语句处理。
这样的,首先FORTRAN中数组 或者矩阵是按列存放的,也就是输入X(3,3)后,依次存放顺序是X11,X21,X31,X12,X22,X32,X13,X23,X33,则X12=4,X22=5,X32=6,另外FORTRAN中调用子程序时,数据传递采用的是虚实结果的办法,如果实参是数组元素,则把实参数组元素的地址给虚参数组作为虚参数组的首地址,他们在这一段共享...
Real :: fracr(10)OPEN(13,FILE='inputdata.txt')Read( 13 , * ) !跳过第一行 Read( 13 , * ) a(1:5) ! 读1-5个数
5、阅读 下列FORTRAN程序:DIMENSION M (6)READ(*,*)MDO 10J=1,6DO 10K=J,6IF(M (K) .LT.M (J) )THENN=M(K)M(K)=M(J)M(J)=NEND IF10 CONTINUEWRITE(*,100)(M(),I=1,6)100 FORMAT(2X,614)END键盘输入10,7,9,2,1,3;程序运行后的输出结果是:【单选题】...
阅读下列FORTRAN77程序: READ(*,*) N X=1.0 IF (N.GE.0) X=2*X-2.0 IF (N.GE.5) X=2*X IF (N.GT.15) X=3*X-1.0 WRITE(*,*) X END 运行上述程序时,如果从键盘输入 15<回车> 则最后输出的X值为 A. 5.0 B. 2.0 C. -1.0 D. 0.0 ...
举报 program lin3!implicit nonereal::d,c,l,t,x,x0,ff,yy,eps=1e-5print*,"请输入水深和周期"read*,d,tprint*,"请输入假设波长"read*,lx0=2*3.14159265359*d/l do while(kk 解析看不懂?免费查看同类题视频解析查看解答 相似问题 fortran语言中READ是什么操作? 二维码 回顶部...
求大神帮忙讲解一下这个fortran程序, DO 600 M=1,40 READ(1,*) NN,N,K1,M,L IF(NN.EQ.0)THEN GOTO 5
从文件通道号 1 里读取 A1,ID1 两个变量,以及 S 数组的前 5 个元素
意思是:从 83 号文件里,读取 temp 变量,按照 f18.12 格式读取。f18.12 格式的意思是:浮点数,长度占18个字符位置,其中小数点后面12位。这是基本的输入输出语法,如果你还在问这种问题,我建议你买一本书系统的学习。