PROGRAMACION

DESARROLLO DE ALGORITMOS

1.Diseñar un algoritmo que muestre en pantalla un contador de 1 a 10.

PSEUDOCODIGO
Proceso contador_de_numeros_pares
    contador<-1;
    Mientras contador<=10  Hacer
        Escribir contador;
        contador<-contador+1;
    FinMientras
FinProceso 

DIAGRAMA DE FLUJO
 
2. Diseñar un algoritmo que muestre por pantalla un contador de 2 en 2 hasta llegar a 100

PSEUDOCODIGO

Proceso contador_de_numeros_pares
    contador<-2;
    Mientras contador<=100  Hacer
        Escribir contador;
        contador<-contador+2;
    FinMientras
FinProceso 

DIAGRAMA DE FLUJO

 
3. Diseñe un algoritmo dde un pregrama que:
-que pida por teclado 2 numeros
-Calcule la suma y multiplicacion de ambos numeros
-Muestre por pantalla:


"La suma es mayor" en caso de que sea mayor que la multiplicacion
"La multiplicacion es mayor" en caso de que sea mayor que la suma
"La suma y multiplicacion son iguales" en caso de que asi sea
PSEUDOCODIGO
Proceso operaciones_de_dos_numeros
Escribir  "escriba un numero entero";
 Leer n1;
Escribir  "escriba otro numero entero";
 Leer n2;
 suma<-n1+n2;
Escribir "el resultado de la suma es:";
 Escribir  suma;
 multi<-n1*n2;
Escribir "el Resultado de la multiplicacion es:";
Escribir multi;
Si (suma>multi) Entonces
  Escribir "La suma es mayor";
 FinSi
     si (multi>suma) Entonces
      Escribir "La multiplicacion es mayor";
   sino
    si (multi=suma) Entonces
    Escribir "Son iguales";
 FinSi
 finsi
FinProceso



DIAGRAMA DE FLUJO




4. Se quiere diseñar el algoritmo de un programa que:
1º) Pida por teclado la nota (dato real) de una asignatura.
2º) En el caso de que la nota sea incorrecta, muestre por pantalla el mensaje:
"ERROR: Nota incorrecta, debe ser >= 0 y <= 10".
3º) Repita los pasos 1º y 2º, mientras que, la nota introducida sea correcta.
4º) Muestre por pantalla:
"APROBADO", en el caso de que la nota sea mayor o igual que 5. "SUSPENDIDO", en el caso de que la nota sea menor que 5. 
PSEUDOCODIGO
 Proceso notas
    Escribir "introduzca nota (real)";
    Leer nota;
    Mientras (nota<0 o nota>10) Hacer
        Escribir "ERROR: Nota incorrecta, debe ser >= 0 y <= 10";
    Escribir "introduzca una nota REAL";
    Leer nota;
        FinMientras
    Si (nota>=5) Entonces
        Escribir "APROBADO";
    Sino
        Escribir "SUSPENDIDO";
    FinSi
    //Si se ingresa un valor menor que cero o mayor que diez aparece un error si se cumple con la condicion de que sea menor que diez y mayor que cero ejecuta para saber si APROBO o queda SUSPENDIDO//
    FinProceso



DIAGRAMA DE FLUJO

5. Diseñe el algoritmo (en pseudocódigo) de un programa que:
1º) Pida por teclado el radio (dato real) de una esfera.
2º) En el caso de que el radio sea menor o igual que 0, muestre por pantalla el mensaje:
"ERROR: El radio debe ser mayor que cero.".
3º) Repita los pasos 1º y 2º, mientras que, el radio introducido sea incorrecto.
4º) Muestre por pantalla:
"El área de una esfera de radio <radio> es: <área>". 

