更多"下列程序功能是,产生10个0~100的随机数,输出其中的最大值。请将程"的相关试题:
[填空题]下列程序功能是,产生10个0-100的随机数,输出其中的最大值。请将程序补充完整。
Private Sub Form_Click( )
Dim an(10)As Integer
Dim max As Integer
Randomize
For i%=1 To 10
an(i%)= 【10】
Next
max=an(1)
For i%=2 to 10
if an(i%)>max then
max=an(i%)
End If
Next
Print max
End Sub
[填空题]下列程序功能是,产生10个0~100的随机数,输出其中的最大值。请将程序补充完整。
Private Sub Form_Click( )
Dim an(10) As Integer
Dim max As Integer
Randomize
For i%=1 To 10
an(i%)=______
Next
max=an(1)
For i%=2 to 10
if an(i%) >max then
max=an(i%)
End IF
Next
Print max
End Sub
[简答题]本题程序的功能是随机产生一个1~10的随机数,根据提示,用户可以猜这个随机数。例如程序随机产生的随机数是7,如果输入8,则提示“Try smaller…”并继续提示输入;如果输出6,则提示“Try bigger…”并继续提示输入;如果输入7,则会输出“Great!”并退出程序。请将下述程序补充完整(注意:不得改动程序的结构,不得增行或删行)。
import java.io.*;
public class basic
public static void main(String[] args)
InputStreamReader it;
Bur feredReader in;
Ir = new InputStreamReader(System.in)
In = new BufferedReader(ir);
int ranNum = ______;
int guessNum = -1;
String str;
while (______)
System.out.print ("Please Input:");
try
______;
guessNum = Integer.parseInt(str);
catch (Exception e)
if(guessNum > ranNum)
System.out.println("Try smaller...");
else
System.out.println("Try bigger...");
System.out.println ("Great ! ");
[简答题]利用随机函数rand( )生成10个整型随机数,输出它们之中的最大值和最小值;如果把最大值和最小值之和的一半称为中间值,输出所有大于中间值的数。
[填空题]以下程序的功能是:借助指针变量找出数组元素中最大值所在的位置并输出该最大值。
请在输出语句中填写代表最大值的输出项。
#include<stdio.h>
main( )
int a[10], *p,*s;
for(p=a; p-a<10; p++) scanf("%d", p);
for(p=a, s=a; p-a<10; p++)if(*p>*s)s=p;
printf("max=%d/n",______);
[填空题]以下程序的功能是:借助指针变量找出数组元素中最大值所在的位置并输出该最大值。请在输出语句中填写代表最大值的输出项。
#include<stdio.h>
main( ){
int a[10], *p, *s;
for(p=a;p-a<10;p++) scanf("%d", p);
for(p=a, s=a;p-a<10;p++) if(*p>*s) s=p;
printf("max=%d/n", ______);
}
[简答题]本题程序的功能是随机产生50个0~100间的随机数,并计算70~80间随机数的个数(包括70,不包括80)。请将下述程序补充完整(注意:不得改动程序的结构,不得增行或删行)。
public class basic
public static void main(String[] args)
int result = 0;
int i = 0;
int randomNum;
while (i<50)
randomNum =______;
if(______)
result ++;
______;
System.out.println("result =" + result);
[单项选择]有如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command1_Click( )
Dim a(10) As Integer, max As Integer
For k=1 To 10
a(k)=InputBox("输入一个整数")
Next k
max=0
For k=1 To 10
If a(k)>max Then
max=a(k)
End If
Next k
Print max
End Sub
运行程序时发现,当输入10个整数时,可以得到正确结果;但输入10个负数时结果是错误的。程序需要修改,下列修改中可以得到正确运行结果的是
A. 把If a(k)>max Then改为If a(k)<max Then
B. 把max=a(k)改为a(k)=max
C. 把第二个循环语句For k=1 To 10改为For k=2 To 10
D. 把max=0改为max=a(10)
[单项选择]某人编写了下列程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command1_Click( )
Dim a(10) As Integer, max As Integer
For k=1 To 10
a(k)=InputBox("输入一个整数")
Next k
max=0
For k=1 To 10
If a(k)>max Then
max=a(k)
End If
Next k
Print max
End Sub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的。程序需要修改。下列修改中可以得到正确运行结果的是( )。
A. 把Ifa(k)>max Then 改为 If a(k)<max Then
B. 把max=a(k)改为a(k)=max
C. 把第2个循环语句For k=1 To 10改为For k=2 To 10
D. 把max=O改为max=a(10)
[单项选择]某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:
Private Sub Command1_Click( )
Dim a(10) As Integer, max As Integer
For k = 1 To 10
a(k) = InputBox("输入一个整数")
Next k
max = 0
For k = 1 To 10
If a(k) > max Then
max = a(k)
End If
Next k
Print max
End Sub
运行程序时发现,当输入10个正数时,可以得到正确结果,但输入10个负数时结果是错误的,程序需要修改。下面的修改中可以得到正确运行结果的是( )。
A. 把If a(k)>max Then改为If a(k)<max Then
B. 把max=a(k)改为a(k)=max
C. 把第2个循环语句For k = 1 To 10改为For k = 2 To 10
D. 把max=0改为max=a(10)