下列程序的運行結果是()。 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
下列程序運行結果為()。 Program main Implicit none Integer::floor=5,i Do i=1, floor If(i==3)cycle If(i==4)cycle Write(*,*)i End do end