已知十字花科植物的花程式为:﹡K2+2 C2+2 A2+4 G(2:1:∞) ,请用文字表述此花程式中包含的信息。
第1题:
阅读下列程序。
Option Base 1
Private Sub Form. Click()
Dim x(3,3)
For j=l to 3
For k=l to 3
If j=k then x(j,k)=l
If j<>k then x(j,k)=k
Next k
Next j
Call fun(x())
End Sub
Private Sub fun(x() )
For j=1 to 3
For k=1 to 3
Print x(j,k);
Next k
Next j
End Sub
运行程序时,输出结果为【 】
第2题:
下面程序的输出结果是( )。 #include"stdio.h" int sub(int m) { static a=4; a+=m; return a; } void main() { int i=2,j=1,k; k=sub(i); k=sub(j); printf("%d",k); }
A.6
B.7
C.8
D.9
第3题:
下面程序运行后,窗体中显示【 】。
Private Sub Command1_Click) ( )
aS ="*" :b$ ="$"
For k = 1 To 3
x$ =Strings (Len(a$) +k,b$ )
Print x $;
Next
End Sub
第4题:
为某个窗体编写如下事件,单击窗体,消息框显示的结果为【 】。
Private Sub Form_Click( )
Dim k As Integer ,n As Integer ,m As Integer
n=10:m=1:k=1
Do While k<=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub
第5题:
阅读以下程序:
Prlvate Sub Form_Click()
Dim k,n,m As Integer
n=10
m=1
k=1
Do While k<=n
m=m*2
k=k+1
Loop
Print m
End Sub程序运行后,单击窗体,输出结果为【 】。
第6题:
以下程序的输出结果是【 】。
main()
{ int x=0;
sub(&x,8,1);
printf(“%d\n”,x);
}
sub(int *a,int n,int k)
{ if(k<=n)sub(a,n/2,2*k);
*a+=k;
}
第7题:
以下程序的输出结果是( )。
include<stdio.h>
main()
fint x=0;
sub(&x,16,2);
printf("%d\n",x);
}
sub(int*a,int n,int k)
{if(k<=n) sub(a,n/2,2*k);
*a+=k;
}
第8题:
设有如下程序: Private Sub Command1_Click() Dim sum As Double, k As Double sum=0 n=0 For i=1 To 5 k=n/i n=n+1 sum=sum+k Next End Sub 该程序通过For循环计算一个表达式的值,这个表达式是______。
A.1+1/2+2/3+3/4+4/5
B.1+1/2+2/3+3/4
C.1/2+2/3+3/4+4/5
D.1+1/2+1/3+1/4+1/5
第9题:
十字花科的花程式为( )。
第10题:
下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch:Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch,k,1) Next k ch=s End Sub A.ABCDEF B.FEDCBA C.A D.F