Blog de Daiyiro

#BlogDeDaiyiro es sobre todo Bricolajes de Electrónica/Informática. ¡^-^¡

LO NUEVO:

11.10.13

Dos Números Enteros, Que Se Dividen Por El Cuadrado, Comprobar Si El Resultado Es Igual

Hola, esta fue mi segunda practica de escribir código en Visual Basic, es también una aplicación en consola el enunciado del problema decía lo siguiente:



Dados dos números enteros, se necesita saber el resultado de dividir el cuadrado del mayor de ellos y el cuadrado del menor de ellos. Si los números son iguales escribir un mensaje.

Vamos a proceder a escribirlo en pseudocódigo...


PSEUDOCÓDIGO:

INICIO

       CONST=2
       LEER N1
       LEER N2

       ESCRIBIR N1 / CONST
       ESCRIBIR N2 / CONST

       SI N1 =  N2
                ESCRIBIR "Son Iguales"

FIN

Ahora procedo a escribirlo en código de visual basic.

CÓDIGO EN VB.NET:

Module Module1

    Sub Main()


        Dim divi As Double
        Dim n1 As Double
        Dim n2 As Double


        divi = 2
        n1 = 0
        n2 = 0


        Console.WriteLine("Escribir el primer numero entero:")
        n1 = Console.ReadLine
        Console.WriteLine("Escribir el segundo numero entero:")
        n2 = Console.ReadLine


        Console.Write(n1 / divi)
        Console.WriteLine("------>")
        Console.Write(n2 / divi)


        If n1 = n2 Then
            Console.WriteLine("Son Iguales")
        End If


    End Sub

End Module


Espero que os sea interesante...

PD: Esto es lo que hice yo en la practica, no quiere decir por ello, que sea 100% correcto, puede ir encaminado, ser erróneo o no estar del todo finalizada la aplicación.

Un Saludiioo.

No hay comentarios:

Publicar un comentario