Alg - Faça um algoritmo que leia a idade de uma pessoa expressa em dias e mostre-a expressa em anos, meses e dias.

algoritmo "Anos, meses e dias"

var
  d1,a,m : inteiro
  d : inteiro

inicio

   escreval("Entre com sua idade em dias: ")
   leia(d1)
   a<-d1 div 365
   m<-(d1 mod 365)div 30
   d<-(d1 mod 365)mod 30
   escreva("Você tem: ",a, "ano(s) ", m, "mes(es) ", d, "dia(s).")

fimalgoritmo