Exemplo 30

==============================================================

Exemplo 30:

Ler dois valores e imprimir os número do intervalo em ordem crescente.

==============================================================

// Seção de Declarações 

var

valor1,valor2,auxiliar,contador:inteiro

inicio

// Seção de Comandos

escreval("Escreva o primeiro valor.")

leia(valor1)

escreval("Escreva o segundo valor.")

leia(valor2)

// Caso a ordem digitada estiver decrescente, essa instrução coloca na ordem crescente.

se(valor1>valor2) entao

     auxiliar <- valor1

     valor1 <- valor2

     valor2 <- auxiliar

fimse

para contador de valor1 ate valor2 faca

     escreval(contador)

fimpara

fimalgoritmo

==============================================================