PROGRAMACION

                           ALGORITMOS
* EL SIGUIENTE ALGORITMO HACE REFERENCIA A
UN CONTADOR DE 2 EN 2 HASTA LLEGAR A 100

 Proceso contadordedosendos

                cont<-2;

                Mientras cont<=100 Hacer

                               Escribir cont;

                               cont<-cont+2;

                FinMientras

FinProceso

* ESTE ALGORITMO HACE REFERENCIA  A UN
CONTADOR DE 3 EN 3 HASTA  LLEGAR A 30

Proceso contadordetresentres cont<-3;
 Mientras cont<=30 Hacer
  Escribir cont;
  cont<-cont+3;
 FinMientras
FinProceso

* ESTE  ALGORITMO CONSISTE EN HACER UNA SUMA Y
UNA MULTIPLICACION POR MEDIO DE DOS NUMEROS
ENTEROS
 Proceso ALGORITMO_SUMA_y_MULTIPLICACION

ESCRIBIR  " ESCRIBE  DOS NUMEROS ENTEROS " ;

Leer num1,num2;

Si num1 >=0 entonces

Escribir  " la suma es " , num1 + num2 ;

FinSi

Si num1 >=0 entonces

Escribir " la multiplicación es " , " num1*num2 ";

FinSi

Si  num1+num2 > num2*num1 entonces

Escribir " la suma es menor  que la multiplicación " ;

FinSi

Si num1+num2 =num1*num2 entonces

Escribir " la suma y la multiplicacion son iguales";

FinSi

* ESTE ALGORITMO CONSISTE EN ENCONTRAR EL RADIO

 DE UNA ESFERA POR MEDIO DE UNA FORMULA :

Proceso radioesfera
Escribir "ingrese el radio de la esfera ";
Leer radioesfera;
Mientras radioesfera <=0 hacer
Escribir " incorrecto el radio de la esfera , debe ser  >0"
Escribir "ingrese el radio de esfera "
Leer radioesfera
Finmientras
Escribir "el area de una esfera de radio es : area";
Area <-4*3.1416*radioesfera
Escribir  "el area de la esfera es :",area;
FinProceso

*ESTE ALGORITMO CONSISTE EN PEDIR LA NOTA
 DE UNA ASIGNATUARA PARA VER SI EL ALUMNO
APROVO O SE SUSPENDE

Proceso notas
Escribir "ingrese la nota real ";
Leer nota;
Mientras nota <=0 o nota>=10 hacer
Escribir "la nota es incorrecta , debe ser >=0 y <=10"
Escribir "ingrese nota"
Leer nota
FinMientras
Si nota>=5 Entonces
Escribir "aprobado"
FinSi
Si no entonces
Escribir "suspendido"
FinSi
FinProceso

*ESTE ALGORITMO CONSISTE EN REALIZAR UN  PROGRAMA EL  CUAL

  PUEDA SUMAR LA CANTIDAD DE NUMEROS QUE EL USUARIO  INTRODUZCA Y LE DE UN PROMEDIO  .

Proceso suma

    respuesta<-"si";

   

  mientras respuesta = "si" Hacer

        contador<- 1;

        num<-0 ;

        total<-0 ;

        prom<-0 ;

   escribir "digite la cantidad de numeros a promediar: ";

   leer n;

     mientras contador<= n hacer

      escribir "introduzca el numero ",contador,":" ;

      leer num ;

      total<-total+num;

      contador<-contador+1;

      

   escribir "la suma de los numeros es :", total; //contatenar cadena o unir

 

   prom<-total/n;

   escribir "el promedio de los numeros es : " ,prom ;

 

 

 finmientras

 escribir "decea digitar otro numero(si/no):";

   leer respuesta ;

 

    finmientras

FinProceso

* ESTE ALGORITMO CONSISTE EN REALIZAR UN PROGRAMA EL CUAL CONTENGA  MILESIMAS , SEGUNDOS, MINUTOS Y HORAS 

Proceso cronometro

cronometro<-0

hrs <- 0

min <- 0

segus <- 0

minsegus <-0

numsegus <-0

Escribir " presiona enter para iniciar";

Leer cronometro;

MIENTRAS hrs <25 HACER

                MIENTRAS min <60 HACER

                               MIENTRAS segus <60 HACER

                                               mientras minsegus <60 Hacer

                                                               mientras numsegus <20 Hacer

                                                                             

                                                                              ESCRIBIR "/",hrs,":",min,":",segus,":",minsegus,"/";

                                                                   

                                                               numsegus<-numsegus+1

                                                                             

                                                               FinMientras

                                                               minsegus<- minsegus+1

                                                               numsegus <-1

                                               FinMientras

                                               segus <- segus + 1

                                               minsegus <- 0

                               FINMIENTRAS

                               min <- min+ 1

                               segus <- 0

                              

                FINMIENTRAS

                hrs <- hrs + 1

                min <- 0

FinMientras

hrs <- 0

min <- 0

segus <- 0

minsegus <-0

FinProceso

* ESTE ALGORITMO CONSISTE  EN RELIZAR UN  PROGRAMA EL CUAL NOS PERMITA CALCULAR , LA CANTIDAD DE USUARIOS QUE SE OSPEDAN EN EL HOTEL ,  EL GENERO DE CADA UNO DE ESTOS , Y L ACANTIDA A PAGAR POR SU ESTADIA EN EL HOTEL 
Proceso hotel
Escribir 'HOTEL ';
 acuh<-0;
 acud<-0;
 acum<-0;
 acudd<-0;
Repetir
 Escribir 'por favor introducir nombre de usuario';
 Leer nom;
 Escribir 'por favor introduzca los dias que ",nom," el usuario se hospedara';
 Leer dia;
 Escribir 'Introduzca el sexo al que pertenece (F=0 /M=1) ';
 Leer sex;
  Si (sex=1) Entonces
  acuh<-acuh+1;
  Sino
  acum<-acum+1;
 finsi
  Si dia>=5 Entonces
  acud<-acud+1;
  Sino
  acudd<-acudd+1;
 FinSi
 Escribir 'desea registra a alguien mas (Si/No)';
 Leer seg;
Hasta Que seg="no" o seg="No"
  toth<-acuh+acum
 Escribir 'El total de usuarios hospedadas en el hotel son:' ,toth;
 Escribir 'El total de hombres hospedadas en el hotel son:' ,acuh;
 Escribir 'El total de mujeres hospedadas en el hotel son:' ,acum;
 Escribir 'Los usuarios que se hospedaran en el hotel por 5 o mas dias son:',acud;
 Escribir 'Los usuarios que se hospedaran por menos de 5 dias son:' ,acudd;
FinProceso