triangulo
Publicado por marcio santos borges 08/12/2005
[ Hits: 5.107 ]
este programa e simples ele pede 3 valores de um triangulo e te informa se e equilatero isosceles ou escaleno ou se os valores nao forma um triangulo
#!/usr/bin/perl # autor : m4rc1054nt05 # data : 08-12-2005 # programa do triangulo print " programa que do triangulo\n\n"; print "Digite o primeiro valor:\n"; $v1 = <STDIN>; chomp ($v1); print "Digite o segundo valor:\n"; $v2 = <STDIN>; chomp ($v2); print "Digite o terceiro valor:\n"; $v3 = <STDIN>; chomp ($v3); if ( $v1 < $v2+$v3 && $v2 < $v1+$v3 && $v3 < $v1+$v2){ if ( $v1==$v2 && $v2==$v3 ){ print "o triangulo e equilatero\n"; } else { if ( $v1==$v2 || $v1==$v3 || $v2==$v3 ){ print "o triangulo e isosceles\n"; } else { print "o triangulo e escaleno\n"; } } } else { print "os numeros nao formam um triangulo\n"; }
Saiba quanto de energia seu PC gasta aproximadamente por mês
Programa que separa os dígitos de um inteiro
Aprendendo a fazer equações em Perl
Nenhum comentário foi encontrado.
Atualizar o macOS no Mac - Opencore Legacy Patcher
Crie alias para as tarefas que possuam longas linhas de comando - bash e zsh
Criando um gateway de internet com o Debian
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Aprenda a criar músicas com Inteligência Artificial usando Suno AI
Como instalar o navegador TOR no seu Linux
Instalando Zoom Client no Ubuntu 24.04 LTS
Instalando Zoom Client no Fedora 40
Instalando Navegador Firefox no Debian 12
Bloqueando propagandas no Youtube e outros sites com o uBlocker Origin
Dificuldade em ler binário (13)
Configurando static ipv6 em placa de rede eth0[DUVIDA] (4)
excluindo partas e arquivos vazios de pacotes tar[DUVIDA] (1)