Claro! Aqui está um algoritmo em VisuAlg que atende às especificações que você forneceu: ```pascal // Declaração de variáveis inteiro numero, contPositivos, contNegativos, contMult3, contMult5, contMult3e5 real mediaPositivos real percentualPositivos, percentualNegativos inteiro totalNumeros // Inicialização das variáveis contPositivos <- 0 contNegativos <- 0 contMult3 <- 0 contMult5 <- 0 contMult3e5 <- 0 totalNumeros <- 0 mediaPositivos <- 0 // Início do loop para entrada de dados enquanto verdadeiro faça escreva("Digite um número inteiro (0 para finalizar): ") leia(numero) se numero = 0 então pare // Finaliza o loop fimse // Processamento dos números totalNumeros <- totalNumeros + 1 se numero > 0 então contPositivos <- contPositivos + 1 mediaPositivos <- mediaPositivos + numero se numero % 3 = 0 então contMult3 <- contMult3 + 1 fimse se numero % 5 = 0 então contMult5 <- contMult5 + 1 fimse se (numero % 3 = 0) e (numero % 5 = 0) então contMult3e5 <- contMult3e5 + 1 fimse senão contNegativos <- contNegativos + 1 fimse fimenquanto // Cálculo dos percentuais se totalNumeros > 0 então percentualPositivos <- (contPositivos * 100) / totalNumeros percentualNegativos <- (contNegativos * 100) / totalNumeros fimse // Cálculo da média dos números positivos se contPositivos > 0 então mediaPositivos <- mediaPositivos / contPositivos fimse // Exibição dos resultados escreva("Total de números positivos: ", contPositivos) escreva("Total de números negativos: ", contNegativos) escreva("Percentual de números positivos: ", percentualPositivos, "%") escreva("Percentual de números negativos: ", percentualNegativos, "%") escreva("Média dos números positivos: ", mediaPositivos) escreva("Total de múltiplos de 3: ", contMult3) escreva("Total de múltiplos de 5: ", contMult5) escreva("Total de múltiplos de 3 e 5: ", contMult3e5) ``` Esse algoritmo solicita números inteiros ao usuário até que o número 0 seja digitado, processa as informações e exibe as análises solicitadas. Boa sorte com seus estudos!