Fortran学习笔记4Fortran学习笔记4逻辑运算循环Do语句Do-While循环循环控制循环应用实例逻辑运算if命令需要和逻辑运算表达式搭配才能起到很好的效果。下面分别列出Fortran90和Fortran77的逻辑运算符。 Fortran90 Fortr...
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语句之后,顺便介绍逻辑类型和运算。 逻辑类型:.true.,.false...
1 if() then ... endif2 if() then ...else... endif 3 if() then ... else if() then ... else if() then ... ... else ... end if 4 if() then !if嵌套 if() then else if() then else end if else if () then else end if 2.逻辑运算 3.select case语句 selectcase(变...
write(*,'("Your Guess:")'); read *, MyGuess 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=...
只有当condition为假时,循环才会结束。 3.赋值语句: 赋值语句用于将一个值赋给一个变量,语法如下: variable = expression 可以使用算术运算符和函数来计算expression的值,并将结果赋给变量。 4.条件语句: 条件语句用于根据条件选择执行不同的代码块,常用的条件语句有IF语句和SELECTCASE语句。 -IF语句的语法如下: ...
1. DO循环: DO循环用于执行一系列语句指定的次数。它有两种形式: - DO循环的计数形式: DO i = start, end, step !执行的语句 END DO 在计数形式中,循环变量i从start开始,以步长step增加,直到达到或超过end。 - DO循环的无限形式: DO !执行的语句 IF (condition) EXIT END DO 在无限形式中,循环会无限...
用块用块IF和和GO TO语句实现当型循环语句实现当型循环C判断判断n是否为素数是否为素数 read(*,*) nj=sqrt(real(n)i=2do 10 while(i.le.j).and. $ (mod(n,i).ne.0) i=i+110continueif(i.gt.j) then write(*,*) n, is, $ a prime numberelse write(*,*) n, is not, $ a prime ...
do while(.true.)! 读入一整行的数据 read(inputfileid,"(A200)",iostat=error) buffer if ( error/=0 ) exit ! 没有数据了,离开循环 ! 再最前面加上行号再输出到另一个文件中 write(outputfileid, "(I3,'.',A)") count,trim(buffer)count=count+1 ! 计算行数 end do 看了就...
real a(8)integer i , j i = 0 do j = 1, 8 if(a(j) == 0) then i = i + 1 endif enddo if(i == 8) then ...!符合条件，进行下一步 else ...!不符合条件，跳回 endif
fortran循环结构及基本语句..第五讲 循环结构及基本语句 5.1循环结构概述 对于问题规模较大的重复问题适宜采用循环结构。如：从键盘输入50个数，求50个数之和，并输出。求解算法：(1)初始化：0.0sum。(2)1I。(3)如果I>50,则执行步骤(7)。(4)输入一个数x,并累加到sum中。求解程序：Programex1 s...