Soma varios valores e mostra sua media
Publicado por breek (última atualização em 02/03/2012)
[ Hits: 9.441 ]
Criado para auxiliar no uso do for( ).
Seu proposito é: Calcular a media de vários valores inseridos pelo usuário.
#!/usr/bin/perl #-------------------------------------------------------------------------------------------------------- # # @Author: breek # @Code: CalcMedia.pl # @Version: 0.1.0 # @Date: 21/02/2012 # #-------------------------------------------------------------------------------------------------------- #=================================================# # Este script calcula a média de varios valores. #=================================================# use strict; use warnings; my $Quantidade; my $Contador; #Incremento: (1+1) my $Valor; my $Soma; my $Media; # Receber a [quantidade de numeros] # print "Quantos valores sarao calculados: "; $Quantidade = <>; chomp $Quantidade; system ( "cls" ); # for() - mesmo estilo do C # # Somando valores # for( $Contador = 1; $Contador <= $Quantidade; $Contador++ ) { print "Digite o valor: "; $Valor = <>; chomp $Valor; $Soma += $Valor; # Soma = Soma + Valor # system( "cls" ); } #Calculo da media # $Media = $Soma / $Quantidade; # Mostrando resultado. Finalizando # print "\n"; print "A soma e: $Soma \n"; print "A media e: $Media \n"; exit;
Lista de números aleatórios não-repetidos de um intervalo em 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
O que você quer para sua vida ao usar o Linux?
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Dando - teoricamente - um gás no Gnome-Shell do Arch Linux
Instalação de Ubuntu em SSD (interno) como se fosse um dispositivo ext... (2)
Zorin OS - Virtual Box não consigo abrir maquinas virtuais (10)