Question

fortran中怎么定义全局变量与局部变量

全局变量和局部变量分别用什么语句定义，在77和95中有何异同？不需要语言发展史类的文章，也不需要从帮助里直接拷过来的内容，要切切实实地回答。谢谢。
另外IF(MOD(IZ, 2) /= 0) THEN中的/=是什么意思

Answer 1

1、局部变量是指在函数内部定义的变量,作用域为定义局部变量的函数,也就是说他只能在定义他的函数中使用,其他函数不能使用该变量.
最值得注意的是:只有在程序执行到定义他的模块时才能生成，一旦执行退出该模块则变量消失.
2、全局变量则是在整个程序执行的过程中一直有效,除非整个程序退出才会消失.
例子:
Option Explicit
Dim x As Integer
Private Sub Form1_Load()
x = 1
End Sub

Private Sub Fun()
Dim y As Integer
x = x + 1
y = y + 1
End Sub

Private Sub Command1_Click()
Call Fun
Print x '正确
Print y '出错,提示变量没定义
End Sub

Answer 2

全局变量和局部变量是根据变量的生存期说的，一般在子程序或者函数内声明的都是局部变量。77和95有这方面的区别吗？不清楚。

/=意思是“不等于”

Answer 3

module主要有以下作用：
1）module
可以声明变量，经常用来声明程序中所需要的常量、或是用来存放全局变量
2）module里面可以定义自定义类型，在经过use的命令可以让程序中的每一个函数都能使用这个类型
3）module里面可以编写函数，同样使用use命令。
至于你提出的问题，可以用以下程序来解释：
module
global
implicit
none
integer
a,b
common
a,b
!
read
(*,*)
a,b
end
module
program
ex0834
use
global
implicit
none
read
(*,*)
a,b
write(*,*)
a,b
end
program
在module里声明了全局变量a,b.在program里就可以省去定义a,b的部分，就可以直接使用a,b.
第二个问题，当把module里的注释符“！”去除，
把program里的read(*,*)
a,b
注释掉就能发现程序错误，所以我认为在module里，不能通过read赋值。