某人为计算n!(0<n<=12)编写了下面的函数过程:Private Function fun(n As Integer)As Long Dim p As Long p=1 For k=n-1 To 2 Step-1 p=p * k Next k fun=p End Function 在调试时发现该函数过程产生的结果是错误的,程序需要修改。下面的修改方案中有3种是正确的,错误的方案是( )。
A.把p=1改为 p=n
B.把For k=n-1 To 2 Step-1 改为 For k=1 To n-1
C.把For k=n-1 To 2 Step-1 改为 For k=1 To n
D.把For k=n-1 To 2 Step-1 改为 For k=2 To n
热度🔥330
解析:打开微信小程序查看本题解析
点击打开小程序查看解析
下列叙述中正确的是
有以下程序
#include
struct STU{ char name[9]; char sex; int score[2]; } ;
void f( struct STU a[] )
{ struct STU b = {"Zhao", 'm', 85, 90};
a[1] = b;
}
main()
{ struct STU c[2]={ {"Qian", 'f', 95, 92}, {"Sun", 'm', 98, 99} };
f(c);
printf( "%s,%c,%d,%d,", c[0].name, c[0].sex, c[0].score[0], c[0].score[1] );
printf( "%s,%c,%d,%d\n", c[1].name, c[1].sex, c[1].score[0], c[1].score[1] );
}
程序运行后输出结果是
在窗体上画一个名为Command1的命令按钮,然后编写如下代码:Option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4) j=1 For i=4 To 1 Step-1 s=s+a(i)* j j=j * 10 Next i Print s End Sub 运行上面的程序,其输出结果是( )。