-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Una empresa calcula el sueldo básico de sus trabajadores de acuerdo a las horas trabajadas,
a la tarifa por hora que está dado de acuerdo a su categoría (P-Principal, A-Auxiliar, C-Contratado) y su profesión (T-Técnico, I-Ingeniero).
El importe por hora se muestra en la siguiente tabla:
Categoría | Ingeniero | Técnico
Principal | 35 | 31
Auxiliar | 30 | 27
Contratado | 22 | 18
1
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
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
Proceso SueldoPorCategoriaYProfesion
Escribir Sin Saltar "Ingresa el valor de horas trabajadas:";
Leer horas_trabajadas;
Escribir "Selecciona el valor de categoria.";
Escribir " 1.- P-Principal";
Escribir " 2.- A-Auxiliar";
Escribir " 3.- C-Contratado";
Escribir Sin Saltar " :";
Repetir
Leer categoria;
Si categoria<1 O categoria>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que categoria>=1 Y categoria<=3;
Escribir "Selecciona el valor de profesion.";
Escribir " 1.- T-Técnico";
Escribir " 2.- I-Ingeniero";
Escribir Sin Saltar " :";
Repetir
Leer profesion;
Si profesion<1 O profesion>2 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que profesion>=1 Y profesion<=2;
tarifa <- 0;
Si categoria = 1 Y profesion = 2 Entonces
tarifa <- 35;
FinSi
Si categoria = 1 Y profesion = 1 Entonces
tarifa <- 31;
FinSi
Si categoria = 2 Y profesion = 2 Entonces
tarifa <- 30;
FinSi
Si categoria = 2 Y profesion = 1 Entonces
tarifa <- 27;
FinSi
Si categoria = 3 Y profesion = 2 Entonces
tarifa <- 22;
FinSi
Si categoria = 3 Y profesion = 1 Entonces
tarifa <- 18;
FinSi
sueldo_basico <- horas_trabajadas*tarifa;
Escribir "Valor de sueldo basico: ", sueldo_basico;
Escribir "Valor de tarifa: ", tarifa;
FinProceso
Escribir Sin Saltar "Ingresa el valor de horas trabajadas:";
Leer horas_trabajadas;
Escribir "Selecciona el valor de categoria.";
Escribir " 1.- P-Principal";
Escribir " 2.- A-Auxiliar";
Escribir " 3.- C-Contratado";
Escribir Sin Saltar " :";
Repetir
Leer categoria;
Si categoria<1 O categoria>3 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que categoria>=1 Y categoria<=3;
Escribir "Selecciona el valor de profesion.";
Escribir " 1.- T-Técnico";
Escribir " 2.- I-Ingeniero";
Escribir Sin Saltar " :";
Repetir
Leer profesion;
Si profesion<1 O profesion>2 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que profesion>=1 Y profesion<=2;
tarifa <- 0;
Si categoria = 1 Y profesion = 2 Entonces
tarifa <- 35;
FinSi
Si categoria = 1 Y profesion = 1 Entonces
tarifa <- 31;
FinSi
Si categoria = 2 Y profesion = 2 Entonces
tarifa <- 30;
FinSi
Si categoria = 2 Y profesion = 1 Entonces
tarifa <- 27;
FinSi
Si categoria = 3 Y profesion = 2 Entonces
tarifa <- 22;
FinSi
Si categoria = 3 Y profesion = 1 Entonces
tarifa <- 18;
FinSi
sueldo_basico <- horas_trabajadas*tarifa;
Escribir "Valor de sueldo basico: ", sueldo_basico;
Escribir "Valor de tarifa: ", tarifa;
FinProceso