填空题 下列程序的运行结果是（）。  Program test      Implicit none      Integer,parameter:: limit=10      Integer counter      Integer:: ans=0      Counter=2     do while(counter<=limit)      ans=ans+counter      counter=counter+2   end do Wrte(*,*)ans end

填空题 下列程序的运行结果是（）。  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