Rellenar un arreglo con números aleatorios en PseInt

Hola a todos, hoy os voy a explicar como podemos rellenar un arreglo con números aleatorios en PseInt.

Si necesitamos tener un arreglo de números para hacer pruebas en nuestros procesos, lo mejor es rellenarlo de números aleatorios.

Ya hemos hablado de como generar números aleatorios en PseInt:

https://discoduroderoer.es/como-generar-un-numero-aleatorio-en-pseint

Lo único que tenemos que hacer es crear un arreglo, recorrerlo y para cada posición generar un número aleatorio para guardarlo. Por ejemplo:

Proceso testArregloAleatorios

Dimension arreglo(5);
definir numeroAzar,i, longitudArreglo, minimo, maximo, arreglo como numero;
numeroAzar <- 0;
longitudArreglo <- 5;
minimo <- 10;
maximo <- 20;

Para i<-0 Hasta longitudArreglo-1 Con Paso 1 Hacer
numeroAzar <- numeroAleatorioEntre(minimo, maximo);
arreglo(i) <- numeroAzar;
FinPara

Para i<-0 Hasta longitudArreglo-1 Con Paso 1 Hacer Escribir «Valor de «, i, » => «, arreglo(i);
FinPara

FinProceso

//Genera un numero aleatorio entre el minimo y máximo incluidos
SubProceso numeroAzar <- numeroAleatorioEntre(minimo, maximo)
definir numeroAzar como numero;
numeroAzar <- 0;

Repetir
numeroAzar <- AZAR(maximo+1); Hasta Que numeroAzar >= minimo Y numeroAzar<=maximo

FinSubProceso

Este seria el resultado:

También lo podemos hacer como subproceso:

//Rellena un arreglo de numeros aleatorios entre un mínimo y un máximo, números mínimo y máximo incluidos.
SubProceso rellenarArrayAleatorios(arreglo, longitudArreglo, minimo, maximo)

definir numeroAzar,i como numero;
numeroAzar <- 0;

Para i<-0 Hasta longitudArreglo-1 Con Paso 1 Hacer

numeroAzar <- numeroAleatorioEntre(minimo, maximo);

arreglo(i) <- numeroAzar;
FinPara

FinSubProceso

Así lo actualizamos en nuestro proceso:

Proceso testArregloAleatorios

Dimension arreglo(5);
definir i, longitudArreglo, minimo, maximo, arreglo como numero;
longitudArreglo <- 5;
minimo <- 10;
maximo <- 20;

rellenarArrayAleatorios(arreglo, longitudArreglo, minimo, maximo);

Para i<-0 Hasta longitudArreglo-1 Con Paso 1 Hacer Escribir «Valor de «, i, » => «, arreglo(i);
FinPara

FinProceso

//Genera un numero aleatorio entre el minimo y máximo incluidos
SubProceso numeroAzar <- numeroAleatorioEntre(minimo, maximo)
definir numeroAzar como numero;
numeroAzar <- 0;

Repetir

numeroAzar <- AZAR(maximo+1); Hasta Que numeroAzar >= minimo Y numeroAzar<=maximo

FinSubProceso

//Rellena un arreglo de numeros aleatorios entre un mínimo y un máximo, números mínimo y máximo incluidos.
SubProceso rellenarArrayAleatorios(arreglo, longitudArreglo, minimo, maximo)

definir numeroAzar,i como numero;
numeroAzar <- 0;

Para i<-0 Hasta longitudArreglo-1 Con Paso 1 Hacer

numeroAzar <- numeroAleatorioEntre(minimo, maximo);

arreglo(i) <- numeroAzar;
FinPara

FinSubProceso

Recordar que tenemos más subprocesos útiles en nuestra biblioteca en github.

Y no te olvides que tenemos un curso en udemy de PseInt.

Curso iniciación pseudocodigo con Pseint

Espero que os sea de ayuda. Si tenéis dudas, preguntad. Estamos para ayudarte.