网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
下面程序的功能是由随机函数产生100个在200～700之间的整数，然后找出最大者，并记下是第几个数，但程序不完整，请选择适当的内容在下划线处将程序补充完整。 Dim a(100) For j=1 To 100 a(j)=Int(Rnd*501+200)：Print a(j) Next j : Print p=1 : max= ______ For j=2 To 100 If a(j)＞max Then max=a(j) : p=j Next j Print "The largest number is " ; max Print "The position is"; p End
A．0
B．a(1)
C．1.7E+38
D．1.7E-38
参考答案
更多 “ 下面程序的功能是由随机函数产生100个在200～700之间的整数，然后找出最大者，并记下是第几个数，但程序不完整，请选择适当的内容在下划线处将程序补充完整。 Dim a(100) For j=1 To 100 a(j)=Int(Rnd*501+200)：Print a(j) Next j : Print p=1 : max= ______ For j=2 To 100 If a(j)＞max Then max=a(j) : p=j Next j Print "The largest number is " ; max Print "The position is"; p EndA．0B．a(1)C．1.7E+38D．1.7E-38 ” 相关考题
考题
下面的程序的作用是利用随机函数产生10个100~300（不包含300） 之间的随机整数，打印其中7的倍数的数，并求它们的总和，请填空。Sub TOF（）RandomizeDim s As DoubleDim a（10） As IntegerFor i=0 To 9【10】NextFor i=0 To 9If 【11】 ThenPrint a（i）s=s + a（i）【12】Next iPrintPrint "S="; sEnd Sub
考题
有如下事件过程，程序的功能是()。 Private Sub Commandl _Click ( ) S1=0: S2=0 M1=0: M2=0 N=1 Do while N：A. 求101以内奇数之和B. 求101以内偶数之和C. 随机产生100个0-100之间的整数，并分别求这些数的奇数和与偶数的个数与和D. 随机产生101个0-100之间的整数，并分别求这些数的奇数和与偶数的个数与和
考题
以下程序的功能是，产生10个0～1000之间的随机整数，放入数组Arr中，然后输出其中的最大值。请填空。Option Base 1Private Sub Form. Click()Dim Arr(10) As IntegerDim Max As IntegerRandomizeFor I = 1 To 10Arr(i) = Int (Rnd * 1000)Next iMax= ______For i = 2 To 10If______ThenMax = Arr(i)End IfNext iPrint MaxEnd Sub
考题
给定程序MODll．C中函数fun的功能是：找出100至n(不大于1000)之间三位数字相等的所有整数，把这些整数放在s所指数组中，个数作为函数值返回。请改正函数fun中指定部位的错误，使它能得出正确的结果。注意：不要改动main函数，不得增行或删行，也不得更改程序的结构!
考题
从键盘输入一组无符号整数并保存在数组arr[N]中，以整数0结束输入，即第N+1个数是0，要求这些数的最大位数不超过4位，其元素的个数通过变量num传人函数proc()。请补充函数proc()，其功能是：从数组arr中找出个位和十位的数字之和大于5的所有无符号整数，结果保存在数组yy中，其个数由函数proc返回。例如，当arr[8]={13，1，205，252，2，333，4444，21)时实际输人时，数与数之间用Enter键分开，bb[4]={252，333，4444)。注意：部分源程序给出如下。请勿改动函数main()和其他函数中的任何内容，仅在函数proc()的横线上填入所编写的若干表达式或语句。试题程序：
考题
编写一个程序实现以下功能： （1）产生5000个1～9999之间的随机整数，将其存入文本文件a.txt中。 （2）从文件中读取这5000个整数，并计算其最大值、最小值和平均值并输出结果。
考题
截图和附件 函数 用函数maxcd求两个整数的最大公约数，并用主程序输入两个数，利用函数求他们的最大公约数并输出
热门标签
最新试卷