PSEUDOCODIGO
Proceso AREA_DE_UNA_ESFERA
    Escribir "introduzca radio de la esfera (dato real)";
    Leer r;
    Mientras (r<=0)     Hacer
        Escribir "ERROR El radio debe ser mayor que cero";
        Escribir "introduzca el radio recuerde que debe ser MAYOR que cero";
        Leer r;
    FinMientras
    pi<-3.1416;
    area<-4*pi*r*r;
    Escribir "el area de la esfera de radio   ",r, "  es"   ,   area;
    //Este programa permite al usuario ingrasar el radio de cualquier esfera y calcular el area mientras el radio sea mayor que cero//
FinProceso

DIAGRAMA DE FLUJO




6. Se necesita realizar un programa que permita sumar los números que el usuario desee y le  halle el promedio.  Al finalizar le preguntará al usuario si desea hacer otra suma en caso afirmativo volverá a realizar la suma de lo contrario terminará el programa 


PSEUDOCODIGO
Proceso suma_numeros
//Alejandra Benavides//
    Repetir   
        nusu<-0;
        acu<-0;
        rep<-1;
    Escribir "introduzca el numero de sumandos";
    Leer nusu;
        Mientras rep<=nusu Hacer
            Escribir "Introduzca un numero ",rep;
            Leer num;
            acu<-acu+num;
            rep<-rep+1;
        FinMientras
       
        Escribir "El resultado de la suma es:", acu;
            prom<-acu/rep;
        Escribir "El promedio es:"  ,prom;
        Escribir "desea introducir mas numeros Si/No";
        Leer conti;
       
        Mientras conti="no" y conti="NO" y conti="si" y conti="SI"  Hacer
            Escribir "Debes escribir SI o NO.";
            Leer conti;
        FinMientras
    Hasta Que conti="no" o conti="NO"
FinProceso
//Este algoritmo permite al usuario introducir el numero de sumandos que desee y luego saca su promedio//
 

DIAGRAMA DE FLUJO




7. Diseñar un reloj en el que pasen los minutos en tiempo real, es decir por segundos.

PSEUDODIGO

Proceso reloj
//Alejandra Benaviides//
rel<-0
hor<- 0
min<- 0
seg<- 0
mseg<-0
nseg<-0
Escribir 'Por Favor pulsa Enter para que comience a correr el reloj';
Leer rel;
Mientras  hor<25 Hacer
Mientras  min<60 Hacer
Mientras seg<60 Hacer
Mientras mseg <60 Hacer
Mientras nseg <20 Hacer
Escribir "/",hor,":",min,":",seg,":",mseg,"/";
nseg<-nseg+1
FinMientras
    mseg<- mseg+1
    nseg <-1
FinMientras
   seg <- seg+1
   mseg <- 0
FinMientras
  min<- min+1
  seg<-0
FinMientras
horas <- horas + 1
 minutos <- 0
FinMientras
hor<- 0
min<- 0
seg<- 0
mseg <-0
FinProceso

DIAGRAMA DE FLUJO



8. Diseñar un algotitmo para un hotel en el que se puedan ingrasar los datos para el registro de huespedes y a la 10:00 PM muestre en pantalla la estadistica de el numero de hombres y mujeres hospedados y la cantidad de dias que desean  quedarse.
PSEUDOCODIGO
Proceso hotel
Escribir 'HOTEL SHARON';
//Alejandra Benaviides//
    acuh<-0;
    acud<-0;
    acum<-0;
    acudd<-0;
    valor<-20000;
Repetir
    Escribir 'Introduzca nombre del huesped';
    Leer nom;
    Escribir 'Introduzca los dias que ",nom," 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 'Necesita introducir mas datos (Si/No)';
    Leer seg;
Hasta Que seg="no" o seg="No"
        toth<-acuh+acum
        entr<-toth*valor;
    Escribir 'El total de personas 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 huespedes que se hospedaran en el hotel por 5 o mas dias son:',acud;
    Escribir 'Los huespedes que se hospedaran por menos de 5 dias son:' ,acudd;
    Escribir 'Los ingresos de este dia al hotel son:' ,entr;
FinProceso

DIAGRAMA DE FLUJO 



 




3 comentarios: