Dans les statistiques , la moyenne est simplement une moyenne d'un espace échantillon , qui est un groupe de numéros dans un ensemble. Vous devez calculer la moyenne en additionnant tous les chiffres , puis en divisant la somme par le nombre total d'éléments dans l'espace de l'échantillon. L'utilisation de Perl , vous pouvez programmer une fonction pour calculer la moyenne et ensuite appeler à partir de n'importe où dans votre programme. Vous avez seulement besoin d'utiliser l'espace de l'échantillon comme un tableau et un couple de variables telles que les compteurs - vous n'avez pas besoin d'autres fonctions intégrées . Instructions 
 1 
 ouvrir un fichier de programme Perl. Tapez le code suivant : 
 
 sous signifient { 
 
 my @ set = @ _; 
 
 $ au total = 0; 
 
 Ceci définit une nouvelle fonction appelée " signifier" , puis crée un tableau appelé " @ set " qui prend la liste des arguments passés à la fonction . Il crée également une variable appelée " $ au total " et l'initialise à zéro 
 2 
 Tapez le code suivant : 
 
 for ($ i = 0; $ i < @ set . ; $ i + +) { 
 
 $ Total = $ au total + @ set [$ i] ; } 
 
 
 
 " pour la boucle " instruction crée une variable de compteur appelé "$ i " et l'utilise pour faire défiler tous les numéros dans le " @ set " éventail et les additionne , sauvegarder le résultat dans la variable $" totale " . 
 3 
 Tapez le suivant le code suivant: 
 
 impression " total des numéros : " . @ set . "\\ n" ; 
 
 print " Somme: " . de dollars au total . "\\ n" ; 
 
 print " signifient:« . $ total /@ set ; 
 
 print "\\ n \\ n"; } 
 
 
 
 s'agit du format de lignes de sortie et montrer à l'utilisateur combien de numéros étaient dans l'espace de l'échantillon , leur valeur globale et le signifier . Il imprime ensuite deux lignes vierges pour faciliter la lecture , et ferme la fonction moyenne 
 4 
 Tapez le code suivant : . Mean 
 (1,2,3) ; 
 < p> moyenne ( 6,11,7 ) ; Mean 
 ( 5,2,5,2,66,4,2,26,64,23 ) ; 
 
 Ces lignes tester l' fonction signifier . Le premier appel a trois le nombre total qui ajouter jusqu'à six et avoir une moyenne de deux. Le deuxième appel a encore trois le nombre total qui s'additionnent à 24 ans et avoir une moyenne de huit ans. Le troisième appel a 10 le nombre total qui s'additionnent à 199 et avoir une moyenne de 19,9 . 
 5 
 Enregistrer le programme Perl.