Section courante

A propos

Section administrative du site

SUMINT

Somme d'entier
Free Pascal Math

Syntaxe

Function sumInt(const data: PInt64;const N: LongInt):Int64;
Function sumInt(const data: array of Int64):Int64;

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ément dans le tableau

Description

Cette fonction permet de renvoyer la somme d'un tableau de nombre entier.

Exemple

Voici un exemple montrant l'utilisation de cette fonction :

Essayer maintenant !
  1. Program SumIntSamples;
  2.  
  3. Uses Math;
  4.  
  5. Var
  6.  Array1:Array[0..1]of Int64 = (5,-18);
  7.  Array2:Array[0..4]of Int64 = (1,2,3,4,5);
  8.  Array3:Array[0..4]of Int64 = (5,4,3,2,1);
  9.  Array4:Array[0..6]of Int64 = (24,34,13,72,100,1,34);
  10.  
  11. BEGIN
  12.  WriteLn('SUMINT(5,-18)=',SumInt(Array1));
  13.  WriteLn('SUMINT(1,2,3,4,5)=',SumInt(Array2));
  14.  WriteLn('SUMINT(5,4,3,2,1)=',SumInt(Array3));
  15.  WriteLn('SUMINT(24,34,13,72,100,1,34)=',SumInt(Array4));
  16. END.

on obtiendra le résultat suivant :

SUMINT(5,-18)=-13
SUMINT(1,2,3,4,5)=15
SUMINT(5,4,3,2,1)=15
SUMINT(24,34,13,72,100,1,34)=278

Voir également

Langage de programmation - Free Pascal - Référence de procédures et fonctions - Sum
Langage de programmation - Free Pascal - Référence de procédures et fonctions - MaxIntValue
Langage de programmation - Free Pascal - Référence de procédures et fonctions - MinIntValue


Dernière mise à jour : Samedi, le 18 juillet 2015