Ir ao conteúdo
  • Cadastre-se

Brunolima077

Membro Júnior
  • Posts

    5
  • Cadastrado em

  • Última visita

Reputação

0
  1. algoritmo "semnome" // Função : // Autor : // Data : 31/05/2016 // Seção de Declarações var nome:caracter i, data, diarias, adulto, crianca, apto, cama, consumo, agua, gas, refri, ceva, copa, cafe, croi, sanduba, sopa, fondue, lava, calca, lavapassa, camiseta:inteiro lavapassa1, camisa, lavapassa2, moleton, lavapassa3, jaqueta, lavapassa4, meia, lavapassa5, bermuda, lavapassa6, infantil, lavapassa7, terno, lavapassa8:inteiro paleto, lavapassa9, tenis, lavapassa10, sapato, lavapassa11, malha, lavapassa12, massagem, shiatsu, reflexo, drena:inteiro vl_uni, vl_tot: real inicio para i de 1 ate 30 faca escreval("HOTEL BEM ESTAR") escreval("") escreva("Nome do Cliente...: ") leia(nome) escreva("Data de entrada(digite sem espaços ou carcteres especiais)...: ") leia(data) escreva("Número de diárias............................................: ") leia(diarias) escreva("Número de adultos............................................: ") leia(adulto) escreva("Número de crianças...........................................: ") leia(crianca) escreva("Apto: 1)Single 2)Duplo 3)Triplo 4)Triplo Casal 5)Quadruplo Casal ") leia(apto) escreva("Cama extra(Válido para Ap Single, Duplo e Triplo): 1)Sim 2)Não ") leia(cama) escreva("Frigobar(bebidas)......: Houve consumo? 1)Sim 2)Não ") leia(consumo) se(consumo=1) então escreval("Bebidas(quantidade):") escreva("Água sem gás........: ") leia(agua) escreva("Água com gás........: ") leia(gas) escreva("Refri(lata).........: ") leia(refri) escreva("Cervaja(lata).......: ") leia(ceva) senao se(consumo=2)então escreval("Sem consumo de bebidas") escreval("") senao escreva("Erro:Responda 1 ou 2") escreval("") fimse fimse escreva("Alimentação(copa): Houve consumo? 1)Sim 2)Não ") leia(copa) se(copa=1)então escreval("Tipo de Alimentação(Qtdade):") escreva("Café da manhã...............: ") leia(cafe) escreva("Croissant...................: ") leia(croi) escreva("Sanduíche Natural...........: ") leia(sanduba) escreva("Sopa de legumes e carne.....: ") leia(sopa) escreva("Fondue......................: ") leia(fondue) senao se(copa=2)então escreval("Sem consumo na copa do hotel") escreval("") senao escreval("Erro:Responda 1 ou 2") escreval("") fimse fimse escreval("Lavanderia e Passadoria") escreva("Houve uso dos serviços? 1)Sim 2)Não ") leia(lava) se(lava=1)então escreval("Especifique o uso dos serviços:") escreva("Calças(qtdade).................: ") leia(calca) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa) escreva("Camisetas(qtdade)..............: ") leia(camiseta) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa1) escreva("Camisa social(qtdade)..........: ") leia(camisa) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa2) escreva("Moleton(qtdade)................: ") leia(moleton) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa3) escreva("Jaqueta(qtdade)................: ") leia(jaqueta) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa4) escreva("Meia/roupa íntima(qtdade/peças): ") leia(meia) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa5) escreva("Bermuda(qtdade)................: ") leia(Bermuda) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa6) escreva("Roupa infantil(qtdade).........: ") leia(infantil) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa7) escreva("Terno completo(qtdade).........: ") leia(terno) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa8) escreva("Paletó(qtdade).................: ") leia(paleto) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa9) escreva("Tênis(qtdade/pares)............: ") leia(tenis) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa10) escreva("Sapato(qtdade).................: ") leia(sapato) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa11) escreva("Malha de lã/Pullover(qtdade)...: ") leia(malha) escreva("1)Lavanderia 2)Lavanderia e Passadoria ") leia(lavapassa12) senao se(lava=2)então escreval("Sem utilização dos serviços de lavanderia e passaderia") escreval("") senao escreval("Erro:Responda 1 ou 2") escreval("") fimse fimse escreval("Serviços de Massagem") escreva("Utilizou serviços de massagem? 1)Sim 2)Não ") leia(massagem) se(massagem=1)então escreval("Quais serviços de massagem foram utilizados?") escreva("Shiatsu(qtdade/sessões)...........: ") leia(shiatsu) escreva("Reflexologia(qtdade/sessões)......: ") leia(reflexo) escreva("Drenagem Linfática(qtdade/sessões): ") leia(drena) senao se(massagem=2)então escreval("Não foram utilizados serviços de massagem") escreval("") senao escreval("Erro:Responda 1 ou 2") escreval("") fimse fimse se diarias < 5 então novadiaria <- diaria*5/100 fimse se diarias = 5 e <= 10 então novadiaria2 <- diaria*3/100 fimse se diarias > 10 então novadiaria3 <- diaria*1/100 fimse se apto = 1 então vl_uni <- 130 fimse se apto = 2 então vl_uni <- 200 fimse se apto = 3 então vl_uni <- 280 fimse se apto = 4 então vl_uni <- 280 fimse se apto = 5 então vl_uni <- 340 fimse vl_tot <- vl_uni * diarias fimpara //armazenar, em vetor, os valores arrecadados por dia, com a reserva, o frigobar, a lavanderia e a massagem; //verificar o valor arrecadado em acomodações em um determinado dia; vl_tot <- vl_uni * diarias //verificar o valor arrecadado no mês com acomodações; //verificar qual o dia de maior arrecadação em relação as acomodações; //verificar qual o serviço de maior arrecadação no mês. . // Seção de Comandos fimalgoritmo
  2. @mi2011 O hotel “Bem Estar” precisa desenvolver um sistema para fazer a gestão de seu hotel. Os gestores do hotel especificaram que este sistema deverá compreender as seguintes funcionalidades: Acomodações, que gerencia a reserva dos hóspedes, o serviço de frigobar e alimentação oferecido pelo hotel; Serviços e facilidades, que gerencia os demais serviços e facilidades oferecidos pelo hotel: lavanderia, massagem.
  3. @Simon Viegas minha duvida esta no vetor não entendi muito bem como funciona, e me pede para armazenar em vetor os valores arrecadados por dia, com reserva, frigobar, massagem e lavanderia. Poderia me ajudar? Obrigado
  4. Boa tarde! Sou iniciante na area de T.I. minha professora passou esse exercicio e estou quebrando a cabeça! Alguém me ajuda por favor.. Isso é o que tenho pronto até o momento var nome, tipo : caracter diarias : inteiro vl_uni, vl_tot, vl_sub, vl_ger, consumo, taxa_servico : real inicio // Seção de Comandos Escreval("***********************************") Escreval("Diárias ***************************") Escreval("Nome do Hóspede: ") leia(nome) Escreval("Tipo de Apartamento (Single/Duplo/Triplo/Triplo Casal/Quádruplo Casal): ") leia(tipo) Escreval("Quantidade de Diárias: ") leia(diarias) Escreval("Valor do Consumo Interno: ") leia(consumo) //processamento se tipo = "Single" então vl_uni <- 130 fimse se tipo = "Duplo" então vl_uni <- 200 fimse se tipo = "Triplo" então vl_uni <- 280 fimse se tipo = "Triplo Casal" então vl_uni <- 280 fimse se tipo = "Quádruplo Casal" então vl_uni <- 340 fimse vl_tot <- vl_uni * diarias vl_sub <- vl_tot + consumo taxa_servico <- vl_sub/100 vl_ger <- vl_sub + taxa_servico // saida Escreval() Escreval() Escreval("***********************************") Escreval("Diárias Calculadas ****************") Escreval("Nome do Hóspede: ", nome) Escreval("Tipo de Apartamento: ", tipo) Escreval("Quantidade de Diárias: ", diarias) Escreval("Valor Unitário: ",vl_uni) Escreval("Valor Total: ", vl_tot) Escreval("Valor do Consumo Interno: ", consumo) Escreval("SubTotal: ", vl_sub) Escreval("Valor da Taxa de Serviço ", taxa_servico) Escreval("SubTotal: ", vl_ger) fimalgoritmo

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...