Algoritimos E Programação ( ESCOLHA-SE)
Artigos Científicos: Algoritimos E Programação ( ESCOLHA-SE). Pesquise 861.000+ trabalhos acadêmicosPor: marcosandre932 • 14/9/2014 • 393 Palavras (2 Páginas) • 197 Visualizações
1)
var
num : inteiro
inicio
// Seção de Comandos
escreva ("Digite um codigo: ")
leia (num)
escolha num
caso 1
escreva ("Esse produto veio do Sul.")
caso 2
escreva ("Esse produto veio do Norte.")
caso 3
escreva ("Esse produto veio do Leste.")
caso 4
escreva ("Esse produto veio do Oeste.")
caso 5 ate 6
escreva ("Esse produto veio do Nordeste.")
caso 7 ate 9
escreva ("Esse produto veio do Sudeste.")
caso 10 ate 20
escreva ("Esse produto veio do Centro-Oeste.")
caso 21 ate 30
escreva ("Esse produto veio do Noroeste.")
outrocaso
escreva ("Esse produto não existe.")
fimescolha
fimalgoritmo
2)
escreva ("Digite um codigo: ")
leia (idade)
escolha idade
caso 0 ate 15
escreva ("Não Eleitor.")
caso 16 ate 17
escreva("Eleitor Facultativo")
caso 18 ate 65
escreva ("Eleitor Obrigatório.")
outrocaso
escreva ("Eleitor Facultativo.")
fimescolha
fimalgoritmo
3)
var
idade : inteiro
inicio
// Seção de Comandos
escreva ("Digite um codigo: ")
leia (idade)
escolha idade
caso 0 ate 10
escreva ("Valor a ser pago R$30,00")
caso 11 ate 29
escreva ("Valor a ser pago R$60,00")
caso 30 ate 45
escreva ("Valor a ser pago R$120,00")
caso 46 ate 59
escreva ("Valor a ser pago R$150,00")
caso 60 ate 65
escreva ("Valor a ser pago R$250,00")
outrocaso
escreva ("Valor a ser pago R$400,00")
fimescolha
4)
var
valor, valort : real
quantidade : inteiro
inicio
// Seção de Comandos
escreva ("Digite o valor unitario do produto: ")
leia (valor)
escreva ("Digite a quantidade: ")
leia (quantidade)
valort <- (valor*quantidade)
escolha quantidade
caso 0 ate 10
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*5/100)
caso 11 ate 20
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*10/100)
caso 21 ate 30
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*15/100)
outrocaso
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*20/100)
fimescolha
fimalgoritmo
5)
var
valor, valort : real
quantidade : inteiro
inicio
// Seção de Comandos
escreva ("Digite o valor unitario do produto: ")
leia (valor)
escreva ("Digite a quantidade: ")
leia (quantidade)
valort <- (valor*quantidade)
escolha quantidade
caso 0 ate 10
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*5/100)
caso 11 ate 20
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*10/100)
caso 21 ate 30
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*15/100)
outrocaso
escreva ("O valor com desconto é",(valor*quantidade)-(valor*quantidade)*20/100)
...