Функция Sum в Delphi находит сумму элементов массива, состоящего из чисел с плавающей точкой.
Math unit
function Sum (const Numbers : array of Double) : Double;
Функция Sum подсчитывает сумму элементов в переданном массиве Numbers, состоящего из чисел типа Double.
Функция Sum: Пример кода
var
doubles : array[0..5] of double;
begin
// Заполните массива чисел
doubles[0] := 25.0;
doubles[1] := 100.5;
doubles[2] := -4.125;
doubles[3] := 75.0;
doubles[4] := -62.0;
doubles[5] := 0.0;
ShowMessage('Сумма значений массива = '+FloatToStr(Sum(doubles)));
ShowMessage('12.3 + 45.6 = '+FloatToStr(Sum([12.3, 45.6])));
end;
Результат
Сумма значений массива = 134.375
12.3 + 45.6 = 57.9
Похожие функции и команды
Dec — декремент порядковой переменной.
Inc — увеличивает порядковую переменную.
Sqr — возвращает квадрат числа.
Sqrt — возвращает квадратный корень числа.
