Случайное число, с шансом выпадения после 20 меньше, чем до 20 - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Как сделать к примеру: рандом от 1 до 100. Что бы шанс выпадения после 20 был меньше, чем до 20?

Решение задачи: «Случайное число, с шансом выпадения после 20 меньше, чем до 20»

textual
Листинг программы 
Dim rnd As New Random()
Const Probability20 As Double = 0.6 ' Вероятность генерации числа от 1 до 20
Dim num As Integer = If(rnd.NextDouble()<Probability20, rnd.Next(1,20), rnd.Next(20,100))

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.375 из 5
Похожие ответы