下列程序的运行结果是（）。 
Program test 
Implicit none 
Integer::i 
Integer::a(5)=(/ (i, i=1,5) /) 
Integer::b(5)=0
      Where (a<3)
           b=a 
   End where 
Write(*,”(5(i3,1x))”) b 
end

下列程序的运行结果是（）。 Program test  Implicit none Integer::sum,i  sum=0.0    do i=1,203,2       sum=sum+i  end do  write(*,*) i end 点击查看答案

下列程序的运行结果为（）。 Program main       Implicit none       Real :: a, b, m              A=2.0              B=76.0             If(a                M=a                A=b                B=m              End if         Write(*,*) “a=”,a “b=”,b           end 点击查看答案