【单选题】10.以下哪个基数词是“四十”? ()
A.
B.
C.
D.
第4题
A.05,46,13,55,94,17,42
B.05,13,17,42,46,55,94
C.42,13,94,05,55,46,17
D.05,13,46,55,1 7,42,94
第5题
可以产生10~30(含10和30)之问的随机整数的表达式是( )。
A. Int(Rnd*11+20)
B. Int(Rnd*10+20)
C. Int(Rnd*30-Rnd*10)
D. Int(Rnd*10+30)
【我提交的答案】: B |
【参考答案与解析】: 正确答案:A |
A) 【解析】随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数。为了生成某个指定范围内的随机整数,可使用以下公式:
Int((upperbound.10werbound+1)*Rnd+lowerbound),其中upperbound是随机整数范围的上限,lowerbound是随机整数范围的下限。本题中upperbollnd为30,lowerbound为10。
int(Rnd*范围+基数) 这才是随机函数的表达式吧?
第7题
【说明】
在Visual Basic程序中,设计一个“个人所得税计算器”,其应用程序的运行窗口如图6-16所示。
窗口中的3个文本框和两个按钮的名称分别为Txt_salary、Txt_base、TxL_tax、Cmd_compute和 Cmd_quit。“个人所得税计算器”程序运行时,文本框Txt_base中存放的是免税金额基数(应扣除的基本费用)。当用户在文本框Txt_salary中输入月收入(工资或薪金)并单击【计算】按钮(Cmd_compute后,Txt_tax框中就显示计算所得的应纳税额。文本框Txt_base和Txt_tax在运行时不接受用户输入,Txt_base的内容以灰色显示。
个人工资(或薪金)所得税是按照超额累进的税率来征收的,其计算方法如下:以每月收入总额减去免税金额基数后的余额作为该月的月应纳税所得额,再将应纳税所得额按相应级数采用相应的税率进行累进计算。目前的免税金额基数为1 600元,税率如表6-15所示。
(注:本表所称全月应纳税所得额是指依照本法第六条的规定,以每月收入额减除费用1600元后的余额或者减除附加减除费用后的余额)
设某个人的全月应纳税所得额为M(元),用下面的公式计算其应缴纳的个人所得税额S(元):
若0<M≤500,则S=M×5%;
若500<M≤2000,则S=500×5%+(M-500)×10%;
若2000<M≤5000,则S=500×5%+1500×10%+(M-2000)×15%;
若5000<M≤20000,则S=500×5%+1500×10%+3000×15%+(M-5000)×20%;
假设某程序员2008年5月份工资总额为4700元,减去1600元后,应纳税所得额为3100元,其应缴纳的个人所得税额为500×5%+1500×10%+1100×15%=340元。
在开发过程中,需要编写的程序代码如下。
【Visual Bask程序】
Option Base 0
Private Sub Cmd compute-Click()
Dim paylevel,taxPrate
paylevel=Array(0,500,2000,5000,20000,40000,60000,80000,100000,1000001
taxPrate=Array(5,10,15,20,25,30,35,40,45)
M=(1)
S = 0
If (M>0) Then
For j =1 To 9
If (2) Then
s=s+(paylevel(j)-paylevel(j-1))*taxPrate(j-1)/100
Else
(3)
Exit For
End if
Next j
End if
(4)=Str$(S)
End Sub
Private Sub Cmd_quit_Click()
End
End Sub
Private Sub Form_Load()
Txt_tax.Text = " "
Txt_salary.Text = " "
Txt_base.Text = 1600
Txt_tax.Locked = True
Txt_base.Enabled =(5)
End Sub
请根据【说明】信息和如图6-16的显示效果,将【Visual Basic程序】中(1)~(5)空缺处的程序语句填写完整。
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!