Separa os dígitos de um número
Publicado por Roddas Cabral (última atualização em 20/10/2017)
[ Hits: 1.398 ]
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
Scalar - Alguns dos usos mais comuns deste tipo de variável do Perl
Lendo o conteúdo de uma página da Internet
Nenhum comentário foi encontrado.
Agora temos uma assistente virtual no fórum!!! (247)
Manutenção de sistemas Linux Debian e derivados com apt-get, apt, aptitude e dpkg
Melhorando o tempo de boot do Fedora e outras distribuições
Como instalar as extensões Dash To Dock e Hide Top Bar no Gnome 45/46
Como Atualizar Fedora 39 para 40
Instalar Google Chrome no Debian e derivados
Consertando o erro do Sushi e Wayland no Opensuse Leap 15
Instalar a última versão do PostgreSQL no Lunix mantendo atualizado
Flathub na sua distribuição Linux e comandos básicos de gerenciamento
Reset do linux sem perder dual boot (1)
Lançado Ubuntu 24.04 Final (6)
redirecionando saida de comando touch para o AWK[AJUDA] (1)