Programação
BRASILEIRO
DISCIPLINA:
LINGUAGEM E TÉCNICAS DE
PROGRAMAÇÃO
Professor: Marcelo Santos Barbosa
LAÇOS DE REPETIÇÃO
A principal vantagem é possuir programas com tamanho reduzido. Podem ser classificados da seguinte forma:
Laços de Repetição Interativa: quando intervenção para repetir a próxima ação.
necessitam
de
Laços de Repetição Iterativa: quando executam as repetições de forma automática.
LAÇO DE REPETIÇÃO CONDICIONAL PRÉ-TESTE
Executa as instruções subordinadas de um bloco após conferir a validade do resultado lógico da condição estabelecida.
Apresentam-se em duas formas:
Laço de repetição para condição verdadeira;
Laço de repetição para condição falsa.
CONTROLE CONDICIONAL VERDADEIRO
Do While e Loop (Faça enquanto...Repita)
Estrutura:
Do While
Loop
SOLUÇÃO PROPOSTA
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim FAT = 1, N, I As Long
N = Val(TextBox1.Text)
I=1
Do While (I N)
FAT = FAT * I
I=I+1
Loop
MsgBox("Fatorial = " & Str(FAT), 64, "Resultado da
Fatorial")
TextBox1.Focus()
LAÇO DE REPETIÇÃO CONDICIONAL PÓS-TESTE
Executa pelo menos uma vez as instruções subordinadas de um bloco conferindo a validade do resultado lógico da condição após a execução.
Apresentam-se em duas formas:
Laço de repetição para condição verdadeira;
Laço de repetição para condição falsa.
CONTROLE CONDICIONAL FALSO
Do e Loop Until (Faça... Repita até)
Estrutura:
Do
Loop Until
SOLUÇÃO PROPOSTA
Dim FAT = 1, N, I As Long
N = Val(TextBox1.Text)
I=1
Do
FAT = FAT * I
I=I+1
Loop Until (I>N)
MsgBox("Fatorial = " & Str(FAT), 64, "Resultado da
Fatorial")
TextBox1.Focus()
CONTROLE CONDICIONAL VERDADEIRO
Do e Loop While (Faça... Repita enquanto)
Estrutura:
Do
Loop While
SOLUÇÃO PROPOSTA
Dim FAT = 1, N, I As Long
N =