Return Euclidean norm.
Source position: math.pp line 754
function Norm( |
const data: array of Single |
):Float; |
const data: PSingle; |
const N: Integer |
):Float; |
const data: array of Double |
):Float; |
const data: PDouble; |
const N: Integer |
):Float; |
const data: array of Extended |
):Float; |
const data: PExtended; |
const N: Integer |
):Float; |
Norm calculates the Euclidean norm of the array of data. This equals sqrt(sumofsquares(data)).
The second form accepts a pointer to an array of N values.
None.
|
Return sum of squares of values. |
program Example33; { Program to demonstrate the norm function. } uses math; var v:array[1..10] of Float; I:1..10; begin or:=low(v) to high(v) do v[i]:=random; writeln(norm(v)); end.