Fortran语法允许在do循环前命名,这样一来就比较好识别了。 下面举个例子。 一个二维数组每个元素都乘以2,到0元素时停止计算。 注意分别跳出loop_i和loop_j时m的不同。 跳出loop_i时,m = 2 跳出loop_j时,m = 3
类比：continue和break CYCLE：PROGRAMtest_cycleINTEGER::iDOi=1,5IF(i==3)CYCLEWRITE(*,*)iEND DO...
exit 命令 类似C++的break integer :: counter do counter=start, end, step ! start, end, step 都可以是常量或者变量, 【step可以省略】 !... ! 循环体 exit ! 结束本层循环 end do 3.4.4 循环署名 integer :: a,b loop1: do a=1,10 ! 给循环取名字 loop2: do b=1,5 write(*, *) "...
内嵌的另一个do循环write(*,*)'Perform another calculation? y[n]'read(*,'(a1)') ynif(yn=='y'.or. yn=='Y')exityn_loopif(yn=='n'.or. yn=='N'.or. yn==' ')exitinteractive_loopenddoyn_loop!结束内嵌do循环enddointeractive_loopendprogramcylinder Fortran程序的主要结构就是这样了。一般...
python else在循环语句执行的情况 1、当循环体没有执行break的时候,即循环体正常结束。...当没有触发break时,执行else子句: print("两次输入机会") for i in range(2): num = int(input("请输入一个数字:")) if 10 =...= num: print("10 == num,触发break,不会执行else子句") break else: print...
do i = 1, n print *, "Loop index i:", i sum = sum + values(i) end do 复制代码 调试内存错误:使用编译器选项-fcheck=all,开启数组越界检查: gfortran -g -fcheck=all my_program.f90 -o my_program 复制代码 使用模块化设计:将代码分成多个模块,逐一测试每个模块,找出问题所在。例如: module ma...
转载自https://iowiki.com/fortran/,在此基础上做了一些补充。 Fortran - Overview Fortran,源自公式翻译系统,是一种通用的命令式编程语言。 它用于数字和科学计算。 Fortran最初由IBM在20世纪50年代开发用于科学和工程应用。 Fortran统治了这个编程领域很长一段时间,并且因为高性能计算而变得非常流行。
if(逻辑运算) exit !exit就好比C里面的break。C里的continue在Fortran里是cycle end do 4、Fortran的一个特色:带署名的循环 可以这样,不易出错: outer: do i=1,3 inner: do j=1,3 …… end do inner end do outer 还可以这样,很方便: loop 1: do i=1,3 loop2: do j=1,3 if(i==3) exit...
do while(.ture.) …… …… if(逻辑运算) exit !exit就好比C里面的break。C里的continue在Fortran里是cycle end do 1. 2. 3. 4. 5. 6. 4、Fortran的一个特色:带署名的循环 可以这样,不易出错: outer: do i=1,3 inner: do j=1,3 …… end do inner end do outer ...
do while(.ture.) …… …… if(逻辑运算) exit !exit就好比C里面的break。C里的continue在Fortran里是cycle end do 4、Fortran的一个特色:带署名的循环 可以这样,不易出错: outer: do i=1,3 inner: do j=1,3 …… end do inner end do outer 还可以这样,很方便: loop 1: do i=1,3 loop2:...