Um laço PARA que solicita ao usuário 10 números inteiros e mostra o menor e o maior valor informado - Desafio de Programação Resolvido em VisuAlg

Informe o 1º valor: 5
Informe o 2º valor: 10
Informe o 3º valor: 3
Informe o 4º valor: 7
Informe o 5º valor: 5
Informe o 6º valor: 3
Informe o 7º valor: 19
Informe o 8º valor: 4
Informe o 9º valor: 12
Informe o 10º valor: 1
O maior valor lido foi:  19
O menor valor lido foi:  1

Algoritmo "Ler 10 números inteiros e informar o maior e o menor valor lido"

Var
  // variáveis usadas para resolver o problema
  valor: inteiro // guarda o valor lido
  maior, menor: inteiro // variáveis que guardarão o maior e o menor valor lido
  i: inteiro // para controlar o laço

Inicio
  // vamos pedir ao usuário que informe 10 valores inteiros
  para i de 1 até 10 faça
    escreva("Informe o", i, "º valor: ")
    leia(valor)
    
    // esta é a primeira iteração do laço? se for vamos assumir que o
    // maior e menor valor lido são o primeiro valor informado
    se i = 1 então
      maior <- valor
      menor <- valor
    senão
      // não é a primeira iteração
      // vamos verificar se é maior que o valor atual da variável maior
      se valor > maior então
        maior <- valor
      fimse
      // vamos verificar se é menor que o valor atual da variável menor
      se valor < menor então
        menor <- valor
      fimse
    fimse
    
  fimpara

  // vamos exibir o maior e o menor valor lido
  escreval("O maior valor lido foi: ", maior)
  escreval("O menor valor lido foi: ", menor)

Fimalgoritmo