In Statistiken, die mittlere ist einfach ein Durchschnitt von einem Probenraum ist , die eine Gruppe von Zahlen in einer Reihe . Sie berechnet den Mittelwert , indem alle Zahlen zusammen und dividiert die Summe durch die Gesamtanzahl der Elemente in den Probenraum . Mit Perl können Sie programmieren eine Funktion , um den Mittelwert zu berechnen und nennen es dann von irgendwo anders in Ihrem Programm. Sie müssen nur die Probe Raum als ein Array und ein paar Variablen als Zähler verwenden - Sie brauchen keine anderen integrierten Funktionen . Anleitung
1
Öffnen Sie ein Perl-Programm -Datei. Geben Sie den folgenden Code:
sub bedeuten {
my @ set = @ _ ;
$ total = 0;
Dies definiert eine neue Funktion namens " Mittel " und erstellt dann ein Array namens " @ set ", dass die Liste der Argumente an die Funktion übergeben müsste . Es schafft auch eine Variable namens " $ total " und initialisiert sie auf Null
2
Geben Sie den folgenden Code:
for ($ i = 0; $ i < @ set . ; $ i + +) {
$ total = $ total + @ set [$ i] ; }
Dieses " for-Schleife " Anweisung erstellt einen Zähler Variable namens " $ i " und verwendet sie , um durch alle Zahlen in dem" @ set " Array und fügt sie zusammen , spart das Ergebnis in der " $ total "-Variable .
3
Typ der folgenden Code:
print " Summe Zahlen: " . @ gesetzt . " \\ n";
print " Summe: " . $ total . " \\ n";
print " bedeuten:" . $ total /@ set ;
print "\\ n \\ n"; }
Diese Linien die Ausgabe zu formatieren und zeigen dem Anwender , wie viele Zahlen waren in den Probenraum , ihr Gesamtwert und das meine. Es gibt dann zwei Leerzeilen zur besseren Ablesbarkeit, und schließt die mittlere Funktion
4
Geben Sie den folgenden Code: .
Mittelwert ( 1,2,3 );
< p> Mittelwert ( 6,11,7 );
Mittelwert ( 5,2,5,2,66,4,2,26,64,23 );
Diese Zeilen testen die meine Funktion . Das erste Gespräch hat insgesamt drei Nummern, die bis zu sechs hinzufügen und haben einen Mittelwert von zwei . Der zweite Aufruf wieder hat insgesamt drei Nummern, die bis zu 24 hinzufügen und haben einen Mittelwert von acht . Der dritte Anruf hat insgesamt 10 Nummern, die bis zu 199 addieren und haben einen Mittelwert von 19,9 .
5
Speichern Sie die Perl-Programm .