funcao dias_ate_data (int dia, int mes, int ano): int
       int a, m, d
       a <- 0
       m <- 1
       enquanto (m < mes):
           se (m = 2):
       	      d <- 28
           senao se (m = 4 ou m = 6 ou m = 9 ou m = 11):
              d <- 30
           senao:
              d <- 31
       a <- a + d
       m <- m + 1
       retorne 365 * (ano - 1) + a + dia

int dia_hoje
int mes_hoje
int ano_hoje
int dia
int mes
int ano
int a
int m
int d

leia dia_hoje
leia mes_hoje
leia ano_hoje

leia dia
leia mes
leia ano

hoje <- dias_ate_data (dia_hoje, mes_hoje, ano_hoje)
nasc <- dias_ate_data (dia, mes, ano)

mostra hoje - nasc