un boeing 747 tiene una capacidad de carga para equipaje de aproximadamente 18.000 kgr. confeccione un algoritmo que controle la recepción de equipajes para este avión, sabiendo : • un bulto no puede exceder la capacidad de carga del avión ni tampoco exceder los 500 kg. • el valor por kilo del bulto es : - de 0 a 25 kg. cero pesos - de 26 a 300 kg. 1500 pesos por kilo de equipaje. - de 301 a 500 kg. 2500 pesos por kilo de equipaje para un vuelo cualquiera se pide: a) número total de bultos ingresados para el vuelo b) peso del bulto más pesado y del más liviano c) peso promedio de los bultos d) ingreso en pesos y en dólares por concepto de carga. construya una tabla de seguimiento con no menos de 15 bultos para realizar la prueba del algoritmo.
Respuestas a la pregunta
Respuesta:
Algoritmo sin_titulo
cantidadBultos<-0
cantidadKilos<-0
cantidadPesos<-0
masPesado<-0
masLiviano<-500
detener<-Falso
mientras cantidadKilos < 18000 y detener==FALSO Hacer
Limpiar Pantalla
Escribir "Control de peso para un boeing 747 "
Escribir "Peso maximo 18,000kgr"
escribir ""
Escribir "Por favor selecione el numero de la accion que desea realizar"
Escribir "Bultos registrados: ",cantidadBultos, " (",cantidadKilos," kgr)"
Escribir "1 - Registrar Bulto"
Escribir "2 - salir"
leer op
segun op Hacer
1:
Escribir ""
Escribir "Ingrese el peso del bulto en kgr:"
leer bulto
si cantidadKilos <18000 Entonces
si (cantidadKilos+bulto)>18000 Entonces
Escribir "Su bulto excede la capacidad maxima de peso por: ",(cantidadKilos+bulto)-18000,"kgr"
SiNo
si bulto > 500 Entonces
Escribir "Su bulto excede ", bulto-500,"kgr del peso limite por bulto de 500kgr"
SiNo
cantidadBultos<-cantidadBultos+1
cantidadKilos<-cantidadKilos+bulto
si bulto >300 y bulto <=500 Entonces
cantidadPesos<-cantidadPesos+(bulto*2500)
SiNo
si bulto > 25 y bulto <=300 Entonces
cantidadPesos<-cantidadPesos+(bulto*1500)
SiNo
FinSi
FinSi
si masPesado < bulto Entonces
masPesado<-bulto
FinSi
si masLiviano > bulto Entonces
masLiviano<-bulto
FinSi
FinSi
FinSi
FinSi
Escribir "Presione cualquier tecla para continuar"
Esperar Tecla
2:
detener<-Verdadero
De Otro Modo:
Escribir "Opcion no valida"
Escribir "Presione cualquier tecla para continuar"
Esperar Tecla
FinSegun
FinMientras
Limpiar Pantalla
Escribir "Avion boeing 747 "
Escribir ""
Escribir "Se han registrado ",cantidadBultos," bultos en este avion"
Escribir "El peso que el avion transporta es de ",cantidadKilos," kgr"
Escribir "El bulto mas pesado es de ",masPesado," kgr"
Escribir "El bulto mas liviano es de ",masLiviano," kgr"
Escribir "Un total en pesos de: ",cantidadPesos
Escribir "Un total en dolares de: ",(cantidadPesos/19.957174)
FinAlgoritmo
