本文目录一览:

  • 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