题目内容

随机生成的10个两位数，求出它们的总和与平均数。产生两位数采用的算法如下：分别产生个位数(0～9)和十位数(1～9)，然后十位数乘10再加上个位数即得到一个两位数。说明：在窗体上有一个Commandl按钮，单击它将计算10个随机数的和与平均数，并在窗体上输出平均数。 Private Sub Commandl Click() Dim m As Integer, n As Integer, sum As Integer Dim i As Integer, k As Integer, aver As Single sum=0 Randomize For i＝1 To 10 m＝Int(9RnD) +1 n= 【9】 k=m10+n sum= 【10】 Next i aver= 【11】 Print aver End Sub

查看答案

搜索结果不匹配？点我反馈

更多问题

关于美国宪法说法正确的是（）

A. 它不同于一般法律，而是一切法律之源
B. 它的效力等同于普通法律
C. 它按一般程序废除
D. 任何法院都无权对它进行解释

有如下用户定义类型及操作语句： Type Student SNo As String Sname As String SAge As Integer End Type Dim Stu As Student With Stu ．SNo="200609001" ．SName="陈果果" ．SAge=19 End Wifh 执行MsgBox Stu．SAge后，消息框输出结果是______。

德国法认为哪些错误可以产生撤销合同的后果______

A. 在合同性质上发生的错误
B. 意思表示内容的错误
C. 意思表示形式上的错误
D. 在认定当事人上发生的错误
E. 在凭说明的买卖中，对说明的含义的理解发生错误

美国法把合同义务统称为______

A. 条件
B. 允诺
C. 承诺
D. 担保