dim a(1 to 10) as integer
private sub command1_click()
form_load
end sub
private sub form_load()
dimp as string 'p用來顯示隨機生成的10個數
randomize
p = ""
fori = 1 to 10 '生成10個隨機整數do
x =int(rnd * 90) + 10 '存放中間生成的乙個隨機整數，範圍是10到99之間的整數
yes= 0 '用來判斷生成的x要還是不要，0表示要，1表示不要
forj = 1 to i - 1 '對你生成的第乙個隨機整數進行檢測，檢測結果存放yes中
ifx = a(j) then yes = 1: exit for
next
loop while yes = 1
a(i) = x
p = p & str(a(i)) & ","
next
label1.caption = ltrim(left(p, len(p) - 1)) '用label顯示最後結果
end sub
判斷十個整數之和
程式要求 讀入10個整數，輸出所有正數之和，負數之和與所有整數之和。使用者可一次性輸入這10個整數，而且可以採用任何的順序。程式不應該要求使用者單獨輸入正數和負數。分析 根據上面的題目得知了以下資訊 1使用者輸入了十個正負整數，可一次性輸出。2輸出正數之和 3輸出負數之和 4輸出整數之和 所以可以從...
List小練習之隨機生成十個不重複數存入
分析以下需求，並用 實現 1 生成10個1至100之間的隨機整數 不能重複 存入乙個list集合 2 編寫方法對list集合進行排序 2 然後利用迭代器遍歷集合元素並輸出 3 如 15 18 20 40 46 60 65 70 75 91 public class demo return list ...
JS生成隨機整數
用js的隨機數生成函式random 配合其他數學函式可以限制隨機數的取值。math.random 結果為0 1間的乙個隨機數 包括0,不包括1 math.floor num 引數num為乙個數值，函式結果為num的整數部分。math.ceil n 返回大於等於n的最小整數。math.round nu...