更多"三个整数a、b、c,由键盘输入,输出其中最大的一个数。"的相关试题:
[多项选择]三个整数a、b、c,由键盘输入,输出其中最大的数。
[简答题]
有BASIC程序,10个数以递减次序排好放在数组中,由键盘输入一个数,查找此数是否在该数组中,如果是输出“YES”,不是输出“NO”。
10 N=10
20 DIM A(N)
30 FOR I=1TON
40 READ A(I)
50 NEXT I
60 X1=1:X2=N
70INPUT“X=”;X
80 P=
90 IF X=A(P) THEN PRINT “YES”:GOTO 150
100 IF THEN :GOTO 120
110 X2=
120 IF X2>X1 THEN 80
130 PRINT “NO”
140 DATA 95 ,86,78,70,63,57,48,39,20,10,
150 END
[简答题]输入三个整数x,y,z,请把这三个数由小到大输出。
[单项选择]有以下程序,其中%u表示按无符号整数输出:
main( )
unsigned int x=0xFFFF; /*x的初值为十六进制数*/
printf("%u/n", x);
程序运行后的输出结果是( )。
A. -1
B. 65535
C. 32767
D. 0xFFFF
[填空题]以下程序的功能是,产生10个0~1000的随机整数,放入数组Art中,然后输出其中的最大值。请填空。
Option Base 1
Private Sub Form Click( )
Dim Arr(10)As Integer
Dim Max As Integer
Randomize
For i=1 To 10
Arr(i)=Int(Rnd*1000)
Next i
Max= (14)
For i=2 To 10
If (15) Then
Max=Arr(i)
End If
Next i
Print Max
End Sub
[填空题]以下程序的功能是,产生10个0~1000的随机整数,放入数组Arr中,然后输出其中的最大值。请完善下列程序。
Option Base 1
Private Sub Form_Click( )
Dim Arr(10)As Integer
Dim Max As Integer
Randomize
For i = 1 To 10
Arr(i)= Int(Rnd * 1000)
Next i
Max = 【14】
For i = 2 To 10
If 【15】 Then
Max = Arr(i)
End If
Next i
Print Max
End Sub
[填空题]以下程序的功能是,产生10个0~1000之间的随机整数,放入数组Arr中,然后输出其中的最大值。请填空。
Option Base 1
Private Sub Form Click( )
Dim Arr(10) As Integer
Dim Max As Integer
Randomize
For I = 1 To 10
Arr(i) = Int (Rnd * 1000)
Next i
Max= ______
For i = 2 To 10
If______ Then
Max = Arr(i)
End If
Next i
Print Max
End Sub
[简答题]输入三个整型数,找出其中数值最大者并输出。
[单项选择]有下列程序,其中%u表示按无符号整数输出。
main( )
unsigned int x=0xFFFF;/*x的初值为十六进制数*/
printf("%u/n",x);
程序运行后的输出结果是()。
A. -1
B. 65535
C. 32767
D. 0xFFFF
[单项选择]
有以下程序,其中%u表示按无符号整数输出
main( )
unsigned int x=0xFFFF; /* x的初值为十六进制数 */
printf("%u/n",x);程序运行后的输出结果是()。
A. -1
B. 65535
C. 32767
D. 0XFFFF
[单项选择]纸上写着2、4、6三个整数,改变其中任意一个,将它改写成为其他两数之和减1,这样继续下去,最后可以得到的是( )。
A. 595、228、368
B. 44、95、50
C. 103、109、211
D. 159、321、163
[填空题]【说明8.1】
以下程序的功能是:生成20个200~300之间的随机整数,输出其中能被5整除的数并求出它们的和。
【程序代码8.1】
Private Sub Command1_Click( )
For i=1 To 20
x=Int( (1) *200+100)
If (2) =0 Then
Print x
S=S+ (3)
End If
Next i
Print"Sum=";S
End Sub
【说明8.2】
程序8.2运行后,单击窗体,则在窗体上显示的内容是:a= (4) 和b= (5) 。
【程序代码8.2】
Private Sub Form_Click( )
Dim a As Integer,b As Integer
a=20:b=50
p1 a,b
p2 a,b
p3 a,b
Print"a=";a,"b=";b
End Sub
Sub p1(x As Integer, ByValy As Integer)
x=x+l0
y=y+20
End Sub
Sub p2(ByVal×As Integer, y As Integer)
x=x+l0
y=y+20
End Sub
Sub p3(ByVal×As Integer, ByVal y As Integer)
x=x+10
y=y+20
End Sub
[填空题]【说明8.1】
以下程序的功能是:生成20个200~300之间的随机整数,输出其中能被5整除的数并求出它们的和。
【程序代码8.1】
Private Sub Command1_Click( )
For i=1 To 20
x=Int( (1) *200+100)
If (2) =0 Then
Print x
S=S+ (3)
End If
Next i
Print"Sum=";S
End Sub
【说明8.2】
程序8.2运行后,单击窗体,则在窗体上显示的内容是:a= (4) 和b= (5) 。
【程序代码8.2】
Private Sub Form_Click( )
Dim a As Integer,b As Integer
a=20:b=50
p1 a,b
p2 a,b
p3 a,b
Print"a=";a,"b=";b
End Sub
Sub p1(x As Integer, ByValy As Integer)
x=x+l0
y=y+20
End Sub
Sub p2(ByVal×As Integer, y As Integer)
x=x+l0
y=y+20
End Sub
Sub p3(ByVal×As Integer, ByVal y As Integer)
x=x+10
y=y+20
End Sub
[简答题]三个连续整数之和为42.
(1)三个连续正整数任意两个数乘积后的和为587;
(2)三个连续正整数的平方和为590.
[填空题]以下程序的功能是:生成20个200~300之间的随机整数,输出其中能被5整除的数并求出它们的和。请填空。
Prirate Sub Command1_Click( )
For i=1 To 20
x=Int(______*100+200)
If______=0 Then
Print x
S=S+ ______
End If
Next i
Print "Sum=";S
End Sub
[填空题]以下程序的功能是:生成20个200到300之间的随机整数,输出其中能被5整除的数并求出它们的和。请填空。
Private Sub Command1_Click( )
For i=i To 20
x=Int(______*101 +200)
If______=0 Then
Print x
S=S+______
Ena If
Next i
Print"Sub="; S
End Sub