网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

(14)下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位置。请填空。 Option Base1 Private Sub Form_Click() Dim x x=Array(57,-9,17,42,-31,46,11,8,6,-4,3,90) Max=1 For k=2 To 10 Step 1 If x(k)>x(Max)Then End If Next k y=_______ Print Max,y End Sub


参考答案

更多 “ (14)下列程序的功能是:找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位置。请填空。 Option Base1 Private Sub Form_Click() Dim x x=Array(57,-9,17,42,-31,46,11,8,6,-4,3,90) Max=1 For k=2 To 10 Step 1 If x(k)x(Max)Then End If Next k y=_______ Print Max,y End Sub ” 相关考题
考题 若有如下程序: SET TALK OFF INPUT TO X FOR i=1 TO 3 INPUT TO Y IF Y>X X=Y ENDIF ENDFOR ?X RETURN 本程序的功能是( )。A.求3个数中的最大值B.求4个数中的最大值C.求3个数中的最小值D.求4个数中的最小值

考题 下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来 10个数中的位置。请在下划线处填入适当的内容,将程序补充完整。Option Base 1Private SubForm_Cfick()Dim Xx=Array(23,-5,17,38,-31,46,11,8,5,-4)Max=1k=110 k=k+1ifx(k)>x(max)then[13]End if

考题 五个数中,最小的是12,从第一个数起,每一个数都比前一个数大5,这五个数的平均数是多少?( )A.22B.22.5C.23D.23.5

考题 下面程序的功能是找出给定的12个数中最大的一个数,然后输出这个数以及它在原来12个数中的位置。请在下划线处填入适当的内容,将程序补充完整。Option Base 1Private Sub Form_Click0Dim xx = Array(57,-9,17,42,-31,46,11,8,6,-4,3,90)Max= 1For k = 2 To 10 Step 1If x(k)>x(Max) Then______End IfNext ky=______Print Max, yEnd Sub

考题 五个数中,最小的是12,从第二个数起,每一个数都比前一个数大5,这五个数的平均数是( )。A.22B.22.5C.23D.23.5

考题 填空:(1)一个数的平方等于它本身,这个数是___________;一个数的平方根等于它本身,这个数是______;一个数的算术平方根等于它本身,这个数是_____________。(2)一个数的立方等于它本身,这个数是________________;一个数的立方根等于它本身,这个数是_______________。

考题 请编写函数fun,其功能是:计算并输出给定10个数的方差:例如,给定的10个数为95.0、89.0、76.0、65.0、88.0、72.0、85.0、81.0、90.0、56.0,输出为s=11.730729。注意:部分源程序在文件PROGl.C中。请勿改动主函数main和其他函数中的任何内容,仅在函数fun的花括号中填入你编写的若干语句。

考题 请编写函数proc(),其功能是:计算并输出给定10个数的方差。例如,给定的10个数为88.0,89.5,54.0,78.5,89.0,63.0,85.7,83.0,77.0,83.0,则输出为S=11.195271。注意:部分源程序给出如下。请勿改动main()函数和其他函数中的任何内容,仅在函数proc()的花括号中填人所编写的若干语句。试题程序:

考题 求斐波那契(Fobonacci)数列的前40个数。这个数列有如下特点:第1、2个数均为1,从第3个数开始,每个数均是前两个数之和。问该数列的前40个数各是多少? 提示:每行输出5个数据,每个数据输出宽度为12个字符。