MEAN |
Moyenne |
---|---|
Free Pascal | Math |
Syntaxe
Function mean(Const data:Array of Extended):float; |
Function mean(Const data:PExtended;const N:LongInt):float; |
Paramètres
Nom | Description |
---|---|
data | Ce paramètre permet d'indiquer le tableau de valeur à calculer |
N | Ce paramètre permet d'indiquer le nombre d'éléments dans le tableau. |
Description
Cette fonction permet de renvoyer la moyenne d'un tableau de nombre réel.
Exemple
Voici un exemple montrant l'utilisation de cette fonction :
- Program MeanSamples;
-
- Uses Math;
-
- Var
- Array1:Array[0..1]of Double = (5,-18);
- Array2:Array[0..1]of Double = (0.25,0.115);
- Array3:Array[0..4]of Double = (1,2,3,4,5);
- Array4:Array[0..4]of Double = (5,4,3,2,1);
- Array5:Array[0..6]of Double = (24,34,13,72,100,1,34);
-
- BEGIN
- WriteLn('Mean(5,-18)=',Mean(Array1):1:0);
- WriteLn('Mean(0.25,0.115)=',Mean(Array2):1:3);
- WriteLn('Mean(1,2,3,4,5)=',Mean(Array3):1:0);
- WriteLn('Mean(5,4,3,2,1)=',Mean(Array4):1:0);
- WriteLn('Mean(24,34,13,72,100,1,34)=',Mean(Array5):1:0);
- END.
on obtiendra le résultat suivant :
Mean(5,-18)=-7Mean(0.25,0.115)=0.183
Mean(1,2,3,4,5)=3
Mean(5,4,3,2,1)=3
Mean(24,34,13,72,100,1,34)=40
Dernière mise à jour : Samedi, le 18 juillet 2015