-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
En un hospital se ha hecho un estudio sobre los pacientes registrados durante los últimos 10 años, con el objeto de hacer una aproximación de los costos de internamiento por paciente. Se obtuvo un costo promedio diario según el tipo de enfermedad que aqueja al paciente, además se pudo determinar que en promedio todos los pacientes con edad entre 14 y 22 años implican un costo adicional del 10%. La siguiente tabla expresa los costos diarios según el tipo de enfermedad.
TIPO DE ENFERMEDAD | COSTO / PACIENTE
0 | 25
1 | 16
2 | 20
3 | 32
Calcular e imprimir el costo que representa un paciente.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Proceso PacientesRegistradosEnUnHospital
Escribir Sin Saltar "Ingresa el valor de edad:";
Leer edad;
Escribir Sin Saltar "Ingresa el valor de tipo de enfermedad:";
Leer tipo_de_enfermedad;
costo <- 0;
Si tipo_de_enfermedad = 0 Entonces
costo <- 25;
FinSi
Si tipo_de_enfermedad = 1 Entonces
costo <- 16;
FinSi
Si tipo_de_enfermedad = 2 Entonces
costo <- 20;
FinSi
Si tipo_de_enfermedad = 3 Entonces
costo <- 32;
FinSi
Si edad>=14 Y edad<=22 Entonces
costo <- costo*1.1;
FinSi
Escribir "Valor de costo: ", costo;
FinProceso
Escribir Sin Saltar "Ingresa el valor de edad:";
Leer edad;
Escribir Sin Saltar "Ingresa el valor de tipo de enfermedad:";
Leer tipo_de_enfermedad;
costo <- 0;
Si tipo_de_enfermedad = 0 Entonces
costo <- 25;
FinSi
Si tipo_de_enfermedad = 1 Entonces
costo <- 16;
FinSi
Si tipo_de_enfermedad = 2 Entonces
costo <- 20;
FinSi
Si tipo_de_enfermedad = 3 Entonces
costo <- 32;
FinSi
Si edad>=14 Y edad<=22 Entonces
costo <- costo*1.1;
FinSi
Escribir "Valor de costo: ", costo;
FinProceso