1. IF-THEN语句 IF-THEN语句是Fortran中最基本的判断语句,它的语法如下: IF (condition) THEN statement block END IF 其中,condition是一个逻辑表达式,如果为真,则执行statement block中的语句,否则跳过该语句块。 2. IF-THEN-ELSE语句 IF-THEN-ELSE语句是IF-THEN语句的扩展版本,它的语法如下: IF (condition...
一个完整的程序,流程的控制必不可少,Fortran语言中控制语句大致有两类:分支语句和循环语句。 分支语句: 分支语句主要包括IF、SELECT CASE等语句,下面是两个个简单的用法说明: 1 2 3 4 5 6 7 IF(逻辑表达式1) THEN 块1 ELSE IF(逻辑表达式2) THEN 块2 ELSE 块3 END IF 1 2 3 4 5 6 7 8 SELECT ...
do 1else! do 2end ifif(a>10)then! do 1else if(a>5)then! do 2else! do 3end if 在if后面必须接then,if 和 end if 构成一个标准的条件结构。支持if结构的嵌套。 可以使用简单的单行if,不需要end和then。 if(a>10)b=a 逻辑语句和逻辑运算 在if语句之后,顺便介绍逻辑类型和运算。 逻辑类型:....
一个完整的程序,流程的控制必不可少,Fortran语言中控制语句大致有两类:分支语句和循环语句。 分支语句: 分支语句主要包括IF、SELECT CASE等语句,下面是两个个简单的用法说明: 1 2 3 4 5 6 7 IF(逻辑表达式1) THEN 块1 ELSE IF(逻辑表达式2) THEN 块2 ELSE 块3 END IF 1 2 3 4 5 6 7 8 SELECT ...
if(MyGuess==Number) exit if(MyGuess> Number) then print *, 'Too high. Try again.' else print *, 'Too low. Try again.' end if end do print *,'You are lucky. It is',Number end 例子 implicit none integer :: i,n real :: y=0, term ...
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...
if (ierr /= 0) then write(*,*) Error, invalid input. cycle interactive_loop!cycle 相当于C里的continue end if ! Compute area. The ** means "raise to a power." area = 2 * pi * (radius**2 + radius*height)! 指数运算比C方便 ...
IF (逻辑表达式) THEN ... ELSE ... END IF 1. 2. 3. 4. 5. SELECT-CASE语句 类似于C类语言中的switch-case语句 select case(变量) case(数值1) ... case(数值2) ... case(数值n) ... case default ... end select 1. 2. 3. ...
隐式循环 a=[(i,i=1,10)]相当于:doi=1,10a(i)=ienddo 署名的do循环 outer:doi=1,10inner:doj=1,20...enddoinnerenddoouter 循环控制:Cycle, exit do ... if (expression) then cycle else exit end if end do cycle:表示忽略本轮循环剩余内容,直接进入下一轮循环 exit:(...
End if 逻辑运算符: 逻辑判断式 多重判断 If(条件1) then …… Else if(条件2) then Else …… End if 浮点数及字符的逻辑运算 使用浮点数来做逻辑运算时,要避免使用“等于”的判断。因为使用浮点数做计算时,有效位数是有限的,难免会出现计算上的误差,理想中的等号不一定会成立。要使用浮点数来做“等于”...