-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
1) Determine el total del pago realizado a N personas (cantidad ingresada por teclado). A cada persona se le pregunta de qué país es y cuantos días de las olimpiadas trabajará.
2) Determine la cantidad de personas que corresponden a americanos.
3) Determine la cantidad total de personas que corresponden a europeos y asiáticos.
4) Imprima un ticket, según el país del trabajador, con la siguiente información:
- EJ: Olimpiadas Tokio 2020
- País origen: Chile
- Pago total por 17 días: $295,8
5) Valide que la cantidad de personas que trabajarán es mayor a 0. Esta es la tabla de pago según país:
# | País | Pago diario
1 | España | 20,1 USD
2 | Estados Unidos | 22,3 USD
3 | Alemania | 24,7 USD
4 | China | 15,1 USD
5 | Brasil | 17,4 USD
6 | Argentina | 15,1 USD
7 | Perú | 16,1 USD
8 | Chile | 17,4 USD
9 | Francia | 10 USD
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
americanos <- 0;
asiaticos <- 0;
europeos <- 0;
total_del_pago_realizado <- 0;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de dias:";
Leer dias;
Escribir "Selecciona el valor de pais.";
Escribir " 1.- España";
Escribir " 2.- Estados Unidos";
Escribir " 3.- Alemania";
Escribir " 4.- China";
Escribir " 5.- Brasil";
Escribir " 6.- Argentina";
Escribir " 7.- Perú";
Escribir " 8.- Chile";
Escribir " 9.- Francia";
Escribir Sin Saltar " :";
Repetir
Leer pais;
Si pais<1 O pais>9 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que pais>=1 Y pais<=9;
pago_total <- 0;
Escribir "Olimpiadas Tokio 2020";
Si pais = 1 Entonces
pago_total <- dias*20.1;
Escribir "País origen: España";
europeos <- europeos+1;
FinSi
Si pais = 2 Entonces
pago_total <- dias*22.3;
Escribir "País origen: Estados Unidos";
americanos <- americanos+1;
FinSi
Si pais = 3 Entonces
pago_total <- dias*24.7;
Escribir "País origen: Alemania";
europeos <- europeos+1;
FinSi
Si pais = 4 Entonces
pago_total <- dias*15.1;
Escribir "País origen: China";
asiaticos <- asiaticos+1;
FinSi
Si pais = 5 Entonces
pago_total <- dias*17.4;
Escribir "País origen: Brasil";
americanos <- americanos+1;
FinSi
Si pais = 6 Entonces
pago_total <- dias*15.1;
Escribir "País origen: Argentina";
americanos <- americanos+1;
FinSi
Si pais = 7 Entonces
pago_total <- dias*16.1;
Escribir "País origen: Perú";
americanos <- americanos+1;
FinSi
Si pais = 8 Entonces
pago_total <- dias*17.4;
Escribir "País origen: Chile";
americanos <- americanos+1;
FinSi
Si pais = 9 Entonces
pago_total <- dias*10.0;
Escribir "País origen: Francia";
europeos <- europeos+1;
FinSi
total_del_pago_realizado <- total_del_pago_realizado+pago_total;
Escribir "Valor de pago total: ", pago_total;
Escribir "";
FinPara
Escribir "Valor de americanos: ", americanos;
Escribir "Valor de asiaticos: ", asiaticos;
Escribir "Valor de europeos: ", europeos;
Escribir "Valor de total del pago realizado: ", total_del_pago_realizado;
FinProceso