Linguagem Pascal: Comandos Básicos

Tipos de Dados

• Numéricos
  • Inteiro é Integer
  • Real é Real
• Literais
  • Literal[N] é String[N]
• Lógico
  • Lógico (valores Verdadeiro e Falso) é boolean (valores True e False)

Variáveis

• Seção var
• Exemplo:

var
   Contador: integer;
   Preco: real;
   Nome: string[30];
   Termino: boolean;

Instruções Primitivas

• Atribuição := (exemplo: Contador := 1)
• Saída: writeln ('O preço é:', Preço);
• Entrada: readln(Preco, Nome);

SE

if <condição> then
   <comando1>
else
   <comando2>;

CASO

case <expressão> of
   <R1>: <comando1>;
   <R2>: <comando2>;
   ...
else
   <comandos>
end;

PARA

for <contador> := <Inicio> to <Fim> do
   <comando>;

ENQUANTO

while <condição> do
   <comando>;

REPITA

repeat
   <comandos>
until <condição>

Outros

• algoritmo é program
• início é begin
• fim é end

Exemplos

program Fatorial;

var
   Res, Num : integer;

begin
   Res := 1;
   readln(Num);

   while Num > 1 do
     begin
        Res := Res * Num;
        Num := Num - 1
     end;

   writeln(Res)
end.

program PG;

var
   Contador, Termo, Soma : integer;

begin
   Contador := 1;
   Termo := 3; writeln(Termo);
   Soma := 3;

   repeat
      Termo := Termo * 3;
      Soma := Soma + Termo;
      Contador := Contador + 1;
      writeln(Termo);
   until Contador = 20;

   writeln(Soma);
end.

Exercícios

Implemente os programas referentes às questões:

37) Q21 - básico.

38) Q22 - caso.

39) Q26 - para.

40) Q30 - enquanto.

41) Q32 - repita

42) Q33 - repita

43) Q35 - repita