0

最近、SmallBasic でプログラミングを始めましたが、乱数が既に配列に含まれているかどうかを確認できるかどうか疑問に思っていました。これまでの私のコード:

Count = 10
For i = 1 to Count
  var[i] = Math.GetRandomNumer(100)
  TextWindow.Write(var[i] + ‘,’)
Endfor 

前もって感謝します:)

4

2 に答える 2

1

これはうまくいくようです:

Count = 10

For i = 1 to Count+1
  If (duplicate) Then
    i = i - 1 
    duplicate = "False"
  EndIf

  var[i] = Math.GetRandomNumber(10)

  For u = 1 To i-1
    If var[i] = var[u] Then
      duplicate = "True"
      EndIf
    EndFor
  Endfor 


  For y = 1 To Count
    TextWindow.Write(var[y] + ", ")
  EndFor
于 2018-05-16T14:21:38.080 に答える