Question

Crie um programa que contenha o ano de nascimento e o ano atual. Ao final mostre a idade e se pode tirar a carteira de habilitação caso tenha 18 anos ou mais.

Answer 1

Resposta:

Var

 Ano: Real;

Begin

 writeln('Digite o ano do seu nascimento');

 writeln;

 read(Ano);

 writeln;

 

 If Ano <= 2003 then

 writeln ('Você pode tirar a sua carteira de habilitação');

 

 If Ano >= 2004 then

 writeln ('Você não pode tirar a sua carteira de habilitação');

 

 readkey

             

End.

Explicação: