Estrutura enquanto e suas aplicações.

Pessoal inicialmente iremos falar sobre a condição enquanto que funciona da seguinte forma: Testa-se uma condição, se a condição for verdadeira, executa-se a sequência de comandos contidos na estrutura, em seguida, testa novamente a condição para verificar se deve ou não executar novamente os comandos, por exemplo:

ENQUANTO CONDIÇÃO FAÇA
[COMANDOS CASO A CONDIÇÃO SEJA VERDADEIRA]
FIM-ENQUANTO

Em pascal

WHILE CONDIÇÃO THEN
BEGIN
[COMANDOS CASO A CONDIÇÃO SEJA VERDADEIRA];
END;

Podemos criar um algoritmo que conte 5 vezes e enquanto conta leia um número e multiplique esse número por 3 e imprima o resultado.

ALGORITMO EXEMPLO1
VAR
X,R,CONT:INTEIRO
INICIO
CONT ←1
ENQUANTO CONT <= 5 FAÇA

ESCREVA “DIGITE O VALOR DO NÚMERO:”;LEIA X

R:= X * 3

ESCREVA R

CONT := CONT + 1

FIM ENQUANTO

FIM

Em pascal

PROGRAM EXEMPLO1;

USES CRT;

VAR X,R,CONT:INTEGER;

BEGIN

CLRSCR;

CONT:=1;

WHILE CONT <=5 THEN

BEGIN

WRITE(‘DIGITE O VALOR DE X:’);READLN(X);

R:=X*3;

WRITELN(R);

CONT:=CONT+1;

END;

READKEY;

END.

Essa semana nos vimos a aplicação da estrutura de repetição ENQUANTO ou WHILE na próxima semana nos falaremos sobre a estrutura REPITA ou REPEAT e suas aplicações fiquem ligados!!!

Fontes de pesquisa e/ou Consulta:

http://www.mfjver.com/apostilas/algoritmos/apostila%20de%20algoritmos%20Modulo%203.pdf