Calcula equação de segundo grau completa
Publicado por Perfil removido (última atualização em 19/12/2012)
[ Hits: 5.976 ]
Script em Perl que calcula a equação de segundo grau completa.
#!/usr/bin/perl
# By MMxM
# Calcula equação de segundo grau completa
print "\n\t*Calcula equacao de segundo grau completa*\n\n";
print "By MMxM\n\n";
print "a = ";
$a = <STDIN>;
print "b = ";
$b = <STDIN>;
print "c = ";
$c = <STDIN>;
raiz_delta();
sub raiz_delta(){
$delta = $b**2- 4*$a*$c;
$raiz = sqrt($delta);
x();
}
sub x(){
$s = -$b + $raiz;
$x = $s/2*$a;
xx();
}
sub xx(){
$ss = -$b - $raiz;
$xx = $ss/2*$a;
}
print "\n\nx1 = $x\nx2 = $xx";
Inserindo o nome de aluno e calculando média de suas notas
Lista de números aleatórios não-repetidos de um intervalo em Perl
Saiba quanto de energia seu PC gasta aproximadamente por mês
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
Linux é a solução para o fim do Windows10? (3)
Assinador JNLP do Site Portal da Nota Fiscal Eletrônica (0)
Programa fora de escala na tela do pc (29)









