Olá Angelo, estive a ver o teu código, e reparei nos seguintes problemas: - não pedes todas as variáveis para utilizar (por ex: falta pedir o consumo); - estás a pedir o valor do apartamento A,B e C, e a escrever na respectiva variável, quando deves é o tipo de apartamento que o cliente reservou; - quando fazes os if, para saber qual o tipo de apartamento não estás a utilizar as constantes que criaste mas sim as variáveis apt_a, apt_b e apt_c,; - estás também a utilizar a variável tipo_apt mas esta não tem nenhum valor atribuído; Foram estes os erros que detectei. Nuno Oliveira --- On Sat, 5/23/09, COMPUTADOR(Entreajuda) <[email protected]> wrote: Caro Nuno, como o programa pede para exibir o nome do hospede, o número de diarias utilizadas, o valor do consumo interno e finalmente ler o valor da taxa de serviço, sabendo que; o valor do apartamento A é 15000 B é 10000 C é 7500 D é 5000 eu fiz da seguinte maneira: program hospedaria; uses crt; var nome: string; var n_diarias: integer; var tipo_apt, apt_a, apt_b, apt_c, apt_d, consumo, subtotal, tx_servico: real; begin clrscr; write('digite o valor apartamento A: ' ); readln(apt_a); write('digite o valor do apartamento B: '); readln(apt_b); write('digite o valor do apartamento C: '); readln(apt_d); subtotal:= 15000 * n_diarias + consumo; tx_servico:= subtotal /100 * 10; writeln(' o valor da taxa de serviço e: ', tx_servico:2:2); readkey; end. até aquí o programa funciona...Mas como sei que o valor do tipo de apartamente sao valores fixos, então pensei em atribuir valores as variaveis e daí criar 4 condições que consistem em exibir só o resultado que a atenda uma determinada condição isto de acordo com o tipo de apartamento que o hóspede escolher. e fiz o isso que nao funciona. const a:= 15000; b:= 1000; c:= 7500; d:= 5000; begin if tipo_apt = apt_a then subtotal:= apt_a * n_diarias + consumo else if tipo_apt = apt_b then subtotal:= apt_b * n_diarias + consumo else if tipo_apt = apt_c then subtotal:= apt_c * n_diarias + consumo else if tipo_apt = apt_d then subtotal:= apt_d * n_diarias + consumo; end. apartir daquí tudo dá zebra porq tambem nao consigo encotra a maneira de exibir e calcular e nem e tambem as variaveis que atribui valores nao sao reconhecidos.... se alquém mais pude ajudar eu acredeço antecipadamente, Angelo Mavunino > From: [email protected] > > Angelo, > > tens de ser mais específico, onde é que tens as dúvidas? > Para realizares este programa tens de começar por pedir ao utilizador os > dados pretendidos, depois é só fazer os cálculos e no fim apresentas esses dados no ecran. Basicamente é isto que tens de fazer, agora ao tentares fazer isto vais encontrar algumas dúvidas e aí envias uma mensagem para a lista que alguém há-de ajudar-te. > > Nuno Oliveira > > ________________________________________ > From: COMPUTADOR(Entreajuda) <[email protected]> > > > caros amigos do forum, > > sou principiante no mundo de programação e gostaria que se alguém for capaz, > que me ajudasse a desenvolver o meu primeiro projecto > em pascal, que consiste no seguinte: > > Consiste em efectuar um programa para calcular a conta final de um hóspede de > um > hotel, considerando que: > • Serão lidos o nome do hóspede, o tipo do apartamento utilizado (A, B, C > ou D), o número de diárias utilizadas pelo hóspede e o valor do consumo > interno do hóspede; > • Escreva a conta final contendo: o nome do hóspede, o tipo do > apartamento, o número de diárias utilizadas, o valor unitário da diária, o > valor total das diárias, o valor do consumo interno, o subtotal, o valor da > taxa de serviço e o total geral. > • O valor da taxa de serviço equivale a 10% do subtotal; > • O valor da diária é determinado pela seguinte tabela: > TIPO DO APTO. VALOR DA DIÁRIA (Kz) > A 15000,00 > B 10000,00 > C 7500,00 > D 5000,00 > . > O programa deve ser realizado em linguagem de programação Pascal. > Avaliação > > No projecto devera constar os seguintes componentes: > • Código fonte do programa, comentado; > • Manual técnico do projecto, em formato de documento ( .doc). > • Manual do Utilizador, em formato de documento ( .doc). > > Angelo Mavunino --~--~---------~--~----~------------~-------~--~----~ ----------------------------------------------------------------------- Revista COMPUTADOR http://www.clubeinformatica.com ----------------------------------------------------------------------- Para enviar mensagens para este grupo, envie um email para [email protected] Para anular a inscrição neste grupo, envie um email para [email protected] Para mais opções, visite este grupo em http://groups.google.pt/group/ajuda-informatica/ -~----------~----~----~----~------~----~------~--~---
