Altoritmo
principal ( ) {
Numeric - VlPiscina, VlCama, VlArvorismo, VlBateBate, VlEscorregador, TotPiscina, TotCama, TotArvorismo, TotBateBate, TotEscorregador, VlSalgadoSimples, VlSalgadoTrab, VlRefri, TotRefri, VlRefriCri, VlRefriAd, QntSalgadosCri, QntSalgadosAd, TotBrindeCri, TotBrindeAd, TotSalgados, VlAluguelSalao, TotAluguelSalao, VlHoras, TotHoras, VlTotal;
Inteiro - nAdultos, nCricancas;
Boolean - S, N
VlPiscina <- 20; VlCama <- 30; VlArvorismo <- 50; VlBateBate <- 15; VlEscorregador <- 10; VlSalgadoSimples <- 0.35; // valor unitario do salgado simples VlSalgadoTrab <- 0.42; // valor unitario do salgado trabalhado VlRefri <- 3.50; VlAluguelSalao <- 37.50; // valor da hora VlTotal <- 0; TotHoras <- 0;
Escreva( '' Digite o N° de Adultos '' );
Leia( nAdultos );
Escreva( '' Digite o N° de Crianças '' );
Leia( nCricancas );
Escreva( '' Digite as horas da Festa '' );
Leia( TotHoras );
Se (VlHoras < 4) { TotAluguelSalao <- 150 };
Se nao { TotAluguelSalao <-- ( VlAluguelSalao * VlHoras ) };
Escreva( ''Deseja Piscina de bolinhas? -- SIM ou NAO --'')
Leia( S )
Se ( S = ''SIM'') { TotPiscina <- VlPiscina * TotHoras };
Se nao { TotPiscina <- 0 S <- ''NAO'' };
Escreva( ''Deseja Cama elástica? -- SIM ou NAO --'')
Leia( S )
Se ( S = ''SIM'') { TotCama <- VlCama * TotHoras };
Se nao { TotCama <- 0 S <- ''NAO'' };
Escreva( ''Deseja Arvorismo? -- SIM ou NAO --'')
Leia( S )
Se ( S = ''SIM'') { TotArvorismo <- VlArvorismo * TotHoras };
Se nao { TotArvorismo <- 0 S <- ''NAO'' };
Escreva( ''Deseja Carrinho Bete-bate? -- SIM ou NAO --'')
Leia( S )
Se ( S =