Algoritmo - Lanchonete

Prévia do material em texto

Algoritmo "lanchonete" 
// Disciplina : [Linguagem e Lógica de Programação] 
// Professor : Antonio Carlos Nicolodi 
 
Var 
cod,quant:inteiro 
valor:real 
Inicio 
 escreval("=============================================") 
 escreval(" SISTEMA DA LANCHONETE ") 
 escreval("=============================================") 
 escreval 
 escreval("INSTRUÇÕES:") 
 escreval("1º=Depois de cada informação pressione (ENTER).") 
 escreval("2º=Para números decimais utilize o ponto(.).") 
 escreval("3º=Para sair do programa precione (ESC).") 
 escreval 
 escreval("=======MENU======") 
 escreval("|CODIGO | PREÇO |") 
 escreval("|1 | R$5.00|") 
 escreval("|2 | R$3.50|") 
 escreval("|3 | R$4.80|") 
 escreval("|4 | R$8.90|") 
 escreval("|5 | R$7.32|") 
 escreval("=================") 
 escreval 
 escreval("===========INFORMAÇÕES DA COMPRA==============") 
 escreva("Codigo do produto comprado: ") 
 leia(cod) 
 escreva("Quantidade comprada: ") 
 leia(quant) 
 escreval("====================RESULTADO=================") 
 escolha(cod) 
 caso 1 
 valor<-quant*5 
 escreval("Valor a pagar: R$",valor:4:2) 
 caso 2 
 valor<-quant*3.5 
 escreval("Valor a pagar: R$",valor:4:2) 
 caso 3 
 valor<-quant*4.8 
 escreval("Valor a pagar: R$",valor:4:2) 
 caso 4 
 valor<-quant*8.9 
 escreval("Valor a pagar: R$",valor:4:2) 
 caso 5 
 valor<-quant*7.32 
 escreval("Valor a pagar: R$",valor:4:2) 
 outrocaso 
 escreval("Codigo invalido") 
 fimescolha 
 escreval("==============================================") 
 escreval 
 escreval("==============================================") 
 escreval(" OBRIGADO POR UTILIZA ") 
 escreval("==============================================") 
Fimalgoritmo