miércoles, 27 de marzo de 2013

Pseudocódigo XIV

Ejercicios Pseudocódigo



Calcular la importe que un trabajador recibe en el reparto anual de beneficios si este se le asigna como un porcentaje de su salario mensual que depende de su antigüedad en la empresa de acuerdo con la sig. tabla: 



Tiempo                  Antigüedad
  • Menos de 1 año 5 % del salario 
  • > 1 año y < de 2 años 7% del salario 
  • 2 años o + y < 5 años 10% del salario 
  • 5 años o + y <de 10 años 15% del salario 
  • 10 años o mas 20% del salario.



1 Proceso PagaPorantiguedad
2      //Calcular la importe que un trabajador recibe en el reparto
3      //anual de beneficios si este se le asigna como un porcentaje
4      //de su salario mensual que depende de su antigüedad en
5      //la empresa de acuerdo con la sig. tabla:
6      //Tiempo Antigüedad
7      //Menos de 1 año 5 % del salario
8      // 1 año y < de 2 años 7% del salario
9      //2 años o + y < 5 años 10% del salario
10     //5 años o + y <de 10 años 15% del salario
11     //10 años o mas 20% del salario
12     Definir DiaAlta, MesAlta, AnyoAlta Como Entero;
13     Definir DiaActual, MesActual, AnyoActual Como Entero;
14     Definir Anyos como entero;
15     Definir Interes, Sueldo , Paga Como Real;
16     DiaActual<-11;
17     MesActual<-03;
18     AnyoActual<-2013;
19     Escribir "Dime la fecha de contrato";
20     Leer DiaAlta, MesAlta, AnyoAlta;
21     Anyos <- AnyoActual - AnyoAlta;
22     si MesActual < MesAlta entonces
23           Anyos <- Anyos - 1;
24     Sino
25           si MesActual = MesAlta & DiaActual < DiaAlta Entonces
26                  Anyos <- Anyos - 1;
27           FinSi
28     FinSi
29     Segun Anyos hacer
30           0: Interes <-0.05;
31           1: Interes <-0.07;
32           2,3,4:Interes <-0.10;
33           5,6,7,8,9:Interes <-0.15;
34           de Otro Modo:
35                  Interes <-0.20;
36     FinSegun
37     Escribir "Dime tu sueldo mesual:";
38     Leer Sueldo;
39     Paga <- Sueldo * Interes;
40     Escribir "Tu paga es de " , Paga , " Euros ( Años :" , anyos, ")";
41 FinProceso

En una tienda de descuento se efectúa una promoción en la cual se hace un descuento sobre el valor de la compra total según el color de una bolita que el cliente saque al pagar en caja.

  • Si la bolita es de color blanco no se le hará descuento alguno, si es verde se le hará un 10% de descuento, si es amarilla un 25%, si es azul un 50% y si es roja un 100%.
  • Determinar la cantidad final que el cliente deberá pagar por su compra.
  • Se sabe que solo hay bolitas de los colores mencionados.
1 Proceso LasBolitas
2      //En una tienda de descuento se efectúa una promoción
3      //en la cual se hace un descuento sobre el valor de
4      //la compra total según el color de la bolita
5      //que el cliente saque al pagar en caja.
6      //Si la bolita es de color blanco no se le hará
7      //descuento alguno, si es verde se le hará un 10%
8      //de descuento, si es amarilla un 25%, si es azul
9      //un 50% y si es roja un 100%. Determinar la cantidad
10     //final que el cliente deberá pagar por su compra.
11     //se sabe que solo hay bolitas de los colores
12     //mencionados.
13     Definir Color Como Entero;
14     Definir Total, Importe, Descuento Como Real;
15     Definir ColorC como caracter;
16     Escribir "Dime el importe de la compra ";
17     Leer Importe;
18     Color <- Azar(5) + 1; //1 al 5
19     Segun Color hacer
20           1: Descuento<- 0.00;
21           ColorC <- "Blanco (0%)";
22           2: Descuento<-0.10;
23           ColorC<- "Verde (10%)";
24           3: Descuento<-0.25;
25           ColorC<- "Amarillo (25%)";
26           4: Descuento<-0.50;
27           ColorC<- "Azul (50%)";
28           5: Descuento<-1.00;
29           ColorC<- "Rojo (100%)";
30           FinSegun
31     Total <- Importe * (1-Descuento);
32     Escribir "Tu Color es " ,ColorC , " Pagas " , Total ," euros.";
33 FinProceso

Leer 20 números e imprimir cuantos son  positivos, cuantos negativos y cuantos neutros.


1 Proceso Leer20NumerosYContarPosNegNeu
2      Definir i, Numero, Pos , Neg, Neu Como Entero;
3      Pos <-0;
4      Neg <-0;
5      Neu <-0;
6      Para i<-1 hasta 20 Hacer
7             Escribir "Dime el " , i ," Numero";
8             Leer Numero;
9             Si Numero > 0 Entonces
10                  Pos <- Pos + 1;
11            Sino
12                   si Numero < 0 Entonces
13                         Neg <- Neg + 1;
14                  Sino
15                          Neu <- Neu + 1;
16                   FinSi
17            FinSi
18     FinPara
19     Escribir "Pos: " , Pos , " Neg: ", Neg, " Neu: ", neu;
20 FinProceso


No hay comentarios:

Publicar un comentario