Trabalhos

A2 – Exercícios preparatórios Fluxograma, Pseudocódigo e Pascal
1. Problema: Montar um algoritmo capaz de ler os dois lados de um retângulo e calcular sua área e apresentar o resultado na tela:
Fluxograma

Pseudocódigo (Portugol)

Programa AreaDoRet

Var L1, L2, AreaRe:Real

Início Escreva “Digite a medida de lado 1” Leia L1 Escreva “Digite a medida do lado 2” Leai L2 AreaRe L1 * L2 Escreva “A área do retângulo é”, AreaRe

Fim.

Código Pascal

{cabeçalho do programa}
Program AreaDoRet;

{área de declarações}
Var L1, L2, AreaRe:Real;

{corpo do programa}
Begin
Writeln(‘Digite a medida de lado 1’); Readln(L1); Writeln(‘Digite a medida do lado 2’); Readln(L2); AreaRe := L1 * L2; Writeln(‘A área do retângulo é’, AreaRe);

End.

Observações:
1. Percebam que a diferença entre o Pseudocódigo e o código Pascal é mínima.
2. E que a lógica (raciocínio) realizada para um, é a mesma utilizada para o outro.
3. Todo conteúdo entre chaves {comentário} no código Pascal é identificado como comentário, e não altera em nada a compilação ou lógica do programa. Seu único objetivo é facilitar o entendimento do código.
4. Diferentemente do Fluxograma e do Pseudocódigo, toda representação de texto em código Pascal vem entre aspas simples ‘texto ‘.
5. O símbolo de atribuição (←) em código Pascal é representado por (:=).

2. Problema: Montar um algoritmo capaz de ler os dois números inteiros e escrevê-los na tela (um em cada linha):

Fluxograma

Pseudocódigo (Portugol)

Programa N1N2

Var N1, N2: Inteiro

Início Escreva “Digite o primeiro número: ” Leia N1 Escreva “Digite o segundo número: ” Leai N2 Escreva N1 Escreva N2

Fim.

Código Pascal

{cabeçalho do programa}
Program N1N2;

{área de declarações}
Var
N1, N2: Integer;

{corpo do programa}
Begin
Write(‘Digite o primeiro