Fortran程序 请问这个程序是什么意思,运行结果是什么 implicit none exte

Fortran程序 请问这个程序是什么意思,运行结果是什么

implicit none external area integer a(2,5),b(5),c a=5 b=6 call area(a,b,c) print*,c print*,a print*,b end subroutine area(x,y,z) integer x(2),y(2,2),z x=x+1 y=y+1 x(2)=x(2)+1 z=x(2)*y(2,1) end

从变量名(函数名)来理解,主程序通过设定a和b的值,调用子程序(计算面积的?)area,得到变量c的值,并且将变量c、a、b的值打印到屏幕(标准输出)。

但是从函数接口来看,这个程序是有问题的。调用area子程序时,输入变量a,b的维数与子程序中声明的变量维数不一致,存在隐患。
温馨提示:答案为网友推荐,仅供参考
相似回答