SumOfSquares
Return sum of squares of values
Declaration
Source position: math.pp line 454
function SumOfSquares(const data: Array of Single) : Float;
function SumOfSquares(const data: PSingle; const N: Integer) : Float;
function SumOfSquares(const data: Array of Double) : Float;
function SumOfSquares(const data: PDouble; const N: Integer) : Float;
function SumOfSquares(const data: Array of Extended) : Float;
function SumOfSquares(const data: PExtended; const N: Integer) : Float;
Description
Sumofsquares returns the sum of the squares 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 |
---|---|
sum | Return sum of values |
sumsandsquares | Return sum and sum of squares of values. |
totalvariance | Return total variance of values |
variance | Return variance of values |
Example
Program Example45;
{ Program to demonstrate the SumOfSquares 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 squares : ',SumOfSquares(ExArray):8:4);
Writeln('Sum squares (b) : ',SumOfSquares(@ExArray[1],100):8:4);
end.