3.14) Escreva um algorítmo que leia três valores correspondente ao dia,mês e ano de nascimento de uma pessoa e outro três valores correspondentes ao dia,mês e ano do dia corrente. O algoritmo deve escrever a idade da pessoa.

algoritmo "Idade da pessoa"
var
 aH,mH,dH,aN,mN,dN,xA,xD,xM,tD,tM : inteiro
inicio
escreval ("Informe dia de nascimento")
leia(dN)
escreval ("Informe o mes de nascimento")
leia(mN)
escreval ("Informe o ano de nascimento")
leia(aN)
escreval ("Informe o dia de hoje")
leia(dH)
escreval ("Informe o mes de hoje")
leia(mH)
escreval ("Informe o ano de hoje")
leia(aH)
xA <- (aH -1)- aN
xM <- (mH +11 -mN)
xD <- (dH +30 - dN)
se (xD >30)entao
tD <- xD -30
xM <- xM + 1
fimse
se (xM >12) entao
tM <- xM -12
xA <- xA +1
fimse
escreval (" A Idade eh",xA,"anos",tm,"meses",td,"dias")
fimalgoritmo