Código de Visual C++ .NET - Números aleatorios

<<>>
sin imagen de perfil
Val: 8
Ha mantenido su posición en Visual C++ .NET (en relación al último mes)
Gráfica de Visual C++ .NET

Números aleatoriosgráfica de visualizaciones


Visual C++ .NET

Publicado el 17 de Julio del 2018 por Cesar
894 visualizaciones desde el 17 de Julio del 2018
Código que va buscando dos números aleatorios hasta que coincidan.

1.1

Actualizado el 20 de Julio del 2018 (Publicado el 17 de Julio del 2018)gráfica de visualizaciones de la versión: 1.1
895 visualizaciones desde el 17 de Julio del 2018
estrellaestrellaestrellaestrellaestrella
estrellaestrellaestrellaestrella
estrellaestrellaestrella
estrellaestrella
estrella

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
Module Module1
 
    Sub Main()
        'Inicio
 
        Dim A, B, C As Integer
        'Entero : A B C=0
        C = 0
 
        Dim aleatorio As New Random
        ' genere numeros
 
        Do
            'Repetir
 
            A = aleatorio.Next(1, 11)
            'A= Generar un número aleatorio(1 al 10)
 
            B = aleatorio.Next(1, 11)
            'B= Generar un número aleatorio
 
            If (A = B) Then
                'Si(A=B) entonces
 
                Console.WriteLine("Terminar algoritmo")
                'Términar algoritmo
 
            Else
                'Sino
 
                Console.WriteLine("Sigue intentando")
                'seguir intentando
 
            End If
            'Fin  Si
 
            'C= C+1
            C = C + 1
 
 
 
        Loop Until (A = B)
        'hasta que (A=B)
 
 
        Console.WriteLine(" Cantidad de intentos: " & C)
        'Mostrar "cantidad de intentos"
 
 
        Console.ReadKey()
 
 
    End Sub
    'Fin  
 
End Module



Comentarios sobre la versión: 1.1 (0)


No hay comentarios
 

Comentar la versión: 1.1

Nombre
Correo (no se visualiza en la web)
Valoración
Comentarios
Es necesario revisar y aceptar las políticas de privacidad

http://lwp-l.com/s4719