CICLOS REPETITIVOS, HAGA HASTA

Ciclo Repita

este ciclo es más útil cuando necesitamos definir cuándo y cómo acabar el ciclo

estructura

        Repita 
                     Instrucciones 
        Hasta (condición)

ejemplo

(1°) realizar un algoritmo que pida el nombre de la cantidad de alumnos que se requiera y muestre cuántos aprobaron y cuántos reprobaron.

caracter resp 
real nota 
entero ca, cr 
cadena[25] nombre 
inicio 
ca <-0 
cr <-0 
repita 
Escriba "ingresar el nombre del alumno " 
lea nombre 
Escriba "ingresar la nota del alumno " 
lea nota 
si nota >= 60 entonces 
ca <-ca+1 
sino 
cr <-cr+1 
fin si 
escriba " Desea continuar S/N" 
lea resp 
hasta (resp='n') o (resp='N') 
escriba " Aprobados ",ca 
llamar nueva_linea 
escriba " Reprobados ",cr 
fin

(2°) Desarrollar un algoritmo que me permita ingresar el sexo de 10 personas y al final me muestre la cantidad de cada sexo ingresado.

Entero mascu,feme,otro,con

Cadena[10] sexo

Inicio

mascu<- 0

feme<- 0

otro<- 0

con<- 0

 Repita

Escriba "Ingrese el sexo de la persona : "

Lea sexo

Llamar nueva_linea

 Si (sexo="masculino") o (sexo="Masculino") entonces

  mascu<- mascu + 1

  Sino si (sexo="femenino") o (sexo="Femenino") entonces

   feme<- feme +1

    Sino si (sexo="otro") o (sexo="Otro") entonces

     otro<- otro + 1

      Fin si

    Fin si

 Fin si    

 con<- con + 1

  Hasta (con=10)

Llamar nueva_linea 

Escriba " La cantidad de sexos Masculinos son ", mascu

Llamar nueva_linea

Escriba " La cantidad de sexos Femeinos son ", feme

Llamar nueva_linea

   Escriba " Otros sexos ", otro

Fin  

(3) Desarrollar un algoritmo que me permita hallar el salario de los empleados de una empresa y me muestre la cantidad de salarios que superen los 700.000 $ y cuantos son menores a este.

Entero menor,mayor,salario

Cadena [5] resp

Inicio

menor<- 0

mayor<- 0

 Repita

  Escriba "Ingrese el salario del empleado : "

  Lea salario

  Llamar nueva_linea

   Si (salario > 700000) entonces

    mayor<- mayor + 1

   Sino

    menor<- menor + 1

Fin si

  Llamar nueva_linea

  Escriba " Desea seguir ingresando salarios ? "

  Lea resp

  Llamar nueva_linea

 Hasta (resp="No") o (resp="no")

 Llamar nueva_linea

 Escriba " Los cantida de salarios mayoreas a 700.000 son ", mayor

 Llamar nueva_linea

 Escriba " Los cantidad de salarios minimos a 700.000 son ", menor

Fin  


(4) //Declaración de Variables
Cadena [25] nombre 
Real nota1, nota2, nota3, notaFinal 
Inicio 
 //Inicio del ciclo Repita Repita //
Lectura de los datos de entrada
 llamar nueva_linea
 escriba "Ingrese el nombre del estudiante:" 
 lea nombre 
 escriba "Ingrese el valor de la primera nota:" 
 lea nota1 
 escriba "Ingrese el valor de la segunda nota:" 
 lea nota2
//Cálculo de la nota final 
 notaFinal <- (nota1 + nota2) / 2 
 //Escritura de la salida 
 llamar nueva_linea
 llamar nueva_linea 
 escriba "INFORMACION DEL ESTUDIANTE” 
 llamar nueva_linea 
 escriba "NOMBRE------>",nombre 
 llamar nueva_linea 
 escriba "NOTA FINAL-->",notaFinal 
 Si notaFinal < 3 Entonces 
 escriba "REPROBADO” 
 Sino escriba "APROBADO” 
 Fin Si 
 Hasta notaFinal < 2 
 //Fin del ciclo Repita 
Fin