I statistik middelværdien er simpelthen et gennemsnit af et udfaldsrum , som er en gruppe af tal i et sæt . Du beregne middelværdien ved at tilføje alle de tal sammen og derefter dividere summen af det samlede antal elementer i udfaldsrummet . Ved hjælp af Perl , kan du programmere en funktion til at beregne middelværdien og derefter kalde det fra andre steder i dit program. Du behøver kun at bruge udfaldsrummet som en matrix og et par af variable som tællere - du behøver ikke nogen andre indbyggede funktioner . Instruktioner
1

Åbn en Perl program fil. Indtast følgende kode :

sub betyder {

min @ set = @ _ ;

$ total = 0;

Dette definerer en ny funktion kaldet "mean " og derefter opretter et array kaldet " @ set" , der tager argumentet listen overføres til funktionen . Det skaber også en variabel kaldet " $ total ", og initialiserer den til nul
2

Indtast følgende kode : Hej

for ($ i = 0; $ i < @ sæt . ; $ i + +) {

$ total = $ total + @ sæt [$ i ]

}

Denne " for loop " erklæring skaber en tæller variabel kaldet "$ i "og bruger den til at cykle gennem alle numre i" @ set " array og lægger dem sammen , sparer resultatet i " $ total "variable .
3

Skriv følgende kode:

print " Total numre: " . @ indstillet. "\\ n";

print " Sum : " . $ total . "\\ n";

print " Mean : " . $ total /@ sæt ,

print " \\ n \\ n";

}

Disse linjer formatere output og vise brugeren , hvor mange tal var i udfaldsrummet , deres samlede værdi og betyder. Derefter udskriver to blanke linjer for lettere læsning, og lukker den gennemsnitlige funktion
4

Indtast følgende kode : .

Middelværdi ( 1,2,3) ;
< p> middelværdi ( 6,11,7 ),

middelværdi ( 5,2,5,2,66,4,2,26,64,23 )

Disse linjer teste betyde funktion . Det første opkald har tre samlede antal , der tilføjer op til seks og har et gennemsnit på to. Det andet opkald igen har tre samlede antal , der tilføjer op til 24 og har et gennemsnit på otte. Det tredje opkald har i alt 10 numre, som tilføje op til 199, og har en gennemsnitlig på 19,9 .
5.

Gem Perl program.