Separa os dígitos de um número
Publicado por Roddas Cabral (última atualização em 20/10/2017)
[ Hits: 1.997 ]
Programa que separa os dígitos de um inteiro e coloca-os em ordem inversa.
#!perl
print "Insira um number: ";
chomp($n = <STDIN>);
while($n > 0)
{
if($n%10 > 0)
{
print $n%10 . " ";
}
$n = $n / 10;
}
# Espero ter ajudado
# Roddas
Renomeando arquivos de forma padronizada
check_mem.pl - Plugin Nagios para checar consumo de RAM
Lista de números aleatórios não-repetidos de um intervalo em Perl
Nenhum comentário foi encontrado.
Faça suas próprias atualizações de pacotes/programas no Void Linux e torne-se um Contribuidor
Como rodar o Folding@home no Linux
Criando um painel de controle (Dashboard) para seu servidor com o Homepage
O Abismo entre o Código e o Chão: Saltos Tecnológicos e a Exclusão Estrutural no Brasil
Instalar e Configurar a santíssima trindade (PAP) no Void Linux
Pisando no acelerador do Linux Mint: Kernel XanMod, zRAM e Ajustes de Swap
Como compilar kernel no Linux Mint
Lançamento do Brutal DOOM test 6
Consertando o erro no Brave de webgl
Solução para ter de volta as bordas e barra de títulos das janelas em zenity no Debian 13.x
Seno, Coseno, Tangente em CLIPPER (0)
Inserir uma URL num arquvo pelo Ubuntu (CLIPPER) (0)
VMWare Player não conecta na rede nem consigo intercambiar arquivos (1)









