pascal

ALGORITMOS + PASCAL

5. ESTRUTURA DE CONTROLE – TOMADA DE DECISÕES ................................2
5.1 SELEÇÃO OU ALTERNATIVA SIMPLE..............................................................2
5.2 SELEÇÃO OU ALTERNATIVA COMPOSTA ......................................................2
5.3 SELEÇÃO OU ALTERNATIVA SE’S ANINHADOS OU ENCADEADOS ........3
5.4 ESTRUTURAS DE DECISÃO DO TIPO ESCOLHA ............................................4
5.5 EXERCICIOS ...........................................................................................................7

1

ALGORITMOS + PASCAL
5 - ESTRUTURAS DE CONTROLE - TOMADA DE DECISÕES
Executa uma seqüência de comandos de acordo com resultado de uma comparação
(condição).

5.1 - SELEÇÃO OU ALTERNATIVA SIMPLES
Executa uma seqüência de comandos, se o teste de uma condição for verdadeiro. Caso contrário, o algoritmo não retornará nenhum valor ou expressão.
SE CONDIÇÃO ENTAO
{COMANDOS CASO A CONDIÇÃO SEJA VERDADEIRA}
FIM-SE

Em pascal
IF CONDIÇÃO (v) THEN
{COMANDO CASO A CONDIÇÃO SEJA VERDADEIRA};
Caso exista um bloco de comandos
IF CONDIÇÃO (v) THEN
BEGIN
{BLOCO DE COMANDOS};
END;
Criar um algoritmo para verificar se um número lido via teclado é Par:
ALGORITMO EXEMPLO2
VAR
NUMERO, RESTO:INTEIRO
INICIO
ESCREVA “Digite o número a ser analisado:”;LEIA NUMERO
SE (NUMERO MOD 2) = 0 ENTÃO
ESCREVA “O número:”,NUMERO, “ é par”
FIM-SE
FIM
Em pascal
PROGRAM EXEMPLO2;
USES WINCRT;
VAR
NUMERO,RESTO:INTEGER;
BEGIN
WRITE(‘Digite o número a ser analisado:’);READLN(NUMERO);
IF (NUMERO MOD 2) = 0 THEN
2

ALGORITMOS + PASCAL
WRITELN(‘O número:’,NUMERO);
END.

5.2 - SELEÇÃO OU ALTERNATIVA COMPOSTA
Se uma condição for verdadeira, executa uma sequência de comandos, senão executa outra sequência de comandos.
SE CONDIÇÃO ENTAO
{COMANDOS CASO A CONDIÇÃO SEJA VERDADEIRA}
SENÃO
{COMANDOS CASO A CONDIÇÃO SEJA FALSA}
FIM-SE
Em Pascal
IF CONDIÇÃO (v) THEN
{COMANDO}
ELSE
{COMANDO;