Máximo y mínimo valor de un arreglo en PseInt

Hola a todos, hoy os voy a explicar como podemos obtener el máximo y el mínimo valor de un arreglo en PseInt.

Cuando trabajamos con arreglos en PseInt, puede que nos haga falta obtener el valor mínimo o máximo del mismo.

La idea es que el primer valor para nosotros será el valor mínimo o máximo, después iremos comprobando el resto de valores, actualizando el valor si es mayor o menor.

Teniendo el siguiente arreglo:

Dimension arreglo(5);

arreglo[0] <- 30;
arreglo[1] <- 20;
arreglo[2] <- 50;
arreglo[3] <- 10;
arreglo[4] <- 40;

Vamos a obtener el valor máximo:

Proceso maximo

Dimension arreglo(5);

Definir arreglo,valorMax,i, longitudArreglo como numero;

arreglo[0] <- 30;
arreglo[1] <- 20;
arreglo[2] <- 50;
arreglo[3] <- 10;
arreglo[4] <- 40;

valorMax <- arreglo[0];
longitudArreglo <- 5;

Para i<-0 Hasta longitudArreglo -1 con paso 1 Hacer

si arreglo[i] > valorMax Entonces
valorMax <- arreglo[i];
FinSi

FinPara

Escribir «Valor maximo: «, valorMax;

FinProceso

Este es el resultado si ejecutamos:

Y ahora vamos a obtener el valor mínimo con el siguiente código:

Proceso maximo
Dimension arreglo(5);
Definir arreglo,valorMin,i, longitudArreglo como numero;
arreglo[0] <- 30;
arreglo[1] <- 20;
arreglo[2] <- 50;
arreglo[3] <- 10;
arreglo[4] <- 40;
valorMin <- arreglo[0];
longitudArreglo <- 5;
Para i<-0 Hasta longitudArreglo -1 con paso 1 Hacer
si arreglo[i] < valorMin Entonces
valorMin <- arreglo[i];
FinSi
FinPara
Escribir «Valor minimo: «, valorMin;
FinProceso

Este es su resultado si lo ejecutamos desde PseInt:

También podemos hacer un subproceso para reutilizarlo cuando lo necesitemos en otro programa.

// Devuelve el maximo de un arreglo
subproceso valorMax <- maximoValorArreglo(arreglo, longitudArreglo)

Definir valorMax,i como numero;
valorMax <- arreglo[0];

Para i<-0 Hasta longitudArreglo -1 con paso 1 Hacer

si arreglo[i] > valorMax Entonces
valorMax <- arreglo[i];
FinSi

FinPara

FinSubProceso

// Devuelve el minimo de un arreglo
subproceso valorMin <- minimoValorArreglo(arreglo, longitudArreglo)
Definir valorMin,i como numero;
valorMin <- arreglo[0];

Para i<-0 Hasta longitudArreglo -1 con paso 1 Hacer

si arreglo[i] < valorMin Entonces
valorMin <- arreglo[i];
FinSi

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.