Calculando a média entre dois valores [Perl]

Calculando a média entre dois valores

Publicado por Wesley Fonseca 28/02/2009

[ Hits: 12.208 ]

Homepage: www.quimica.ufg.br/mestrado

Download media.pl

0 0

Denuncie Favoritos Indicar

Este é um script simples, onde o usuário digita dois valores e obtem a média entre os mesmos.

O script mostra conceitos simples como inserção, armazenamento e processamento de valores. Útil para quem está dando os primeiros passos e quer entender melhor o Perl.

Esconder código-fonte

#/usr/bin/perl

#este script calcula a media entre dois valores digitados

print "Digite um numero:";
$A = <STDIN>;         #o STDIN gera uma linha para a entrada do valor,esse valor é atribuido
                    #a variavel $A
chomp ($A);         #a funçao chomp lê e  armazena o valor digitado
print "Digite outro numero:";
$B = <STDIN>;
chomp ($B);         #aqui ficará armazenado o valor digitado
$media = (($A) + ($B))/2;
print "A média entre os valores é: $media\n";

#bugs ou melhoramentos?!? ==> wesfonseca@gmail.com
#e viva o linux!

Scripts recomendados

Lista de números aleatórios não-repetidos de um intervalo em Perl

Cálculo do MDC em Perl

Cálculo do MDC em Perl para quantidade ilimitada de parâmetros

Crivo de Eratóstenes Simples em Perl

Saiba quanto de energia seu PC gasta aproximadamente por mês

Comentários

[1] Comentário enviado por carlosjunges em 28/02/2009 - 20:33h

Sinceramente, não vejo necessidade alguma de postar algo como isso. Já que qualquer um é capaz de fazer (x + x)/2 em qualquer linguagem.

1 0

[2] Comentário enviado por samirmss23 em 18/12/2009 - 14:53h

Eu discordo pra mim foi de grande serventia.... esse tipo de explo é simples e mostra como funciona a linguaguem pra que nao tem nehuma noção de nada em programação em ... outra coisa cara na primeira linha q declara a linguagem ta faltando !
esta assim #/usr/bin/perl

O certo seria assim #!/usr/bin/perl

Valeu!!!!

0 0

[3] Comentário enviado por leandrox em 07/04/2010 - 16:38h

É válido para iniciantes na linguagem Perl enteder as funções STDIN, chomp

Vlw.

0 0

[4] Comentário enviado por carlosjunges em 07/04/2010 - 19:21h

sim, voces têm razão, foi um equivoco meu dizer que não tinha utilidade, perdão.
O script tem sim grande valia para iniciantes na área.
Desculpe pelo comentário mal elaborado de antes.

0 0