-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy patharquivo.txt
More file actions
41 lines (38 loc) · 841 Bytes
/
Copy patharquivo.txt
File metadata and controls
41 lines (38 loc) · 841 Bytes
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
programa{
funcao inicio() {
real total = 0.0
inteiro case
escreva("Lanchonete Do Isaque - Versao2\n")
faca
{
escreva("Cardapio\n")
escreva(" 1 -> X-Salada 7.00\n")
escreva(" 2 -> X-Bacon 9.00\n")
escreva(" 3 -> X-Egg 6.50\n")
escreva(" 4 -> Refrigerante 8.00\n")
escreva(" 5 -> Finalizar Pedido\n")
escreva("Informe o Numero do Seu pedido: ")
leia(case)
escolha (case){
caso 1:
total = total + 7.00
pare
caso 2:
total = total + 9.00
pare
caso 3:
total = total + 6.50
pare
caso 4:
total = total + 8.00
pare
caso 5:
escreva ("valor total do pedido: ", total)
pare
caso contrario:
escreva ("O valor digitado esta incorreto\n\n")
}
}
enquanto(case != 5)
}
}