Um programa em Pascal

Voltar a página INICIAL : Linguagem de Programação Pascal

O primeiro programa

Bom, acho que aqueles que nunca tiveram a oportunidade de fazer um programa em Pascal, devem estar muito curiosos para saber como deve ser o seu aspecto. Por isso, antes de prosseguir com os meandros da linguagem Pascal, eu mostrarei um pequeno programa devidamente comentado.

PROGRAMA EXEMPLO.PAS -> Pequeno exemplo de um programa em Pascal. Tem a finalidade  única e  exclusiva de mostrar os diversos componentes de um programa em Pascal.

{Tudo que estiver entre chaves são comentários e não são levados em conta pelo compilador.}

Program Primeiro_Exemplo; { este e o cabeçalho do programa }

USES Crt;

{ Aqui estou utilizando uma UNIT, chamada CRT, existem várias, e inclusive você pode criar as suas. Nestas units temos procedures e functions previamente compiladas. }

    Label

          fim;         { a partir deste instante posso utilizar o label fim }

    Const

          Meu_Nome = 'Thelmo'; { nesta área podemos definir todas as constantes que quisermos utilizar no programa }

    Type n = (BRASILEIRA, PORTUGUESA, INGLESA, FRANCESA, ALEMÃ, AMERICANA);

{o Turbo Pascal possui diversos tipos de variáveis predefinidas, mas também permite definir novos tipos na subárea type} 

Var idade                  :integer;

altura                         :real;

nome                         :string[30];

sexo                           :char;

nacionalidade          :n;

{ todas as variáveis que forem utilizadas no corpo do programa deverão ser declaradas na subárea Var }

Procedure Linha;

{a procedure equivale ao conceito de sub-rotina. Sua estrutura pode se tornar tão complexa como de um programa. Esta procedure, traça uma linha

na posição atual do cursor }

Var i:integer;

Begin

For i:=1 to 80 do Write('-');

end;

Function Soma(x,y:integer):integer;

{o Turbo Pascal possui diversas funções pré-definidas, mas o programador também pode definir as suas próprias }

Begin

Soma:=x+y;

end;

{ Podemos definir quantas procedures e functions quisermos }

{ Aqui começa o programa propriamente dito }

Begin

ClrScr; { apaga a tela }

Linha;  { Executa a procedure linha }

Writeln('Meu nome e -------> ',Meu_Nome);

Linha;

Write('Qual o seu nome ----> ');

Readln(Nome);

Linha;

Write('Qual a sua idade ---> ');

Readln(idade);

Linha;

Writeln('nossas idades somam --> ',Soma(34,idade));

Linha;

goto fim;

{ estas linhas serão puladas }

nacionalidade:=BRASILEIRA;

Write('Minha nacionalidade e brasileira');

fim:

Write('Prazer em conhece-lo');

End.

Estrutura de um programa em Pascal

Todo programa em Pascal é subdividido em 3 áreas:

        - cabeçalho do programa

        - área de declarações

        - corpo do programa

Na definição padrão da linguagem Pascal, o Cabeçalho do programa é obrigatório, no entanto, no Turbo Pascal ele é opcional. A área de declarações é subdividida em seis sub-áreas, a saber:

        - Label

        - Const

        - Type

        - Var

        - Procedures

        - Functions

Darei agora, uma breve explicação de cada subárea, pois mais para frente estudaremos cada uma delas com profundidade. Na subárea Label, devemos declarar todos os labels que forem utilizados no corpo do programa. Os labels são utilizados em conjunto com a instrução goto.

Todas as constantes que formos utilizar no nosso programa, podem se assim desejarmos, ser definidas na subárea Const.

O Turbo Pascal tem basicamente 6 tipos de variáveis pré-definidas a saber: Integer, Real, Byte, Boolean, Char e String. No entanto, podemos definir novos tipos de variáveis na subárea Type.

Todas as variáveis utilizadas no programa devem ser declaradas na subárea Var, pois a alocação de espaço de memória para as variáveis é feita durante a compilação. Na subárea Procedures, podemos definir quantas sub-rotinas quisermos. Elas são chamadas durante o programa pelos seus respectivos nomes.

Finalmente, na subárea Functions podemos definir novas funções que depois poderemos utilizar no programa embora o Turbo Pascal possua inúmeras funções pré-definidas. Estas sub-áreas só são obrigatórias caso nós estejamos precisando. Exemplo: se não vamos utilizar variáveis no nosso programa (coisa rara) então não precisamos utilizar a subárea Var. De acordo com a definição padrão da Linguagem Pascal, estas sub-áreas devem aparecer na seqüência que foi dada anteriormente, ou seja, Label - Const - Type - Var - Procedures - Functions. Mas no Turbo Pascal isto é livre.

Por fim, como dito no programa exemplo, existe a possibilidade de se usar a declaração USES, que nos permite utilizar UNITS que nada mais são do que bibliotecas de funções e procedures previamente declaradas.

Voltar a página INICIAL : Linguagem de Programação Pascal