1.数组的声明
integer,parameter::num=
integer::student(num)
或者 integer a()
或者 integer a(,)
student()= !第一个元素值为5,默认索引值从1开始
赋初值
integer A()
data /,,,,/
data /*/ !5个0
data(A(i),i=,,) /,,/ !隐do循环
2.数组操作
3.where...elsewhere...endwhere 《fortran95 程序设计》彭国伦 p138
将数组中符合某一特征(比如小于3)的元素重新形成一个数组
4.声明一个可变大小的数组
integer,allocatable::A(:) !A是一个可变大小的一维数组
write(*,*)"how many syudents"
read(*,*)num
allocate(a(num)) !配置内存空间
5.函数
5.1子程序subroutine
program ex
...
call subroutine sub1()
...
end program subroutine sub1()
...
end subroutine sub1 子程序中遇到return即返回到调用处,如在子程序最后可以省略
5.2全局变量common
common a,b
a=
b=