阅读程序:
Function fac(ByVal n As Integer)As Integer
Dim temp As Integer
temp=1
For i%=1 To n
temp=temp*i%
Next i%
fac=temp
End Function
Private Sub Form_Click()
Dim nsum As Integer
nsum=1
For i%=2 To 4
nsum=nsum+fac(i%)
Next i%
print nsum
End Sub
程序运行后,单击窗体,输出结果是
A.35
B.31
C.33
D.37
第1题:
【判断题】以下程序段将对a数组实现升序排序(N是符号常量) for(i=1;i<N;i++) for(j=0;j<N-i;j++) if(a[j]>a[j+1]) { temp=a[j]; a[j]=a[j+1]; a[j+1]=temp; }
A.Y.是
B.N.否
第2题:
【判断题】以下程序段将对a数组实现将序排序(N是符号常量) for(i=1;i<N;i++) for(j=0;j<N-i;j++) if(a[j]<a[j+1]) { temp=a[j]; a[j]=a[j+1]; a[j+1]=temp; }
A.Y.是
B.N.否
第3题:
3、下面程序的时间复杂度是()。 x=0 y=1 for (i=1; i<=n; ++i){ ++x; y=y*i }
A.O(1)
B.O(n)
C.O(1+n)
D.O(2+2n)
第4题:
以下程序是计算s=1-1/2+1/4-1/6+1/8+...+1/n的和,请填空。 double fun(int n) { double s=1.0,fac=1.0;int i; for(i=2;i<=n;i+=2) { fac=-fac; s=s+ ___________; } return s; }
第5题:
【判断题】以下程序段将把a的最大值移到末尾位置 for(i=0;i<N;i++) if(a[i]>a[i+1]) { temp=a[i]; a[i]=a[i+1]; a[i+1]=temp; }
A.Y.是
B.N.否