26. Algoritmos || Ejercicios estructuras repetitivas Pseint

Ejercicios algoritmos Pseint

26. Hacer un algoritmo en Pseint para calcular el resto y cociente por medio de restas sucesivas.

Algoritmo Division_RestasSucesivas
 Definir n,d,resto,conta Como Entero;
 resto <- 0; conta <- 0;
 Escribir 'Numerador';
 Leer n;
 Escribir 'Denominador';
 Leer d;
 Repetir
  n <- n-d;
  resto <- n;
  conta <- conta+1;
 Hasta Que n<d
 Escribir 'El resto es: ',resto;
 Escribir 'El cociente es: ',conta;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

27. Hacer un algoritmo en Pseint para determinar la media de una lista indefinida de números positivos, se debe acabar el programa al ingresar un número positivo.

Algoritmo Suma_Numeros
 Definir n,media,conta Como Entero;
 Definir i Como Real;
 Escribir 'Ingrese un número';
 Leer n;
 media <- 0; conta <- 0; i <- 0;
 Mientras (n>=0) Hacer // El valor centinela es un número menor que cero
  media <- media+n;
  conta <- conta+1;
  Leer n; // mientra n sea mayorr que cero, el bucle continua     
 FinMientras
 i <- media/conta;
 Escribir 'La media es: ',i;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

28. Hacer un algoritmo en Pseint para calcular la suma de los primeros cien números con un ciclo repetir.

Algoritmo Suma_Numeros_Repetir
 Definir suma,conta Como Entero;
 conta <- 0; suma <- 0;
 Repetir
  conta <- conta+1;
  suma <- suma+conta;
 Hasta Que conta=100
 Escribir 'La suma es: ',suma;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

29. Hacer un algoritmo en Pseint para calcular la suma de los primeros cien números con un ciclo mientras.

Algoritmo Suma_Numeros_Mientras
 Definir suma,conta Como Entero;
 conta <- 0; suma <- 0;
 Mientras (conta<100) Hacer
  conta <- conta+1;
  suma <- suma+conta;
 FinMientras
 Escribir 'La suma es: ',suma;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman

30. Hacer un algoritmo en Pseint para calcular la suma de los primeros cien números con un ciclo para.

Algoritmo Suma_Numeros_Para
 Definir suma,i Como Entero;
 suma <- 0;
 Para i<-1 Hasta 100 Hacer
  suma <- suma+i;
 FinPara
 Escribir 'La suma es: ',suma;
FinAlgoritmo

Diagrama de flujo

Diagrama Nassi-Shneiderman