Bienvenid@: Sacale provecho

este un mensaje de prueba Hacia abajo --- Hacia arriba

‘Programa que trasforma las horas de formato de 24h  a formato de 12h

ImportsSystem.console

Module Module2

    Sub Main()

        Dim h, m, s As Integer

        Write("la hora , en formato de 24 h:") : h = ReadLine()

        If (h > 24) Then

            WriteLine("la hora no es valida, fuera de rango")

        Else

            Write("ingrese los minutos:") : m = ReadLine()

            Write("ingrese los s:") : s = ReadLine()

            If (h > 12 And h <= 24) Then

                h = h - 12

                WriteLine("la hora en formato 12 horas sera:" & h & "h" & m & " m" & s & " s")

            Else

                WriteLine("la hora en formato 12 horas sera:" & h & "h" & m & " m" & s & " s")

            End If

        End If

        ReadLine()

    End Sub

End Module

el micoprocesador _ cuadro comparativo
este es un trabajo que habla de la evolucion del microprocesador desde la primera ves que salio en 1971 hata el dia de hoy, como nos cambio y sigue cambiando la vida
el micro.docx
Documento Microsoft Word 166.9 KB