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

// um algoritmo Portugol que gera números aleatórios

programa {
  inclua biblioteca Util --> u
  
  funcao inicio() {
    // declaramos a variável que vamos usar
    inteiro numero

    // vamos sortear um número de 1 a 10 (incluindo o
    // 1 e o 10)
    numero = u.sorteia(1, 10)

    // e mostramos o resultado
    escreva("O número sorteado foi: ", numero)
  }
}

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

programa {
  // vamos importar a biblioteca Texto
  inclua biblioteca Texto --> tx
  
  funcao inicio() {
    // vamos criar uma frase
    cadeia frase = "Gosto de programar em Portugol"
    // vamos criar uma sub-cadeia
    cadeia palavra = "Portugol"

    // vamos verificar se a sub-cadeia está contida na cadeia
    se (tx.posicao_texto(palavra, frase, 0) != -1) {
      escreva("A substring está contida na string")   
    }
    senao {
      escreva("A substring não está contida na string") 
    }
  }
}

Informe a potência da lâmpada (em watts): 100
Informe a largura do cômodo (em metros): 6
Informe o comprimento do cômodo (em metros): 4
Serão necessárias 4 lâmpadas.

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

programa {
  // vamos incluir a biblioteca Tipos
  inclua biblioteca Tipos --> tp
  
  funcao inicio() {
    // variáveis usadas na resolução do problema
    real potencia_lampada, largura_comodo, comprimento_comodo
    real area_comodo, potencia_total
    inteiro quant_lampadas
 
    // vamos ler a potência da lâmpada   
    escreva("Informe a potência da lâmpada (em watts): ")
    leia(potencia_lampada)
    
    // vamos ler a largura do cômodo
    escreva("Informe a largura do cômodo (em metros): ")
    leia(largura_comodo)
 
    // agora vamos ler o comprimento do cômodo
    escreva("Informe o comprimento do cômodo (em metros): ")
    leia(comprimento_comodo)

    // agora vamos calcular a área do cômodo
    area_comodo = largura_comodo * comprimento_comodo

    // calculamos a potência total necessária para iluminar
    // todo o cômodo
    potencia_total = area_comodo * 18

    // e finalmente calculamos a quantidade de lâmpadas necessárias
    quant_lampadas = tp.real_para_inteiro(potencia_total / potencia_lampada)

    // será necessário no mínimo uma lâmpada
    se (quant_lampadas == 0) {
      quant_lampadas = quant_lampadas + 1
    }

    // e mostramos o resultado
    escreva("Serão necessárias ", quant_lampadas, " lâmpadas.")
  }
}

Linha 1 e coluna 1: 8
Linha 1 e coluna 2: 1
Linha 1 e coluna 3: 5
Linha 2 e coluna 1: 3
Linha 2 e coluna 2: 9
Linha 2 e coluna 3: 30
Linha 3 e coluna 1: 7
Linha 3 e coluna 2: 23
Linha 3 e coluna 3: 10

Valores na matriz

    8     1     5 
    3     9    30 
    7    23    10 

Os valores pares são: 8 30 10

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

// Um algoritmo que lê uma matriz 3x3
programa {
  funcao inicio() {
    // variáveis usadas na resolução do problema
    inteiro matriz[3][3]
    inteiro i, j

    // vamos pedir para o usuário informar os valores
    // dos elementos da matriz, uma linha de cada vez
    para (inteiro i = 0; i < 3; i++) { 
      para (inteiro j = 0; j < 3; j++) {
        escreva("Linha ", (i + 1), " e coluna ", (j + 1), ": ")
        leia(matriz[i][j])
      }
    }

    // vamos mostrar a matriz da forma que ela foi informada
    escreva("\nValores na matriz:\n\n")
    para (inteiro i = 0; i < 3; i++) {
      para (inteiro j = 0; j < 3; j++) {
        escreva(matriz[i][j], "   ")
      }
      // passa para a próxima linha da matriz
      escreva("\n")
    }

    // agora vamos percorrer a matriz novamente e mostrar
    // apenas os valores pares
    escreva("\nOs valores pares são: ")

    para (inteiro i = 0; i < 3; i++) {
      para (inteiro j = 0; j < 3; j++) {
        // é um número par?
        se (matriz[i][j] % 2 == 0) {
          escreva(matriz[i][j], "  ")
        }
      }
    }
  }
}