用随机函数rnd()随机产生十道1-19之间的整数减法算式(被减数一定大于或等于减数)并输出该算式。 要求: (1)用流程图描述该算法。 (2)用vb语言编写程序。

admin2017-05-05  30

问题 用随机函数rnd()随机产生十道1-19之间的整数减法算式(被减数一定大于或等于减数)并输出该算式。
    要求:
(1)用流程图描述该算法。
(2)用vb语言编写程序。

选项

答案(1) [*] (2) Private Sub Form_Click() Dim a As Integer,b As:Integer,c As Integer,i As Integer i=1 Do While(i<=10) Randomize a=Int((19*Rnd)+1) b=Int((19*Rnd)+1) If a<b Then c=a:a=b:b=c Print a:”-”;b i=i+1 Loop End Sub

解析
转载请注明原文地址:https://kaotiyun.com/show/Ah7v777K
0

最新回复(0)