填空题
下列程序的运行结果是（）。
Program test
Implicit none
Integer::i
Integer::a(5)
Forall ( i=1:5 )
A(I)=5
End forall
Write(*,*)a
Stop
end
【参考答案】
55555
点击查看答案
相关考题
-
填空题
二维数组在内存中的存储顺序为（） -
填空题
下列程序的运行结果是（）。 Program main implicit none integer, target :: a=1 integer, pointer :: p p=>a p=3 write(*,*)a end -
填空题
下列程序的运行结果是（）。 Program main implicit none integer ::a=1 integer ::b=2 call add ( a ) Call add ( b) Write(*,*) a , b Stop end Subroutine add (sum) Implicit none integer :: sum sum=sum+1 Return end
