programacion


1. hacer un contador que valla de dos en dos hasta llegar a 100

siolucion

 Proceso pares
    i<-0;
    Mientras i<100 Hacer
        i<-i+2;
        Escribir i;
    FinMientras
  
FinProceso






2. hacer un contador que valla de uno en uno hasta llegar a 100

solucion

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







3. diseñe el algoritmo(ordinograma) de un programa que:

1. pida por teclado dos numeros (datos enteros)
2º) Calcule la suma y multiplicación de ambos números.
3º) Muestre por pantalla:
·         "La suma es mayor.", en caso de que sea mayor que la multiplicación de ambos números.
·         "La multpilicación es mayor.", en caso de que sea mayor que la suma de ambos números.
·         "La suma y multiplicación son iguales.", en caso de que así sea.
solucion

Proceso  suma_de_dos_nuemros
  Escribir "introdzca primer numero (entero):";
 Leer numero1;
Escribir "introduzca segundo numero (entero):";
 Leer numero2;
 suma<-numero1+numero2;
 multiplicacion<-numero1*numero2;
 Si (suma>multiplicacion)  Entonces
     Escribir "la suma es mayor que la multiplicacion";
 FinSi
    si (multiplicacion>suma) Entonces
    Escribir "la multiplicacion es mayor";
Sino
si (suma=multiplicacion) entonces
    Escribir "saon iguales";
FinSi
FinSi
FinProceso





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 incorrecta.
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. 


SOLUCION




Proceso nota_de_una_asignatura
Escribir " primera nota numero:"
leer nota;
mientras nota  <=0 o  nota >= 10 Hacer
Escribir "error: Nota incorrecta, debe ser >= 0 y <= 10";
Escribir "nueva nota";
leer nota
FinMientras
si nota>=5  Entonces
Escribir "aprovado";
sino Entonces
Escribir "no aprovado"
FinSi

FinProceso




5. se necesita realizar un programa que permita sumar los numeros los numeros que el usuario desee y halle el promedio. al finalizar le preguntara al usuario si desea hacer otra suma en caso afirmativo volvera a realizar la suma de lo cantrario terminara el programa


SOLUCION

Proceso suma_de_numeros

 Escribir "Digite la cantidad de numeros: ";
 Leer cant;
 cont<-1;
 suma<-0;
 Mientras cont<=cant Hacer
 Escribir "introduzca el numero a sumar: ";
 Leer numero;
 suma<-suma+numero;

 cont<-cont+1;

 FinMientras
 Escribir "La suma de los numeros es: ",suma;

FinProceso


Proceso cronometro, diseñar un  cronometro donde muestre el tiempo real, donde muestre las horas los minutos y los segundos




 horas<-0
 minutos<-0
 segundos<-0
 milisegundos<-0
 Leer i;

 Mientras Verdadero Hacer
  Mientras horas<24 Hacer
   Mientras minutos<60 Hacer
    Mientras segundos<60 Hacer
     Mientras milisegundos<2000 Hacer
      Si milisegundos=0 Entonces
       Escribir horas," ",minutos," ",segundos;
      Sino
       Si milisegundos=1000 Entonces
        Escribir horas,":",minutos,":",segundos;
       Sino

       FinSi

      FinSi
      milisegundos<-milisegundos+1;
     FinMientras
     milisegundos<-0;
     segundos<-segundos+1;
    FinMientras
    segundos<-0;
    minutos<-minutos+1;
   FinMientras
   minutos<-0;
   horas<-horas+1
  FinMientras
  horas<-0
 FinMientras

FinProceso



HOTEL

8. diseñar un programa para un hotel donde nos pida los datos de registro para  los usuarios  que se vayan a hospedar  en  el hotel tanto como nombre.sexo. numero de días y las noches que se va a alojarse,  donde muestre en la pantalla una estadística  de cuantos hombres y mujeres ingresaron  que cuesta cada dia y cual es  el total del hospedaje

SOLUCION

Proceso hotel_lady_acosta


acohombres<-0;
    mayornumerodedias<-0;
    acomujeres<-0;
   menordedias<-0;
    valor<-35550;


Repetir
Escribir "buenas tardes bienvenido hotel Lady Acosta";
escribir "para hacer su recepcion digite su:";
    Escribir 'Introduzca nombres completos del huesped';
    Leer nombres;
Escribir "apellidos completos del huesped"
Leer apellidos;
    Escribir 'Introduzca los dias que ",nombres,"  ",apellidos," se hospedara';
    Leer dias;
    Escribir 'Introduzca el sexo al que pertenece (Femenino=0 /Masculino=1) ';
    Leer sexo;
        Si (sexo=1) Entonces
        acohombres<-acohombres+1;
        Sino
        acomujeres<-acomujeres+1;
    finsi
        Si dias>=5 Entonces
         mayornumerodedias<- mayornumerodedias+1;
        Sino
         menordedias<- menordedias+1;
    FinSi
    Escribir 'decea registrar otro huesped (Si/No)';
    Leer registro;
Hasta Que registro="no" o registro="No"
       totalpersonas<-acohombres+acomujeres
        totaldeingresos<-totalpersonas*valor;
    Escribir 'El total de huespedes que se quedaron  en el hotel son:' ,totalpersonas;
    Escribir 'El total de hombres que hay en el hotel son:' ,acohombres;
    Escribir 'El total de mujeres que hay en el hotel es:' ,acomujeres;
    Escribir 'Los huespedes que se quedaron en el hotel por 5 o mas dias son:',mayornumerodedias;
    Escribir 'Los huespedes que se hospedaran por menos de 5 dias son:' ,menordedias;
    Escribir 'Los ingresos de este dia al hotel son:' ,totaldeingresos;
FinProceso







2 comentarios: