日韩欧美亚洲 _ 欧美亚洲一区 _ 日本亚洲欧美 _ 亚洲精品欧美国产白袜脚足J棉袜在线观看_亚洲熟妇av一区二区三区_久久天天躁狠狠躁夜_精品众筹模特私拍在线

填空題

下列程序的運(yùn)行結(jié)果是（）。
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

答案： 30

你可能感興趣的試題

下列程序的運(yùn)行結(jié)果是（）。
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

答案： 12000

下列程序的運(yùn)行結(jié)果是（）。
Program test
Implicit none
Integer::sum,i
sum=0.0
do i=1,203,2
sum=sum+i
end do
write(,) i
end

答案： 10302