3-14 - Escreva um algoritmo que leia 3 valores correspondentes ao dia, mês e ano de nascimento de uma pessoa e outros três valores correspondentes ao dia, mês e ano do dia corrente. O algoritmo deve escrever a idade da pessoa.

algoritmo "Calcule a idade"
var
ano, mes, dia, diaNascimento, mesNascimento, anoNascimento, diaAtual, mesAtual, anoAtual: real
inicio
 escreval ("Calcule a idade ")
 escreva ("Informe o dia do nascimento: ")
 leia (diaNascimento)
 escreva ("Informe o mês do nascimento: ")
 leia (mesNascimento)
 escreva ("Informe o ano do nascimento: ")
 leia (anoNascimento)
 escreva ("Informe o dia de hoje: ")
 leia (diaAtual)
 escreva ("Informe o mês corrente: ")
 leia (mesAtual)
 escreva ("Informe o ano corrente: ")
 leia (anoAtual)
  ano <- anoAtual - anoNascimento
  mes <- mesAtual - mesNascimento
  dia <- diaAtual - diaNascimento
  escreva (" Você tem hoje: ", ano, " ano(s) ", mes, " mês(es) e ", dia, " dia(s)")
  
fimalgoritmo