Constantes
Uma constante é uma variável que não muda o seu valor durante o programa ( com exeção das constantes tipadas ). As constantes são declaradas em um seção chamada Const. Nesta seção você indica o nome da constante, ou seja, seu identifcador e o seu valor.
Sintaxe 01
Const
nome_da_constante = Valor_da_constante;
Sintaxe 02 ( Canstante tipada )
Const
nome_da_constante: Tipo = Valor_da_constante;
A sintaxe 02 declara uma constante tipada. Mas o é
isto !? Uma constante tipada é uma variável que possui um valor
inicial. Note que a declaração de um constante tipada é
bastante semelhante a de uma variável diferindo apenas pela atribuição
de um valor inicial. ( = Valor_da_Constante ). As constantes tipadas podem ter
seu valor alterado no programa.
Exemplo da Sintaxe 01
Program constantes;
Const
Autor =' Angivaldo Almeida Ferreira Júnior';
Numero_de_Carros = 987879;
Condicao = true;
Begin
Writeln ('O
meu nome é', Autor);
If Condicao
= true then
Writeln('O número de carros em
Jacobina é ', Numero_de_Carros);
End.
Exemplo da Sintaxe 02
Program constantes;
Const
Autor: String[36] = ' Angivaldo Almeida Ferreira
Júnior';
Numero_de_Carros: Real = 987879;
Condicao: Boolean = True;
Begin
Writeln ('O
meu nome é', Autor);
Writeln ('O
número de carros em Jacobina é ',Numero_de_carros);
Write ('Escreva
o nome do novo autor - ');
Readln (autor);
Write ('Escreva
o novo número de carros em Jacobina - ');
Readln (numero_de_carros);
Writeln ('O
nome do novo autor é ', Autor);
Writeln ('O
novo número de carros em Jacobina é ',Numero_de_carros);
Writeln ('A
condição inicial era ',Condicao);
Condicao:= False;
Writeln ('Agora
é ',Condicao);
End.
Obs: Note que apesar
de delaradas na seção Const os identificadores Autor,
Número_ de_ carros e Condicao são variáveis. A diferença
está no fato de possuirem um valor inicial.