triangulo
Publicado por marcio santos borges 08/12/2005
[ Hits: 5.339 ]
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"; }
"Codificação" de texto em Perl
Scalar - Alguns dos usos mais comuns deste tipo de variável do Perl
Nenhum coment�rio foi encontrado.
Atualizando o Passado: Linux no Lenovo G460 em 2025
aaPanel - Um Painel de Hospedagem Gratuito e Poderoso
O macete do Warsaw no Linux Mint e cia
Git config não aplica configurações
O que você quer para sua vida ao usar o Linux?
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Falhas em startar o mongodb [RESOLVIDO] (3)
samba4 versao 4.22.3 usuario nao consegue trocar a senha (2)
[dica] Aqui um vídeo educativo de verdade: engenharia reversa (0)