Soma varios valores e mostra sua media
Publicado por breek (última atualização em 02/03/2012)
[ Hits: 9.383 ]
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;
Scalar - Alguns dos usos mais comuns deste tipo de variável do Perl
Nenhum comentário foi encontrado.
tux-gpt - Assistente de IA para o Terminal
Instalação e configuração do Chrony
Programa IRPF - Guia de Instalação e Resolução de alguns Problemas
Como instalar no Linux Jogos da Steam só para Windows
Instalando o Team Viewer no Debian Trixie - problema no Policykit
O Que Fazer Após Instalar Ubuntu 25.04
Copiar Layout do Teclado para aplicar em outra Distribuição (4)
QUERO USAR ABNT 2 NO LINUX MINT (1)
Alguém poderia me ajudar a escolher peças pra montar um desktop? (32)