ClubEnsayos.com - Ensayos de Calidad, Tareas y Monografias
Buscar

Algoritmo Cumpleaños


Enviado por   •  11 de Enero de 2015  •  311 Palabras (2 Páginas)  •  237 Visitas

Página 1 de 2

Entrada:

Salida: Paquetes de platos a usar

Paquetes de vasos a usar

Botellas de refresco a usar

Dinero consumido por cada invitado

Total a pagar por artículos

Total general se gasto en el cumpleaños

Con la siguiente descripción elaborar un algoritmo: Los niños del profesor celebraran su cumpleaños y te piden que repartas la picadera. Los invitados son 145 y lo que se va a repartir es lo siguiente: Bizcocho, refresco y panecillos.

Los refrescos se repartirán en vasos de 12 onzas, los panecillos se repartirán en platos higiénicos, tomando en cuenta que el contenido de cada botella de refresco es de 74 onzas.

Determinar cuántos paquetes de platos necesitamos, cuantas botellas de refresco y cuantos paquetes de vasos vamos a necesitar. Los precios son los siguientes: Refrescos $65 pesos la unidad, bizcocho $1000 pesos la libra, panecillos 5 pesos la unidad, platos $40 pesos el paquete de 25, vasos $80 pesos el paquete de 25 vasos.

Mostrar cantidad de vasos y platos utilizados, el total de dinero consumido por cada invitado, el total a pagar por artículos y el total general a pagar por los gastos del cumpleaños.

Nota: Cada libra de bizcocho da 20 pedazos.

Algoritmo cumpleaños

Inicio

Var invitados=145, bizcocho, refresco, panes, platos, paquete=25, total_gen, platos_pre=40, refresco_pre=65, vasos_pre=80, panes_pre=5, bizcocho_pre=1000, libra, pedazos=20, refresco_onzas=74, vasos_onzas=12

panes = invitados

Onzas = invitados X vasos_onzas

If (invitados X vasos_onzas) Mod refresco_onzas =1 Then

refresco = trunc (onzas / refresco_onzas) +1

EndIf

If invitados Mod paquete =1 Then

Cant_vasos= Trunc(invitados/paquete) + 1

Else

Cant_vasos= invitados/paquete

EndIf

If invitados mod paquete <> 0 then

cant_platos= (Trunc(invitados/paquete) +1) (paquete)

Else

cant_platos= (invitados/paquete) (paquete)

EndIf

...

Descargar como (para miembros actualizados)  txt (2.3 Kb)  
Leer 1 página más »
Disponible sólo en Clubensayos.com