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

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

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

Informe um número: 14
O número é par

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

Algoritmo "Um algorítmo para tstar se um número é par ou ímpar"

Var
  // variáveis usadas na resolução do problema
  numero: inteiro

Inicio
  // vamos pedir para o usuário informar o número
  escreva("Informe um número: ")
  leia(numero)

  // vamos testar se o número é par ou ímpar
  se numero mod 2 = 0 entao
    escreval("O número é par")
  senao
    escreval("O número é ímpar")
  fimse

Fimalgoritmo

Informe a quantidade de galinhas: 8
Informe a quantidade de vacas: 3
Informe a quantidade de porcos: 11
Quantidade de animais: 22
Quantidade de patas: 72

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

algoritmo "Desafio da fazenda em VisuAlg"

var
  // variáveis usadas na resolução do problema
  quant_galinhas, quant_vacas, quant_porcos: inteiro
  quant_total_animais, quant_patas_total: inteiro
  
inicio
  // vamos ler a quantidade de cada animal
  escreva("Informe a quantidade de galinhas: ")
  leia(quant_galinhas)
  escreva("Informe a quantidade de vacas: ")
  leia(quant_vacas)
  escreva("Informe a quantidade de porcos: ")
  leia(quant_porcos)

  // vamos calcular a quantidade de animais
  quant_total_animais <- quant_galinhas + quant_vacas + quant_porcos
  escreval("Quantidade de animais: ", quant_total_animais)

  // vamos calcular a quantidade de patas
  quant_patas_total <- quant_galinhas * 2
  quant_patas_total <- quant_patas_total + (quant_vacas * 4)
  quant_patas_total <- quant_patas_total + (quant_porcos * 4)
  escreval("Quantidade de patas: ", quant_patas_total)

fimalgoritmo

// declara um vetor de 10 inteiros
valores: vetor[1..10] de inteiro

Informe um valor: 4
O valor foi encontrado: 3 vezes

Informe um valor: 8
O valor foi encontrado: 1 vezes

Informe um valor: 3
O valor foi encontrado: 0 vezes

----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------

algoritmo "Contar quantas vezes um elemento repete em um vetor"

var
  // variáveis usadas na resolução do problema
  valores: vetor[1..10] de inteiro
  pesquisa, repeticoes, i: inteiro

inicio
  // inicializa um vetor de 10 inteiros
  valores[1] <- 4
  valores[2] <- 21
  valores[3] <- 9
  valores[4] <- 8
  valores[5] <- 12
  valores[6] <- 21
  valores[7] <- 4
  valores[8] <- 4
  valores[9] <- 1
  valores[10] <- 10

  // vamos ler um valor inteiro
  escreva("Informe um valor: ")
  leia(pesquisa)

  // vamos verificar quantas vezes o valor informado está
  // contido no vetor
  repeticoes <- 0
  para i de 1 ate 10 faca
    se valores[i] = pesquisa entao
      // encontrou? vamos contar esta ocorrência
      repeticoes <- repeticoes + 1
    fimse
  fimpara

  // vamos mostrar o resultado
  escreva("O valor foi encontrado: ", repeticoes, " vezes")

fimalgoritmo

document.write(false == '0');