Programa processando rapido

[cjjunior]

Boa Tarde!!

me ajudem !!

Sou iniciante nesta parada de programaçao, estou começando com programinha muito pequeno, so para aprender as funçoes dos codigos.

porém estou com um probleminha, apos compilar, ele nao informa nenhum erro, mais quando o programa funciona, ele nem passa o resultado do calculo e ja encerra o programa,

Gostaria de saber o porque, ou se eu esqueci algum codigo,

*Estou utilizando o programa Lazarus, o documento ultilizado pe o aplicaçao console, (nao sei se tem haver).

program idade;

uses wincrt;


var anoatual, anonasc, suaidade: integer;

begin

   write ('Digite o Ano Atual: ');
   read (anoatual);
   write ('Digite a data de seu nascimento: ');
   read (anonasc);

suaidade:=(anoatual-anonasc);

 write ('sua idade e :', suaidade)

 end.

[viniciusbmatos]

Adicione após escrever a idade:

readkey;

Assim o programa espera o usuário pressionar qualquer tecla antes de fechar.

[cjjunior]

Desculpe a minha falta de conhecimento, é que começei hoje, tente entender.

Este codigo readkey, eu escrevo em que lugar, é que eu coloquei onde você falo, mais deu erro!

[viniciusbmatos]

[color=#3b6ac8]program[/color] idade[color=#323232];[/color]
[color=#3b6ac8]uses[/color]
  wincrt[color=#323232];[/color]
[color=#3b6ac8]var[/color]
  anoatual[color=#323232],[/color] anonasc[color=#323232],[/color] suaidade[color=#323232]:[/color] [color=#a00050]integer[/color][color=#323232];[/color]
[color=#3b6ac8]begin[/color]
  [color=#c73a69]write[/color][color=#323232]([/color][color=#1094a0]'Digite o Ano Atual: '[/color][color=#323232]);[/color]
  [color=#c73a69]read[/color][color=#323232]([/color]anoatual[color=#323232]);[/color]
  [color=#c73a69]write[/color][color=#323232]([/color][color=#1094a0]'Digite a data de seu nascimento: '[/color][color=#323232]);[/color]
  [color=#c73a69]read[/color][color=#323232]([/color]anonasc[color=#323232]);[/color]
  suaidade[color=#323232] := [/color]anoatual[color=#323232] - [/color]anonasc[color=#323232];[/color]
  [color=#c73a69]write[/color][color=#323232]([/color][color=#1094a0]'sua idade e :'[/color][color=#323232],[/color] suaidade[color=#323232]);[/color]
  [U]readkey[color=#323232];[/color][/U]
[color=#3b6ac8]end[/color][color=#323232].[/color]

[cjjunior]

então, dai quando compilo aparece o seguinte erro

calcidade(20,2) Fatal: Syntax error, ";" expected but "identifier READKEY" found

[viniciusbmatos]

Colocou o ponto-e-vírgula após o write?

[color=#969696]// trecho[/color]
  [color=#c73a69]write[/color][color=#323232]([/color][color=#1094a0]'sua idade e :'[/color][color=#323232],[/color] suaidade[color=#323232])[U];[/U][/color]
  readkey[color=#323232];[/color]

[cjjunior]

kkkk,

valeu cara, deu certo; to mó nub ainda;

Deus te Abençoe;

[cjjunior]

Toda vez que eu for criar um projeto, eu tenho que por esse codigo?

porque eu vi uns projeto pronto, e nenhum deles tem, e funciona normal!!...

[viniciusbmatos]

Sempre termine com um comando para esperar o usuário pressionar alguma tecla ou aguardar alguns segundos, ou o programa finaliza.

Pode ser (escolha um):

readln[color=#323232];[/color] [color=#969696]// aguarda o usuário apertar ENTER[/color]
readkey[color=#323232];[/color] [color=#969696]// aguarda o usuário pressionar qualquer tecla[/color]
[color=#c73a69]delay[/color][color=#323232]([/color][color=#1094a0]5000[/color][color=#323232]);[/color] [color=#969696]//aguarda aproximadamente 5 segundos (pode mudar o valor, se quiser)[/color]