sexta-feira, 5 de julho de 2013

VISUALG

algoritmo "CAFÉ SENAI"
// Função :
// Autor :
// Data : 5/7/2013
// Seção de Declarações
var
x: inteiro
op: inteiro
monta_menu: caracter
procedimento monta_menu(nome: caracter)
var
inicio
   escreval(nome)
   escreval("-----menu de sistema-----")
   escreval("1. Refrigerante                 ")
   escreval("2. Calzone                       ")
   escreval("3. Coxinha                       ")
   escreval("4. Café                            ")
   escreval("--------------------------")
fimprocedimento
inicio
monta_menu("       CAFÉ SENAI        ")
escreval("  escolha uma opção    ")
leia(op)
limpatela
escolha(op)
caso 1
escreval("refrigerante ")
caso 2
escreval("calzone ")
caso 3
escreval("coxinha ")
caso 4
escreval("cafe")
fimescolha
fimpara
fimalgoritmo