Red de conocimiento informático - Problemas con los teléfonos móviles - Programación VB: genere aleatoriamente 10 números enteros diferentes entre 1 y 100, guárdelos en una matriz unidimensional, encuentre el elemento más grande y elimine el elemento de la matriz

Programación VB: genere aleatoriamente 10 números enteros diferentes entre 1 y 100, guárdelos en una matriz unidimensional, encuentre el elemento más grande y elimine el elemento de la matriz

¿Dim?i?As?Integer

¿Dim?S(10)?As?Integer

Dim?Max?As?Integer

For?i?=?0?To?9

Aleatorizar

S(i)?=?Int(Rnd?*?100)?+?1

Si?i?=?0?Entonces

Max?=?S(i)

Si no?Max?

Max?=?S(i)

Fin?Si

Depurar.Imprimir?Max?&?"?"?&?S(i)

¿Siguiente?i

No escribí la eliminación, puedes expandirla tú mismo. . El número más grande se almacena en MAX. S(i) matriz de números aleatorios