-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Calcule el costo por realizar una fiesta de carne asada. Si la cantidad de invitados es menor a 30, el costo por persona es de $150, si los invitados están entre 31 y 60, el costo por persona es $140, si están entre 61 y 90, el costo por persona es de $135 y si hay más de 90, el costo por persona es de $130. El costo incluye comida, bebidas, postres y salón por 4 horas, si el evento dura más de 4 horas, se cobra $1,000 por cada hora extra.
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
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Proceso FiestaDeCarneAsada
Escribir Sin Saltar "Ingresa el valor de cantidad de invitados:";
Leer cantidad_de_invitados;
Escribir Sin Saltar "Ingresa el valor de duracion en horas:";
Leer duracion_en_horas;
costo_por_persona <- 0;
Si cantidad_de_invitados<31 Entonces
costo_por_persona <- 150;
FinSi
Si cantidad_de_invitados>=31 Y cantidad_de_invitados<61 Entonces
costo_por_persona <- 140;
FinSi
Si cantidad_de_invitados>=61 Y cantidad_de_invitados<=90 Entonces
costo_por_persona <- 135;
FinSi
Si cantidad_de_invitados>90 Entonces
costo_por_persona <- 130;
FinSi
costo <- costo_por_persona*cantidad_de_invitados;
Si duracion_en_horas>4 Entonces
costo <- costo+(duracion_en_horas-4)*1000;
FinSi
Escribir "Valor de costo: ", costo;
Escribir "Valor de costo por persona: ", costo_por_persona;
FinProceso
Escribir Sin Saltar "Ingresa el valor de cantidad de invitados:";
Leer cantidad_de_invitados;
Escribir Sin Saltar "Ingresa el valor de duracion en horas:";
Leer duracion_en_horas;
costo_por_persona <- 0;
Si cantidad_de_invitados<31 Entonces
costo_por_persona <- 150;
FinSi
Si cantidad_de_invitados>=31 Y cantidad_de_invitados<61 Entonces
costo_por_persona <- 140;
FinSi
Si cantidad_de_invitados>=61 Y cantidad_de_invitados<=90 Entonces
costo_por_persona <- 135;
FinSi
Si cantidad_de_invitados>90 Entonces
costo_por_persona <- 130;
FinSi
costo <- costo_por_persona*cantidad_de_invitados;
Si duracion_en_horas>4 Entonces
costo <- costo+(duracion_en_horas-4)*1000;
FinSi
Escribir "Valor de costo: ", costo;
Escribir "Valor de costo por persona: ", costo_por_persona;
FinProceso