本文目录一览:
- 1、Fortran问题:如图,GT,EQ,LT表示什么?
- 2、fortran 语言中GE,GT,LE,LT代表什么意思
- 3、请教fortran中IF语句和GOTO语句的特殊用法
- 4、fortran语言,输入年份和一个小于等于365的数字n,输出该年份第n天的日期(哪年哪月几号)?
Fortran问题:如图,GT,EQ,LT表示什么?
fortran中的关系运算符
.GT. 大于()
.LT. 小于()
.EQ. 等于(==)
还有
.GE. 大于等于(=)
.LE. 小于等于(=)
.NE. 不等于(!=)
fortran 语言中GE,GT,LE,LT代表什么意思
1、GE:大于等于号(gt;=);
2、GT是大于号();
3、LE是小于等于号(=);
4、LT是小于号()。
扩展资料:
最大特性是接近数学公式的自然描述,在计算机里具有很高的执行效率。易学,语法严谨。可以直接对矩阵和复数进行运算,这一点类似matlab。
自诞生以来广泛地应用于数值计算领域,积累了大量高效而可靠的源程序。很多专用的大型数值运算计算机针对Fortran做了优化。广泛地应用于并行计算和高性能计算领域。
参考资料:
百度百科-公式翻译器
请教fortran中IF语句和GOTO语句的特殊用法
goto
goto
在fortran77中就流传下来了,它提供一个任意跳跃到所赋值行代码的位置,如果是在一个do
循环中如
do
30
i=1,n
if(……)
goto
30
30
continue
上语句的意思就是如果符合if里的条件,则会进行下一次循环。
fortran语言,输入年份和一个小于等于365的数字n,输出该年份第n天的日期(哪年哪月几号)?
Implicit none
Integer::Y,N,YM(12),M=0
YM=(/31,28,31,30,31,30,31,31,30,31,30,31/)
10 write(*,*) ' 请输入年(整数),天数 (整数 1~365) :'
Read(*,*) Y,N
if(N1 .or. N365) goto 10
If(Mod(Y,4)==0.and.Mod(Y,100)/=0 .or. Mod(Y,400)==0) YM(2)=29
do
M=M+1
if(NYM(M)) then
N=N-YM(M)
else
exit
endif
enddo
write(*,'(A,I5,A,I2,A,I2,A)') ' 您输入的是:',Y,' 年', M,' 月',N,' 日'
! 已经上机通过,请放心使用。
end