Estrutura de programação

Para começar a programar, devemos saber que há duas maneiras de escrever o programa antes de escrever em sua forma final em ingles no programa Turbo Pascal ou qualquer outro programa de criação.

começando pelo Fluxograma de chappin: que consiste em fazer um esboço gráfico de seu programa seguindo a ordem.

Português Estruturado: consiste em escrever o programa em português em sua estrutura de ambiente pascal.

exemplo de portugues estruturado:

1 - Elaborar um programa que leia um número e informe seu dado.

Programa calculodobro;
var num, dobro: inteiro

inicio
Escreva('Número: ');
Leia(num);
dobro := num * 2;
Escreva('Dobro: ');
Leia
Fim.

onde voce estipula que a variável " num " irá guardar o valor a ser calculado. pode usar qualquer variável desde que se use sempre ela nos passos de Escrita e leitura.

a variável "dobro" representa o resultado do cálculo da variável "num", ou seja o dobro vai ser atribuido ao valor de num vezes 2, resultando em seu dobro. poderia também nesse caso, usar o calculo "num + num " onde a variável "num " irá somar-se com ela mesma, assim resultando em seu dobro.

O programa elaborado, deve seguir uma estrutura de organização para que fique mais fácil de visualiza-la e encontrar algum erro se tiver.

Agora vamos ver como é escrito a estrutura do programa no ambiente pascal.

Program calculodobro;
var num, dobro : integer;
Begin
write('Número: ');
readln(num);
dobro := num * 2
write('O dobro é: ', dobro);
readln;
end.

este é o modo clássico de montar a estrutura. mas ele pode ser escrito com algumas mudanças que deixam um pouco mais organizado e menos linhas. podemos escrever assim:

Program Calculodobro;
var num, dobro: integer;
begin
write('Numero: '); readln(num);
dobro := num * 2;
write('O dobro : ', dobro); readln;
end.

É possível colocar as variáveis embaixo da palavra Var, fica mais organizado ainda.

Bom, depois de testar o programa, você ja deve ter percebido que os outros testes que você fez, ficou na tela, atrapalhando sua visão. existe um modo de limpar a tela. que podemos fazer com os seguintes comandos:

logo abaixo de Program, é adicionado " uses crt;" e baixo de Begin é adicionado o "clrscr;

ficando assim:

Program calculodobro;
uses crt;
var num, dobro : integer;
Begin
clrscr;
write('Número: ');
readln(num);
dobro := num * 2
write('O dobro é: ', dobro);
readln;
end.