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

 algoritmo" Calcular idade em anos, meses, dias."
   var
   anos, meses, dias: inteiro
  inicio
  escreva("Digite os dias :")
  leia(dias)
  anos <- (dias div 365)
  meses <- ((dias mod 365)div 30)
  dias <- ((dias mod 365)mod 30)
  escreva ("  Idade em anos=", anos)
  escreva ("  Idade em meses=", meses)
  escreva ("  Idade em dias=", dias)

  fimalgoritmo