DESCRIPTION.

La fonction SUM() retourne la somme ou la concaténation des éléments d'un tableau de données, ou d'une partie de ces éléments.

SYNTAXE.

knombre = SUM( LST_Tableau )

kchaine$ = SUM( LST_Tableau$ )

REMARQUES.

Si LST_Tableau est composée de valeur numériques, c'est-à-dire si son suffixe est différent de $, la fonction SUM() retourne une valeur numérique de même type que les éléments de LST_Tableau correspondant à la somme de tous les éléments de LST_Tableau.

DIM LST_Tableau( 9 )

FOR kvaleur = 0 TO 9

LST_Tableau( kvaleur ) = RND( 10 )

PRINT STR$( LST_Tableau( kvaleur ) ) ; " "  ; 

NEXT kvaleur

ksomme = SUM ( LST_Tableau( ) )

PRINT TAB( 0 , 1 ) "La somme de LST_Tableau( ) est : " ; STR$( ksomme )

Si LST_Tableau$ est composée de valeur alphanumériques, c'est-à-dire des chaine de caractères, la fonction SUM() retourne une chaine de caractères en concaténant tous les éléments de LST_Tableau$ dans l'ordre de leur indice.

DIM LST_Tableau$( 9 )

FOR kvaleur = 0 TO 9

LST_Tableau$( kvaleur ) = CHR$( RND( 26 ) + 64 )

PRINT LST_Tableau$( kvaleur ) ; " "  ; 

NEXT kvaleur

kchaine$ = SUM( LST_Tableau$( ) )

PRINT TAB( 0 , 1 ) "La somme de LST_Tableau$( ) est : " ; kchaine$

Si le tableau a été déclaré avec plusieurs dimensions, tous les éléments de toutes les dimensions seront prises en compte pour l'addition ou la concaténation, sauf si on précise dans l'appel de la fonction SUM() seulement une tranche d'indices à ajouter.

DIM LST_Tableau( 9 )

FOR kvaleur = 0 TO 9

LST_Tableau( kvaleur ) = RND( 10 )

PRINT STR$( LST_Tableau( kvaleur ) ) ; " "  ; 

NEXT kvaleur

ksomme = SUM( LST_Tableau( 3 TO 6 ) )

PRINT TAB( 0 , 1 ) "La somme des indices de 3 à 6 de LST_Tableau( ) est : " ; STR$( ksomme )

Voir l'instruction DIM pour plus de détails sur la création et la gestion des tableaux de données.

RUBRIQUE.

Les types de variables pour plus de détails sur la déclaration des variables et leurs différents types.

EXEMPLE.

DIM LST_Tableau$( 9 )

LST_Tableau$( ) = "BBC" , " " , "BASIC" , " " ,"for" , " " ,  "SDL 2.0" 

PRINT SUM( LST_Tableau$( ) )

END

retourne : BBC BASIC for SDL 2.0