27. Algoritmos || Ejercicios estructuras repetitivas Pseint

Ejercicios algoritmos Pseint

31. Hacer un algoritmo en Pseint parar calcular la media de los números pares e impares, sólo se ingresará diez números.

Algoritmo media_Numeros
 Definir conta,conta1,conta2 Como Entero;
 Definir n,suma1,suma2,media1,media2 Como Real;
 conta <- 0; conta1 <- 0; conta2 <- 0;
 // conta 1 y 2 son los contadores de los números
 // positivos (conta1) y negativos (conta2)
 suma1 <- 0; suma2 <- 0;
 media1 <- 0; media2 <- 0;
 // Suma 1,2 y Media 1 y 2 también son
 // para los números positivos y negativos
 Repetir
  Leer n;
  Si (n>0) Entonces
   suma1 <- suma1+n;
   conta1 <- conta1+1;
  SiNo
   suma2 <- suma2+n;
   conta2 <- conta2+1;
  FinSi
  conta <- conta+1;
 Hasta Que conta=10
 media1 <- suma1/conta1;
 media2 <- suma2/conta2;
 Escribir 'La media de los números positivos es: ',media1;
 Escribir 'La media de los números negativos es: ',media2;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

32. Se quiere saber cuál es la ciudad con la población de más personas, son tres provincias y once ciudades, hacer un algoritmo en Pseint que nos permita saber eso.

Algoritmo Ciudad_Mayor_Poblacion
 Definir conta1, conta2,ciudad, _mayor  como Entero;
 conta1 <- 1;
 mientras (conta1 <= 3) Hacer
  _mayor <- 0;
  conta2 <- 1;
  Mientras (conta2 <= 11) Hacer
   Leer ciudad;
   si (ciudad > _mayor) entonces
    _mayor <- ciudad;
   FinSi
   conta2 <- conta2 + 1;
  FinMientras
  Escribir "La población mayor de la provincia ",conta1," es: ",_mayor;
  conta1 <- conta1 + 1;
 FinMientras
 
 
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

33. Hacer un algoritmo en Pseint que permita al usuario continuar con el programa.

Algoritmo Leer_respuesta
 Definir respuesta como caracter;
 respuesta <- 's';
 Mientras (respuesta ='s') Hacer
  Escribir "¿Desea continuar?";
  Escribir "S/N";
  Leer respuesta;
 FinMientras
 
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

34. Hacer un algoritmo en Pseint que imprima la tabla de multiplicar de los números del uno nueve.

Algoritmo Tabla_Multiplicar
 Definir i, j, producto Como Entero;
 para i <- 1 hasta 9 hacer
  Escribir "Tabla del ",i;
  para j <- 1 hasta 10 hacer
   producto <- i * j;
   Escribir i," por ",j," = ",producto;
  FinPara
 FinPara
 
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

35. Hacer un algoritmo en Pseint que nos permita saber cuál es el número mayor y menor, se debe ingresar sólo veinte números.

Algoritmo Tabla_Multiplicar
 Definir i Como Entero;
 Definir max,min,num Como Real;
 Leer num;
 max <- num;
 min <- num;
 Para i<-1 Hasta 20 Hacer
  Leer num;
  Si (num>max) Entonces
   max <- num;
  FinSi
  Si (num<min) Entonces
   min <- num;
  FinSi
 FinPara
 Escribir 'El número menor es: ',min;
 Escribir 'El número mayor es: ',max;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman