手机扫描二维码答题
00:00:00
2.3程序的选择结构
录音中...
2.3程序选择结构
答案只给出了一个答案，但部分题的答案并不是唯一答案，例如 系统给出的答案 x+y，但是填写的时候，y+x也是正确的，请各位同学自己随机应变。
*
您的姓名：
*
您的学号：
*
您的班级：
1班
2班
3班
4班
5班
6班
7班
8班
9班
10班
11班
12班
13班
14班
15班
16班
17班
18班
19班
20班
21班
22班
23班
24班
25班
26班
27班
28班
29班
30班
*
1.
已知变量a的值为178，判断其奇偶性，是偶数则让变量X的值为0，是奇数则让变量x的值为1。请将程序缺失部分“___”补充完整：
Function func()
Dim a As Integer, x As Integer
___= 178
If a / 2 = Int(a / 2) Then
x = 0
Else
x = 1
End If
func = x
End Function
*
2.
已知变量a的值为178，判断其奇偶性，是偶数则让变量X的值为0，是奇数则让变量x的值为1。请将程序缺失部分“___”补充完整：
Function func()
Dim a As Integer, x As Integer
a = 178
If ___ = Int(a / 2) Then
x = 0
Else
x = 1
End If
func = x
End Function
*
3.
计算房租费，收费标准为：面积70平方米以下（包括70）按4元/平方米，超过70平方米的部分按6元/平方米计算。m表示租房面积，n表示房租费。请将程序缺失部分“————”补充完整：
Function func()
Dim m As Integer, n As Integer
___= 128
If m <= 70 Then
n = 4 * m
Else
n = 4 * 70 + 6 * (m - 70)
End If
func = "房租费n=" & n
End Function
*
4.
已知变量a的值为178，判断其奇偶性，是偶数则让变量X的值为0，是奇数则让变量x的值为1。请将程序缺失部分“___”补充完整：
Function func()
Dim a As Integer, x As Integer
a = 178
If a / 2 = Int(a / 2) Then
x= ___
Else
x = 1
End If
func = x
End Function
*
5.
计算房租费，收费标准为：面积70平方米以下（包括70）按4元/平方米，超过70平方米的部分按6元/平方米计算。m表示租房面积，n表示房租费。请将程序缺失部分“————”补充完整：
Function func()
Dim m As Integer, n As Integer
m = 128
If m <= 70 Then
n = _____
Else
n = 4 * 70 + 6 * (m - 70)
End If
func = "房租费n=" & n
End Function
*
6.
计算房租费，收费标准为：面积70平方米以下（包括70）按4元/平方米，超过70平方米的部分按6元/平方米计算。m表示租房面积，n表示房租费。请将程序缺失部分“————”补充完整：
Function func()
Dim m As Integer, n As Integer
m = 128
If m <= 70 Then
n = 4 * m
Else
n = _____________
End If
func = "房租费n=" & n
End Function
*
7.
计算房租费，收费标准为：面积70平方米以下（包括70）按4元/平方米，超过70平方米的部分按6元/平方米计算。m表示租房面积，n表示房租费。请将程序缺失部分“————”补充完整：
Function func()
Dim m As Integer, n As Integer
m = 128
If ___<=70 Then
n = 4 * m
Else
n = 4 * 70 + 6 * (m - 70)
End If
func = "房租费n=" & n
End Function
*
8.
购物计费：某商场为了促销而实行购物打折，在商场购物低于500元（包括500元）不打折，超过500元的部分实行八折优惠。已知某顾客购物按未打折共计花费了898元，编程计算顾客“实际应付的金额”。a表示顾客的购物金额，x表示顾客应该实际付给商场的金额，请将程序缺失部分“——“补充完整
”
Function func()
Dim a As Single, x As Single
a = 898
If ____<=500 Then
x = a
Else
x = 500 + (a - 500) * 0.8
End If
func = "应付金额x=" & x
End Function
*
9.
计算房租费，收费标准为：面积70平方米以下（包括70）按4元/平方米，超过70平方米的部分按6元/平方米计算。m表示租房面积，n表示房租费。请将程序缺失部分“————”补充完整：
Function func()
Dim m As Integer, n As Integer
m = 128
If m <= 70 Then
n = 4 * m
Else
n = 4 * 70 + 6 * (m - 70)
________
func = "房租费n=" & n
End Function
*
10.
购物计费：某商场为了促销而实行购物打折，在商场购物低于500元（包括500元）不打折，超过500元的部分实行八折优惠。已知某顾客购物按未打折共计花费了898元，编程计算顾客“实际应付的金额”。a表示顾客的购物金额，x表示顾客应该实际付给商场的金额，请将程序缺失部分“——“补充完整
Function func()
Dim a As Single, x As Single
a = 898
If a <= 500 Then
_________
Else
x = 500 + (a - 500) * 0.8
End If
func = "应付金额x=" & x
End Function
*
11.
购物计费：某商场为了促销而实行购物打折，在商场购物低于500元（包括500元）不打折，超过500元的部分实行八折优惠。已知某顾客购物按未打折共计花费了898元，编程计算顾客“实际应付的金额”。a表示顾客的购物金额，x表示顾客应该实际付给商场的金额，请将程序缺失部分“——“补充完整
Function func()
Dim a As Single, x As Single
a = 898
If a <= 500 Then
x = a
Else
x=________________
End If
func = "应付金额x=" & x
End Function
*
12.
购物计费：某商场为了促销而实行购物打折，在商场购物低于500元（包括500元）不打折，超过500元的部分实行八折优惠。已知某顾客购物按未打折共计花费了898元，编程计算顾客“实际应付的金额”。a表示顾客的购物金额，x表示顾客应该实际付给商场的金额，请将程序缺失部分“——“补充完整
Function func()
Dim a As Single, x As Single
a = 898
If a <= 500 Then
x = a
______
x = 500+(a-500)*0.8
End If
func = "应付金额x=" & x
End Function
*
13.
雅西高速于2012年4月29日正式修成通车。假设该高速公路的收费标准是，在该高速路上行驶100公里以上（不包含100公里）的车辆0.4元/公里。下列程序的功能是计算车辆应该缴纳的费用。x表示车辆在该高速路上行驶的公里数，y表示应收费用。请将程序缺失部分“—”补充完整：
Function func()
Dim x As Single
Dim y As Single
x = 140
If x <= 100 _________
y = 0.5 * x
Else
y = 0.4 * x
End If
func = "该车辆应交纳的费用y=" & y
End Function
*
14.
在2012年，苹果公司推出了新产品“new Ipad”，售价定位4800元/台。为了促销，某商场实行了如下的销售策略，一次购买3台以上（不包含3台）的，实行9折优惠。下列程序的功能是计算顾客应付的金额。x表示该顾客购买的台数，y表示应付金额。
请将程序缺失部分“——”补充完整：
Function func()
Dim x As Single
Dim y As Single
x = 4
If ___________ Then
y = 0.9 * x * 4800
Else
y = x * 4800
End If
func = "顾客应付的金额y=" & y
End Function
*
15.
雅西高速于2012年4月29日正式修成通车。假设该高速公路的收费标准是，在该高速路上行驶100公里以上（不包含100公里）的车辆0.4元/公里。下列程序的功能是计算车辆应该缴纳的费用。x表示车辆在该高速路上行驶的公里数，y表示应收费用。请将程序缺失部分“—”补充完整：
Function func()
Dim x As Single
Dim y As Single
x = 140
If x <= 100 Then
y = 0.5 * x
Else
y=________
End If
func = "该车辆应交纳的费用y=" & y
End Function
*
16.
在2012年，苹果公司推出了新产品“new Ipad”，售价定位4800元/台。为了促销，某商场实行了如下的销售策略，一次购买3台以上（不包含3台）的，实行9折优惠。下列程序的功能是计算顾客应付的金额。x表示该顾客购买的台数，y表示应付金额。
请将程序缺失部分“——”补充完整：
Function func()
Dim x As Single
Dim y As Single
x = 4
If x>3 Then
y = 0.9 * x * 4800
_____
y = x * 4800
End If
func = "顾客应付的金额y=" & y
End Function
*
17.
在2012年，苹果公司推出了新产品“new Ipad”，售价定位4800元/台。为了促销，某商场实行了如下的销售策略，一次购买3台以上（不包含3台）的，实行9折优惠。下列程序的功能是计算顾客应付的金额。x表示该顾客购买的台数，y表示应付金额。
请将程序缺失部分“——”补充完整：
Function func()
Dim x As Single
Dim y As Single
x = 4
If x>3 Then
y = _______
Else
y = x * 4800
End If
func = "顾客应付的金额y=" & y
End Function
*
18.
在2012年，苹果公司推出了新产品“new Ipad”，售价定位4800元/台。为了促销，某商场实行了如下的销售策略，一次购买3台以上（不包含3台）的，实行9折优惠。下列程序的功能是计算顾客应付的金额。x表示该顾客购买的台数，y表示应付金额。
请将程序缺失部分“——”补充完整：
Function func()
Dim x As Single
Dim y As Single
x = 4
If x>3 Then
y = 0.9 * x * 4800
Else
y = ______
End If
func = "顾客应付的金额y=" & y
End Function
评价对象得分
字体大小
