impares e pares
Publicado por marcio santos borges 14/12/2005
[ Hits: 8.341 ]
programa que pede um numero e informa se e impar ou par
#!/usr/bin/perl
#autor : m4rcio54nt05
#date : 14-12-2005
print "**************************calculando se e impar ou par************************* \n\n\n\n";
print "Digite a quantidade de numero inteiro:\n ";
chomp ( $numero = <STDIN> );
@array = (1..$numero);
for ( $i=1; $i <=$numero; ++$i ){
print "Por favor digite o $i numero inteiro\n ";
chomp ( $numero2[$i] = <STDIN> );
$div = $numero2[$i] % 2;
if ( $div==0 ){
++$j;
$par[$j] = $numero2[$i];
}
else {
++$z;
$impar[$z] = $numero2[$i];
}
}
if ( $j > 0){
print "Os pares são:\n";
print "@par\n";
}
else {
print "não a pares:\n";
}
if ( $z >0){
print "Os impares são:\n";
print "@impar\n"
}
else {
print "nao a impares:\n"
}
Cadastro usando arquivos .txt para guardar dados
Crivo de Eratóstenes Simples em Perl
Nenhum comentário foi encontrado.
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Novos apps de produtividade, avanços em IA e distros em ebulição agitam o universo Linux
Como instalar o repositório do DBeaver no Ubuntu
Como instalar o Plex Media Server no Ubuntu
Digitando underscore com "shift" + "barra de espaços"
Como ativar a lixeira e recuperar aquivos deletados em um servidor Linux
Como mudar o nome de dispositivos Bluetooth via linha de comando
dpkg: erro: gatilho de arquivo duplicado chamado pelo arquivo de nome (6)
Instalação não está resolvendo as dependencias (2)
Captação de áudio no zorin linux começa a diminuir com o tempo (5)
Alternativas ao Multilogin para gerenciamento de múltiplas contas/prof... (0)









