Cálculo de número perfeito range
Publicado por Sérgio Abrantes Junior (última atualização em 23/05/2020)
[ Hits: 1.390 ]
Homepage: https://br.linkedin.com/in/sergioabrantes
numeroPerfeitoRange
Shell script que mostra os números perfeitos encontrados num range de números informados na execução. Ao final mostra o total de números perfeitos encontrados.
Otimizações de código:
Analisa até o divisor ser no máximo sua metade:
Ex.: Número informado = 10
Ele checará até o 5 no máximo.
#!/usr/bin/env bash # shellcheck disable=SC2162 # Prove: NumeroPerfeitoRange # Descricao Curta: Verifica se número informado é perfeito # Descrição Longa: Verifica se número informado é perfeito # Frequencia: Sob demanda # Autor: Sérgio Abrantes # Contato: sergioabrantes@gmail.com # Site: https://github.com/sergioabrantesjunior/numeroPerfeitoRange # # # Histórico: # # v1.0.0 2020-01-17, Sérgio Abrantes: # - Versão inicial do script : ' Em Matemática, um número perfeito é um número inteiro para o qual a soma de todos os seus divisores positivos próprios (excluindo ele mesmo) é igual ao próprio número. Por exemplo, o número 6 é um número perfeito, pois: 6 = 1 + 2 + 3 O próximo número perfeito é o 28, pois: 28 = 1+ 2+ 4+ 7+ 14 Os quatro primeiros números perfeitos (6, 28, 496 e 8.128) eram os únicos conhecidos pelos gregos antigos desde pelo menos Euclides. No século XV acrescentou-se 33.550.336 à lista. O conjunto dos números perfeitos é: {6, 28, 496, 8128, 33550336, 8589869056, …} ' #set -x clear read -p "Digite um número: " range contaPerfeito=0 for ((numeroAnalisado=1;numeroAnalisado<=range;numeroAnalisado++));do contadorLoop=1 somaDivisoresInteiros=0 while [[ "$contadorLoop" -le "$((numeroAnalisado / 2))" ]];do if [ "$(( numeroAnalisado % contadorLoop ))" = 0 ];then somaDivisoresInteiros=$((somaDivisoresInteiros + contadorLoop)) fi contadorLoop=$((contadorLoop + 1)) done if [ "$somaDivisoresInteiros" -eq "$numeroAnalisado" ];then echo "O Número $numeroAnalisado é perfeito" contaPerfeito=$(( contaPerfeito + 1 )) fi done echo "Encontrado $contaPerfeito números perfeitos de 1 até $range"
Script para relatório de download de arquivos via Squid
Script para apagar CD-RW com barra de progresso em Xdialog
cofigurar a rede passando por roteador
Conciliando o uso da ZRAM e SWAP em disco na sua máquina
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Realizar overclock no Miyoo Mini (plus ou normal)
Otimização de memória para máquinas modestas
Direcionar uma URL para Outra No Mikrotik (0)
linux mint reconhece microfone de lapela como fone de ouvido sem micro... (1)