Exercicio 21 capitulo 2

A comissão de formatura de um curso está organizando a festa de formatura de sua turma e
levantou as seguintes informações:
25
1. custo do salão (capacidade de 800 pessoas com mesas de 4 pessoas) R$ 2000.00;
2. custo da sonorização: R$ 500,00
3. custo da decoração: R$ 800,00
Além desses custos, que serão rateados igualmente entre os formandos, há custos cuja divisão é
proporcional ao número de convidados do formando. São eles:
1. segurança: necessário um segurança para cada 80 pessoas da festa;
2. garçom: um garçom consegue atender 48 pessoas (ou 12 mesas de 4 pessoas); e
3. bebida.
Escreva um algoritmo que leia o nome de cada um dos cinco formandos com seus respectivos
números de convidados. Ele também deve ler os custos de um segurança, de um garçom e da
bebida. O algoritmo deve calcular e escrever, para cada formando o número de mesas desitnadas
para seus convidados e o custo da festa para eles. As mesas poderão ser compartilhadas entre
convidados de diferentes formandos.

algoritmo "Exercicio 2-21"
var
   //Nomes
   nomeFormando1,nomeFormando2,nomeFormando3,nomeFormando4,nomeFormando5:literal
   //Qtde de convidados
   qtdeConvidadosF1,qtdeConvidadosF2,qtdeConvidadosF3,qtdeConvidadosF4,qtdeConvidadosF5,totalConvidados:inteiro
   //Servicos
   precoBebida,precoGarcom,precoSeguranca:real
   //Custos
   //custoFixoIndividual,custoVariavelIndividualF1,custoVariavelIndividualF2,custoVariavelIndividualF3,custoVariavelIndividualF4,custoVariavelIndividualF5:real
   custoFixoIndividual,custoTotalGarcom,custoTotalSeguranca,custoTotalF1,custoTotalF2,custoTotalF3,custoTotalF4,custoTotalF5:real
inicio
   escreval("Informe o nome do formando 1:")
   leia(nomeFormando1)
   
   escreval("Informe a quantidade de convidados do formando 1:")
   leia(qtdeConvidadosF1)
   
   ///////////////////////////////////////
   escreval("Informe o nome do formando 2:")
   leia(nomeFormando2)
   
   escreval("Informe a quantidade de convidados do formando 2:")
   leia(qtdeConvidadosF2)
   
   ////////////////////////////////////////
   escreval("Informe o nome do formando 3:")
   leia(nomeFormando3)
   
   escreval("Informe a quantidade de convidados do formando 3:")
   leia(qtdeConvidadosF3)
   
   ////////////////////////////////////////
   escreval("Informe o nome do formando 4:")
   leia(nomeFormando4)
   
   escreval("Informe a quantidade de convidados do formando 4:")
   leia(qtdeConvidadosF4)
   
   ////////////////////////////////////////
   escreval("Informe o nome do formando 5:")
   leia(nomeFormando5)
   
   escreval("Informe a quantidade de convidados do formando 5:")
   leia(qtdeConvidadosF5)
   
   ////////////////////////////////////////
   escreval("Informe o custo para um seguranca:")
   leia(precoSeguranca)
   
   escreval("Informe o custo para um garçom:")
   leia(precoGarcom)
   
   escreval("Informe o custo da bebida por convidado:")
   leia(precoBebida)
   
   ///////////////////////////////////////
   //Calculando custos fixos por formando:
   //400 do salao
   //100 da sonorizacao
   //800 da decoracao
   custoFixoIndividual<- 400+100+160
   
   totalConvidados<- qtdeConvidadosF1+qtdeConvidadosF2+qtdeConvidadosF3+qtdeConvidadosF4+qtdeConvidadosF5
   
   //Descobrimos quantos garçons serao necessarios e multiplicamos o custo de cada garcom
   //Por exemplo: 80 convidados no total / 48 = 1.6666666666... garcons. Nao tem como medir um garcom e meio oÔ. Entao pego o inteiro desse resultado = 1 e somo mais 1 = 2 garcons
   //Se nos ja usassemos verificacoes condicionais, daria para ver quando adicionariamos 1 ou nao. Se o total de conviddos fosse multiplo de 48, nunca precisariamos somar 1.
   custoTotalGarcom<- ((totalConvidados div 48)+1)*precoGarcom
   
   //Descobrimos quantos segurancas serao necessarios e multiplicamos o custo de cada seguranca
   //Se nos ja usassemos verificacoes condicionais, daria para ver quando adcionariamos 1 ou nao
   custoTotalSeguranca<- ((totalConvidados div 80)+1)*precoSeguranca
   
   custoTotalF1<- ((custoTotalGarcom/totalConvidados)*qtdeConvidadosF1) + ((custoTotalSeguranca/totalConvidados) + (precoBebida*qtdeConvidadosF1)*qtdeConvidadosF1)+custoFixoIndividual
   custoTotalF2<- ((custoTotalGarcom/totalConvidados)*qtdeConvidadosF2) + ((custoTotalSeguranca/totalConvidados) + (precoBebida*qtdeConvidadosF2)*qtdeConvidadosF2)+custoFixoIndividual
   custoTotalF3<- ((custoTotalGarcom/totalConvidados)*qtdeConvidadosF3) + ((custoTotalSeguranca/totalConvidados) + (precoBebida*qtdeConvidadosF3)*qtdeConvidadosF3)+custoFixoIndividual
   custoTotalF4<- ((custoTotalGarcom/totalConvidados)*qtdeConvidadosF4) + ((custoTotalSeguranca/totalConvidados) + (precoBebida*qtdeConvidadosF4)*qtdeConvidadosF4)+custoFixoIndividual
   custoTotalF5<- ((custoTotalGarcom/totalConvidados)*qtdeConvidadosF5) + ((custoTotalSeguranca/totalConvidados) + (precoBebida*qtdeConvidadosF5)*qtdeConvidadosF5)+custoFixoIndividual
   
   escreval("* * * * * * * *  C U S T O S * * * * * * * *")
   escreval("O formando ",nomeFormando1," gastará ",custoTotalF1:5:2," R$")
   escreval("O formando ",nomeFormando2," gastará ",custoTotalF2:5:2," R$")
   escreval("O formando ",nomeFormando3," gastará ",custoTotalF3:5:2," R$")
   escreval("O formando ",nomeFormando4," gastará ",custoTotalF4:5:2," R$")
   escreval("O formando ",nomeFormando5," gastará ",custoTotalF5:5:2," R$")
   escreval
   escreval("* * * * * * * * M E S A S  * * * * * * * * * ")
   escreval("O formando ",nomeFormando1," precisará de ",qtdeConvidadosF1/4)
   escreval("O formando ",nomeFormando2," precisará de ",qtdeConvidadosF2/4)
   escreval("O formando ",nomeFormando3," precisará de ",qtdeConvidadosF3/4)
   escreval("O formando ",nomeFormando4," precisará de ",qtdeConvidadosF4/4)
   escreval("O formando ",nomeFormando5," precisará de ",qtdeConvidadosF5/4)
   
fimalgoritmo