Unit 'Math' Package
[Overview][Constants][Types][Classes][Procedures and functions][Index] [#rtl]

MinValue

Return smallest value in array.

Declaration

Source position: math.pp line 695

function MinValue(

  const data: array of Single

):Single;

function MinValue(

  const data: PSingle;

  const N: Integer

):Single;

function MinValue(

  const data: array of Double

):Double;

function MinValue(

  const data: PDouble;

  const N: Integer

):Double;

function MinValue(

  const data: array of Extended

):Extended;

function MinValue(

  const data: PExtended;

  const N: Integer

):Extended;

function MinValue(

  const data: array of Integer

):Integer;

function MinValue(

  const Data: PInteger;

  const N: Integer

):Integer;

Description

Minvalue returns the smallest value in the data array with integer or float values. The return value has the same type as the elements of the array.

The third and fourth forms accept a pointer to an array of N integer or float values.

Errors

None.

See also

maxIntValue

  

Return largest element in integer array.

maxvalue

  

Return largest value in array.

minIntValue

  

Return smallest value in integer array.

Example

program Example31;

{ Program to demonstrate the MinValue function. }

{ Make sure integer is 32 bit}
{$mode objfpc}

uses math;

var i:1..100;
    f_array:array[1..100] of Float;
    i_array:array[1..100] of Integer;
    Pf_array:Pfloat;
    PI_array:Pinteger;

begin
  randomize;

  Pf_array:=@f_array[1];
  Pi_array:=@i_array[1];

  or:=low(f_array) to high(f_array) do
    f_array[i]:=(random-random)*100;
  or:=low(i_array) to high(i_array) do
    i_array[i]:=random(I)-random(100);

  Writeln('Min Float       : ',MinValue(f_array):8:4);
  Writeln('Min Float   (b) : ',MinValue(Pf_array,100):8:4);
  Writeln('Min Integer     : ',MinValue(i_array):8);
  Writeln('Min Integer (b) : ',MinValue(Pi_array,100):8);
end.
Documentation generated on: Nov 23 2024