-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
En un hospital se ha hecho un estudio con el objeto de hacer una aproximación de los costos diarios de internamiento por paciente. Se obtuvo un costo promedio diario según el tiempo que el enfermo esta sin atención por una 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.
Tiempo sin atención | Costo diario por paciente
Menos de 1 hora | 5
De 1 hora a menos de 4 | 18
De 4 horas a menos de 10 | 25
De 10 horas a más | 30
Ingresar el tiempo de exposición del paciente en horas y su edad, para luego mostrar el costo diario de su hospitalización.
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Escribir Sin Saltar "Ingresa el valor de edad:";
Leer edad;
Escribir Sin Saltar "Ingresa el valor de tiempo sin atencion:";
Leer tiempo_sin_atencion;
costo_diario <- 0;
Si tiempo_sin_atencion<1 Entonces
costo_diario <- 5;
FinSi
Si tiempo_sin_atencion>=1 Y tiempo_sin_atencion<4 Entonces
costo_diario <- 18;
FinSi
Si tiempo_sin_atencion>=4 Y tiempo_sin_atencion<10 Entonces
costo_diario <- 25;
FinSi
Si tiempo_sin_atencion>=10 Entonces
costo_diario <- 30;
FinSi
Si edad>=14 Y edad<=22 Entonces
costo_diario <- costo_diario*1.1;
FinSi
Escribir "Valor de costo diario: ", costo_diario;
FinProceso