Skip to content

Sum

Return sum of values

Declaration

Source position: math.pp line 424

  function Sum(const data: Array of Single) : Float;
  function Sum(const data: PSingle; const N: LongInt) : Float;
  function Sum(const data: Array of Double) : Float;
  function Sum(const data: PDouble; const N: LongInt) : Float;
  function Sum(const data: Array of Extended) : Float;
  function Sum(const data: PExtended; const N: LongInt) : Float;

Description

Sum returns the sum of the values in the data array.

The second form of the function accepts a pointer to an array of N values.

Errors

None.

See also

Name Description
sumofsquares Return sum of squares of values
sumsandsquares Return sum and sum of squares of values.
totalvariance Return total variance of values
variance Return variance of values

Example

Program Example44;
{ Program to demonstrate the Sum function. }
{ @ should return typed pointer }
{$T+}
Uses math;
Var
  I : 1..100;
  ExArray : Array[1..100] of Float;
begin
  Randomize;
  for I:=low(ExArray) to high(ExArray) do
    ExArray[i]:=(Random-Random)*100;
  Writeln('Max     : ',MaxValue(ExArray):8:4);
  Writeln('Min     : ',MinValue(ExArray):8:4);
  Writeln('Sum     : ',Sum(ExArray):8:4);
  Writeln('Sum (b) : ',Sum(@ExArray[1],100):8:4);
end.