Exercício cap.3.14

14. Escreva um algoritmo que leia três valores correspondentes ao dia, mês e ano de nascimento de uma pessoa e outros três valores correspondentes ao dia, mês e ano do dia corrente. O algoritmo deve escrever a idade da pessoa.

Resposta:

1.  algoritmo "Cálculo de idade"
2.  var
3.    dn,mn,an:inteiro
4.    d,m,a:inteiro
5.    idd:inteiro
6.  inicio
7.    escreval("Cálcuo da idade.")
8.    escreva("Digite o dia do seu nascimento = ")
9.    leia(dn)
10.   escreva("Digite o mês do seu nascimento = ")
11.   leia(mn)
12.   escreva("Digite o ano do seu nascimento = ")
13.   leia(an)
14.   escreva("Digite o dia de hoje         = ")
15.   leia(d)
16.   escreva("Digite o mês do dia corrente = ")
17.   leia(m)
18.   escreva("Digite o ano do dia corrente = ")
19.   leia(a)
20.   se (m>=mn) entao
21.    idd <- a-an
22.   senao
23.     se (m=mn) entao
24.       se (d<dn) entao
25.        idd <- (a-an)-1
26.       senao
27.        idd <- (a-an)
28.       fimse
29.     senao
30.      idd <- (a-an)-1
31.     fimse
32.   fimse
33.   escreva("Sua idade é ",idd)
34. fimalgoritmo