domingo, 5 de dezembro de 2010

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 “Calcula a idade em anos, meses e dias”
  var
    ano, mes, dia, dias: inteiro
 inicio
    escreva (“Digite a idade em dias:”)
    leia(dias)
    ano<-(dias div 365)
    mes<-(dias mod 365)div 30
    dia<-(dias mod 365)mod 30
    escreva (“A idade em anos, meses e dias é”, ano, mes, dia)
 fimalgoritmo

9 comentários: