填空题

设有以下函数过程： Function fun(m As Integer) As Integer Dim k As Integer, sum As Integer sum = 0 For k = m To 1 Step -2 sum = sum + k Next k fun = sum End Function 若在程序中用语句s=fun(10)调用此函数，则s的值为 _________。

【参考答案】

30
<上一题 目录 下一题>
热门 试题

填空题
对长度为10的线性表进行冒泡排序，最坏情况下需要比较的次数为_________。
填空题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=0Do Until x=-1a=lnputBox( 请输入第一个数字a的值 )a=Val(a)b=InputBox( 请输入第二个数字b的值 )b=Val(b)x=InputBox( 请输入第三个数字x的值 )x=Val(x)a=a+b+xLoopPrint aEnd Sub在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为【 】。
相关试题