InformáticaBásico1 respuestas

Por Favor ayudenme?

Por Favor ayudenme. En un conjunto de (n) números enteros busque el número mayor de los elementos generados.

Mejor respuesta

MonchizPaez2672
5

Hola,

te envio el codigo en visual basic 2013, del ejercicio, tambien el programa - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

Public Class Ejercicio_03

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.

Click

Dim i, n, mayor As Integer

Dim x(10) As Integer

ListBox1.

Items.

Clear()

n = Val(TextBox1.

Text)

For i = 1 To n

x(i) = InputBox("Ingresar una cantidad de numeros")

ListBox1.

Items.

Add(" X " & "[" & i & "]" & " = " & x(i))

Next mayor = x(1)

For i = 1 To n

If x(i) > mayor Then

mayor = x(i)

End If

Next

TextBox2.

Text = mayor

End Sub

End Class

Saludos.

Imagen adjunta 1Imagen adjunta 2Imagen adjunta 3Imagen adjunta 4