Advertisement
Guest User

Untitled

a guest
Aug 16th, 2017
180
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. algoritmo "Alg37"
  2. var
  3. NOME,LETRA: caracter
  4. inicio
  5. escreva ("Digite o seu nome: ")
  6. leia (NOME)
  7. LETRA<-copia(NOME,1,1)
  8. escolha LETRA
  9. caso "A","a","E","e","I","i","O","o","U","u"
  10. escreva ("A primeira letra do seu nome é vogal.")
  11. outrocaso
  12. escreva ("A primeira letra do seu nome é consoante.")
  13. fimescolha
  14. fimalgoritmo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement