algoritmo "Lista 35"

var
NOME, SEXO: caractere
IDADE : inteiro
inicio
escreva ("Digite o Nome:")
leia(NOME)
escreva ("Digite F para sexo FEMININO e M para sexo MASCULINO:")
leia(SEXO)
escreva ("Digite a Idade:")
leia(IDADE)
se (SEXO="F")e(IDADE<25) entao
   escreva (NOME," ACEITA!!!")
senao
   escreva (NOME," NÃO ACEITA!!!")
fimse

fimalgoritmo