Red de conocimiento informático - Problemas con los teléfonos móviles - Utilice VB para escribir un programa que simule el juego de dados con una computadora. Escriba un programa para contar el número de veces que aparece cada punto después de N lanzamientos de un dado.

Utilice VB para escribir un programa que simule el juego de dados con una computadora. Escriba un programa para contar el número de veces que aparece cada punto después de N lanzamientos de un dado.

Sub privado form_load()

Dim n, a(), i.b(5)

n = 100000

I, b(5)

n = 100000

ReDim a(n - 1)

Para i = 0 To n - 1

Aleatorizar

a(i) = Int( Rnd * 6) + 1

b(a(i) -1) = b(a(i) - 1) + 1

Para i = 0 a 5

Imprimir "El número del dado lanzado " & i + 1 & "es: " & b(i)

Fin Sub