Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Visual Basic » Alguien me ayuda con esta rutina por consola en visual basic net?

Visual Basic - Alguien me ayuda con esta rutina por consola en visual basic net?

Life is soft - evento anual de software empresarial
Volver
Nuevo Tema
<<>>
 
Vista:
sin imagen de perfil

Alguien me ayuda con esta rutina por consola en visual basic net?

Publicado por Cuasim (2 intervenciones) el 02/04/2015 16:57:49
Nombre Programa: Numeros

Requerimientos:
1.- Solicitar la cantidad de números a digitar
2.- Preguntar el orden de presentar los números: A  Ascendente o D  Descendente
3.- Preguntar dónde se desea visualizar la salida: P  Pantalla o A  Archivo
4.- Pedir la digitación de cada uno de los números a digitar
5.- Al concluir la digitación de los números, calcular:
a)El número máximo digitado
b)El número mínimo digitado
c)La suma de los números digitados
d)El promedio de los números digitados
6.- Salida:
Cantidad Números Digitados : xxx
Orden Presentación Números : Poner Ascendente o Descendente
Número Máximo : xxxx
Número Mínimo : xxxx
Suma : xxxx
Promedio : xxxx
Números Digitados
Xxxxxx
Xxxxxx
Xxxxxx
Xxxxxx

Comentarios
*El valor a digitar de la cantidad de números debe ser un valor numérico entero. Si el valor digitado no es un número *entero dar el mensaje “Valor Invalido. Solo se permiten números enteros.” y abortar el programa.
*Los valores de los números pueden ser negativos o positivos.
*En el orden a presentar los números, los valores validos son A o D, de lo contrario dar mensaje “Valor Invalido. Solo se permite A  Ascendente o D  Descendente” y abortar el programa.
*En la pregunta de dónde visualizar el resultado, los valores validos son P o A, de lo contrario dar mensaje “Valor Invalido. Solo se permite P  Pantalla o A  Archivo.” y abortar el programa. Si la salida es a un archivo ponerle el nombre de “Numeros.txt”.
*Los valores de los números a digitar deben ser numéricos con o sin decimales. Si el valor digitado no es un número dar el mensaje “Valor Invalido. Solo se permiten números.” y abortar el programa.
*Al presentar los números digitados si el usuario selecciono Ascendente los números deben presentarse en orden de menor a mayor. Si es Descendente los números deben presentarse en orden de mayor a menor.
 La información a desplegar debe ser igual en pantalla y en la salida al archivo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 147
Ha disminuido 1 puesto en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Alguien me ayuda con esta rutina por consola en visual basic net?

Publicado por Juan Gilberto (323 intervenciones) el 03/04/2015 18:31:33
Publica el codigo que llevas hasta ahora, para empezar a ayudarte con tus dudas ESPECIFICAS o en donde te de un error...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
sin imagen de perfil

Alguien me ayuda con esta rutina por consola en visual basic net?

Publicado por Raday (2 intervenciones) el 03/04/2015 23:31:57
Buenas Juan El codigo que tengo hasta ahora es el siguiente:

es un menu por consola en donde se llamaran 6 programas todosa ellos guardan similitud con el que se llama numeros y lo tengo codificado hasta aqui:

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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
Module Module1
 
    Sub Main()
        Dim blnSalir As Boolean = False
        Dim strValor As String
 
        While Not blnSalir
            Console.Clear()
            Console.WriteLine("                             MENU DEL SISTEMA")
            Console.WriteLine("                              Practica Final")
            Console.WriteLine("")
            Console.WriteLine("MATRICULA: 12-03-0002")
            Console.WriteLine("NOMBRE: Raday Mañón Ogando")
            Console.WriteLine("")
            Console.WriteLine("")
            Console.WriteLine("OPCIONES DEL SISTEMA")
            Console.WriteLine("")
            Console.WriteLine("1. Cantidad de Números")
            Console.WriteLine("")
            Console.WriteLine("2. Notas")
            Console.WriteLine("")
            Console.WriteLine("3. Estudiantes")
            Console.WriteLine("")
            Console.WriteLine("4. Temperaturas")
            Console.WriteLine("")
            Console.WriteLine("5. Unidades de un Número")
            Console.WriteLine("")
            Console.WriteLine("6. Pares e Impares")
            Console.WriteLine("")
            Console.WriteLine("")
            Console.WriteLine("")
            Console.WriteLine("7. SALIR ")
            Console.WriteLine("")
            Console.WriteLine("")
            Console.Write("SELECCIONE UNA OPCION:  ")
            strValor = Console.ReadLine
 
            If strValor = "7" Then
                blnSalir = True
            ElseIf strValor = "1" Then
                Numeros()
            ElseIf strValor = "2" Then
                Notas()
            ElseIf strValor = "3" Then
                Estudiantes()
            ElseIf strValor = "4" Then
                Temperatura()
            ElseIf strValor = "5" Then
                UnidadesNumericas()
            ElseIf strValor = "6" Then
                ParImpar()
            Else
                MsgBox(" OPCION INVALIDA ")
            End If
        End While
 
    End Sub
 
    Sub Numeros()
        Dim cantidades As Integer
        Console.WriteLine("")
        Console.Write("Cuantos Numeros Desea Digitar?:  ")
        cantidades = Console.ReadLine()
        Dim vector(cantidades) As Integer
        Dim i, media As Integer
        Console.WriteLine("")
        Console.WriteLine("Introduzca los Valores:")
 
        For i = 0 To vector.Length - 1
            Console.Write("Valor{0}: ", i)
            vector(i) = Console.ReadLine()
            Console.WriteLine()
        Next
        Array.Sort(vector)
        For i = 0 To vector.Length - 1
            media = media + vector(i)
        Next
        media = media / vector.Length
        Console.WriteLine("El Numero Minimo es: {0}", vector(0))
        Console.WriteLine("El Numero Maximo es: {0}", vector(vector.Length - 1))
        Console.WriteLine("El Promedio es: {0}", media)
        For i = 0 To vector.Length - 1
            Console.WriteLine(i + 1)
        Next
        Console.ReadKey()
    End Sub
 
 
    Sub Notas()
 
    End Sub
    Sub Estudiantes()
 
    End Sub
    Sub Temperatura()
 
    End Sub
    Sub UnidadesNumericas()
 
    End Sub
    Sub ParImpar()
 
    End Sub
End Module
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Juan Carlos

Alguien me ayuda con esta rutina por consola en visual basic net?

Publicado por Juan Carlos (1 intervención) el 04/04/2015 19:44:32
Hola, puedo hacer este programa en su totalidad..
Si aun te interesa su solucion confirmamelo
a mi correo: [email protected]
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
-1
Comentar