Algoritmo 18+

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "ACESSO_18+"
VAR
idade: inteiro
nome: caractere
INICIO
ESCREVA("Informe seu nome: ")
LEIA(NOME)
ESCREVAL("-----------------------------------------------------")
ESCREVAL("Bem-vindo, ", NOME, "!", " PG, nos diga a sua idade: ")
LEIA(IDADE)
ESCREVAL("-----------------------------------------------------")
SE (IDADE >= 18) ENTAO
ESCREVAL("Okay, ", nome, "!", " você tem", IDADE, " anos e tem direito ao acesso!")
SENAO
ESCREVAL("Que pena, ", nome, "!", " você precisa ter 18 anos para ter acesso ao site")
FIMSE
FIMALGORITMO