Pascal

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:

Início
Fluxograma
FIM
“Digite a medida do lado 1”
L1
“Digite a medida do lado 2”
L2
AreaRe L1 * L2
“A área do retângulo é”, AreaRe

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):

Início
Fluxograma
FIM
“Digite o primeiro número: ”
N1
“Digite o segundo número: ”
N2
N2
N1

Pseudocódigo (Portugol)

Programa N1N2

Var N1, N2: Inteiro

Início Escreva