某人为计算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
EndFunction
在调试时发现该函数过程产生的结果是错误的,程序需要修改。下面的修改方案中有3种是正确的,错误的方案是
A.把P=1改为P=n
B.把For k=n-1 To 2 Step-1改为For k=1 To n-l
C.把For k=n-1 T02 Step-1改为Fork=1 To n
D.把For k=n-1 To 2 Step-l改为FOr k=2 To n
(34 )某人设计了下面的函数 fun ,功能是返回参数 a 中数值的位数
Function fun(a As Integer) As Integer
Dim n%
n = 1
While a \ 10 >= 0
n = n + 1
a = a \ 10
Wend
fun = n
End Function
在调用该函数时发现返回的结果不正确 , 函数需要修改 , 下面的修改方案中正确的是
A ) 把语句 n = 1 改为 n = 0
B ) 把循环条件 a \ 10 >= 0 改为 a \ 10 > 0
C ) 把语句 a = a \ 10 改为 a = a Mod 10
D ) 把语句 fun = n 改为 fun = a
(33)假定有以下函数过程:
Function Fun(S As String)As String
Dim s1 As String
For i=1 To Len(S)
s1=LCase(Mid(S, i, 1))+s1
Next i
Fun=s1
End Function
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim Str1 As String, Str2 As String
Str1=InputBox("请输入一个字符串")
Str2=Fun(Str1)
Print Srt2
End Sub
程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定”按钮后在窗体
上的输出结果为()。
A)ABCDEFG
B)abcdefg
C)GFEDCBA
D)gfedcba
A.double fun(double a[15])
B.double fun(double *a)
C.double fun(double a[])
D.double fun(double a)
假定有以下函数过程: Function Fun(S As String) As String Dim s1 As String For i=1 To Len(S) s1 = UCase(Mid(S, i, 1)) +s1 Next i Fun =s1 End Function 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim Str1 As String, Str2 As String Strl = InputBox(“请输入一个字符串”) Str2=Fun(Str1) Print Str2 End Sub 程序运行后,单击命令按钮,如果在输入对话框中输入字符串“abcdefg”,则单击“确定” 按钮后在窗体上的输出结果为,
A.abcdefg
B.ABCDEFG
C.gfedcba
D.GFEDCBA
} 则以下选项中错误的fun函数首部是()。 、
A.double fun(double a[l5])
B.double fun(double *a) 。
C.double fun(double a[])
D.double fun(double a)
以下程序中,函数 fun 的功能是计算 x 2-2x+6 ,主函数中将调用 fun 函数计算:
y1=(x+8) 2-2 (x+8)+6
y2=sin 2(x)-2sin(x)+6
请填空。
#include "math.h"
double fun(double x){ return (x*x-2*x+6); }
main()
{ double x,y1,y2;
printf("Enter x:"); scanf("%lf",&x);
y1=fun(【 11 】 );
y2=fun(【 12 】 );
printf("y1=%lf,y2=%lf\n",y1,y2);
}
请编写函数fun,其功能是:计算并输出
例如,在主函数中从键盘给n输入20后,输出为:s=534.188884。
注意:要求n的值大于1但不大于100。
部分源程序在文件PROGl.C中。
请勿改动主函数main和其他函数中的任何内容,仅在函数fun的花括号中填入你编写的若干语句。