Algoritmo "Verificação de desconto"
Var
idade:inteiro
estudante:logico
Inicio
escreva("Digite a sua idade : ")
leia(idade)
// No VisualG, para ler lógico, o usuário digita "verdadeiro" ou "falso"
escreva("É estudante ? (verdadeiro/falso) : ")
// A expressão lógica usa o operador OU
se (idade < 18) ou (estudante = verdadeiro) entao
escreva("Meia-entrada aplicada. ")
senao
escreva("Valor integral.")
fimse
Fimalgoritmo