For i from 1 to 3中i是num数据类型。

#includevoidmain(){inti;intnum=1;for(i=2;i>=1;i--){num=(num+1)*2;}printf(num=%d,num);}（5.0分）

for i from 1 to 4 可以执行4次。

for i from 2 to 6 step 3语句可以被执行1次。

有如下程序#define N 2#define M N+1#define NUM 2*M+1main(){ int i;for(i=1;i<=NUM;i++)printf(%d\n,i);}该程序中的for循环执行的次数是（ ）

下列程序的运行结果是________。Dim a%(3,3),i%,j%For i=1 to 3a(I,i)=1:a(I,4-i)=1next iFor i=1 to 3For j=1 to 3Print a(I,j);next jPrintnext i

从键盘输入的数据依次是1,2,3,4,5,6,7,8,9,10,下面程序运行结果是______。 s=0 For i=1 To 10 x=Val(InputBox(\请输入x的值:\)) If x/3=Int(x/3) or x/5=x\\5 Then s=s+x Next i Print \s=

执行了下面的程序: Sub Form_Click() For i=1 To 6 List1.AddItem i Next For i=1 To 3 List1.RemoveItem i Next End Sub 列表框中的数据项为（ ）。

有以下程序main（){int num[4][4]={{1，2，3，4}，{5，6，7，8}，{9，10，11，12}，{13，14，15，16}}，i，j；for（i=

假定有以下程序段 n=0 for i=1 to 3 for j=-3 to 1 n=n+1 next j next i 运行完毕后，n的值是()。

有如下程序：definen 2definemN+1defineNUM2*m+1main（){int i;for（i=1;i＜=NUM;i++)printf（"%d\

下面函数的功能是统计子串substr在母串str中出现的次数，请填空使程序完整。 int count(char *str, char *substr) { int i,j,k,num=0; for(i=0; 【1】 ;i++) for(【2 】 ,k=0;substr[k]==str[j];k++,j++) if(substr [ 【3】 ]==’\0’) { num++ ; break ; } return (num); } 【1】应该填写：

在窗体上添加一个命令按钮，名为Command1，其单击事件中有如下程序段，则事件过程执行后，文本框中输出()。 For i= 1 To 4 For j = 1 To 3 x=3 For k =1 To 2 x=x+3 Next k Next j Next i TextText = Str(x)

下列程序段的执行结果为（)。 K=0 For J=1 to 2 For I = 1 to 3 K =I＋1 Next I For I = 1 to 7 K = K＋1 Next I Next J Print K

以下程序的输出结果为______。 Dim a（10) As Integer, p（3), i, k As Integer For i = 1 To 10 a（i) = 2 * （i - 1) + 1 Next i For i = 1 To 3 p（i) = a（i * i) Next i For i = 1 To 3 k = k + p（i) 2 Next i MsgBox（k)

请在下列程序中横线上填写适当的代码 使用递归函数，输出斐波拉契数列的前20位 def func（num): if num==1 or num==2: return 1 else: return print（"斐波拉契数列的前20位的数是：",end="") for i in range（1,21): print（func（i),end=" ")

以下代码实现数组的升序排序，横线处应填入int num[]={7,56,9,4,32};int temp;for（int i=0;i<num.length-1 for="" j="_________;j＜num.length;j++）{" if="" temp="num[i];" num=""></num.length-1>}（）

Dim i,j,x For i=i To 20 step 2 x=0 For j=i To 20 step 3 x=x+1 Next j Next i Textl.Value=Str（x) End Sub 文本框中显示的结果

下列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click（) Dim i As Integer Open ______ As 1 For i=1 To 10 Prin t1,i Next Close 1 End Sub

在C中，下列代码的运行结果是（)。int[]num=newint[]{1,3,5};ArrayListarr=newArrayList（);for（inti=0;i{arr.Add（num[i]);}arr.Insert（1,4);Console.Write（arr[2]);

下列程序的功能是：将数据1，2，…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click（) Dim i As IntegerOpen 【9】 As 1For i=1 To 10 Print 1 ,i Next Close 1End Sub

下列程序的功能是：将数据1,2…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click（) Dim i As Integer Open "Base. txt" For Output As 1 For i=1 To 10 【15】 Next Close 1 End Sub

4、以下程序的运行结果为（）。 Option Base 1 Private Sub command1_click（) Dim a（10), p（3) As Integer k = 5 For i = 1 To 10 a（i) = i Next i For i = 1 To 3 p（i) = a（i * i) Next i For i = 1 To 3 k = k + p（i) * 2 Next i Print k End Sub

14、下面程序输出的最小数为 for i,num in enumerate（（1,5)): print（num)

阅读程序： Option Base1 Private Sub Form_Click（) Dim a（3)As Integer Print“输入的数据是：”； For i＝1 To 3 a（i)=InputBox（“输人数据”) Print a（i)； Next Print If a（1) t=a（1) a（1)=a（2) a（2)=【8】 End If If a（2)>a（3) Then m=a