fortran语言问题DO M=1,5,2DO N=2,6,3K=M+NENDDOENDDOWRITE(*,*)KEND求问第一行和第二行的意思,以及计算结果,
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/08 23:44:19
fortran语言问题DO M=1,5,2DO N=2,6,3K=M+NENDDOENDDOWRITE(*,*)KEND求问第一行和第二行的意思,以及计算结果,
fortran语言问题
DO M=1,5,2
DO N=2,6,3
K=M+N
ENDDO
ENDDO
WRITE(*,*)K
END
求问第一行和第二行的意思,以及计算结果,
fortran语言问题DO M=1,5,2DO N=2,6,3K=M+NENDDOENDDOWRITE(*,*)KEND求问第一行和第二行的意思,以及计算结果,
第一行m以2个增量数的方式从1数到5,即1 3 5
第二行n以3个增量数从2数到6,即2 5
结果是k=10
循环里面的k不是求和,求和应该是
K=0
DO M=1,5,2
DO N=2,6,3
K=K+M+N
ENDDO
ENDDO
WRITE(*,*)K
fortran语言问题DO M=1,5,2DO N=2,6,3K=M+NENDDOENDDOWRITE(*,*)KEND求问第一行和第二行的意思,以及计算结果,
fortran语言DO 11 K=1,10转化为C语言
fortran语言中do语句,例如:do 20 I=1,3怎么理解呢?
fortran语言问题求大神解答.大学95版.Program testImplicit noneInteger::sum,isum=0.0do i=1,203,2sum=sum+iend dowrite(*,*)iend
fortran语言赋值语句M=5+3.0**2/2执行后,整型变量M的值是?
关于fortran语言中if语句的简单问题DO I=1,LAIF(I-19) 1,1,21 FCOS = 90 - 5 * (I-1)GOTO 32 FCOS = 5 * (I-1) - 903 CONTINUEFCOS = .01745*FCOSACOS(I) = COS(FCOS)ACOS(I) = C*ACOS(I) * ACOS(I)END DO我想知道这个if语句是怎么执行的,那
fortran语言问题DIMENSION M(4,3)DATA M/1,3,2,4,5,7,6,8,9,10,11,12/K=3WRITE(*,100)(M(K,1).I=1,3)100 FORMAT(1X,3I5)END求程序运行结果,并解释每一步的意思,
fortran语言 循环问题program eee integer a a=1 do 11 a=1,10 if (a.GE.5) go to 11 write(*,*)a11 continue write(*,*)a stopend请问为什么出来的结果是1,2,3,4,11呢?求大神解答,无限感谢~~
fortran里面的do循环问题do i=1,0,1...;.enddo这种循环会循环一次么?在c里面第一次循环前就要判断,所以上面一次也不会循环,在fortran里面是什么样子?
关于FORTRAN语言:FILE3.DAT有如下数据 50,54,64,65 65,70,85,90 46,73,60,72 阅读FORTRAN程序DIMENSION M(12)OPEN(10,FILE='FILE3.DAT')READ(10,*)(M(1),I=1,12)DO 10J=1,12IF (M(J).GE.60) N=N+1CONTINUEWRITE(*,20) NFORMAT(2X,'N=',12)END为什么
FORTRAN语言中,FORMAT(1X,E8.
fortran问题,最好能运算EXTERNAL F DIMENSION X(4),Y(4) DATA X /4*0.0/ B = 2.0 N=4 M=10 EPS=1.0E-5 CALL DNMTC(X,N,B,M,EPS,F,Y) WRITE(*,*) DO 10 I=1,N10 WRITE(*,100) I,X(I) WRITE(*,
用牛顿切线法解决一个问题(fortran 语言)
fortran跑拆开的循环应该如何写呢fortran可以跑这样的循环吗比如 以前是 do i=1,10拆成 do i=1,5 9,10这样两部分
fortran问题:INTEGER M(3,3) .WRITE(*,100) ((M(I,J),J=1,3),I = 1,3) FORMAT(1x,3I2)请问1x,
SCALE(I),I=1,4 应该怎么解释这句话的意思 fortran语言中的
什么是FORTRAN语言
fortran语言是什么