Delphi returns the minimum value of a 64 bit integer array

From , 5 Years ago, written in Delphi (Object Pascal), viewed 83 times.

function MinOfArray(const A: array of Int64): Int64; overload;
var
  Idx: Integer;
begin
  Assert(Length(A) > 0);
  Result := A[Low(A)];
  for Idx := Succ(Low(A)) to High(A) do
    if A[Idx] < Result then
      Result := A[Idx];
end;
//delphi/2286

Reply to "Delphi returns the minimum value of a 64 bit integer array"

Here you can reply to the paste above

Author What's your name?

Title Give your paste a title.

Language What language is your paste written in?

Your paste Paste your paste here

Create Shorturl Create a shorter url that redirects to your paste?

Private Private paste aren't shown in recent listings.

Delete After When should we delete your paste?

Spam protection Type in the letters

https://burned.cc - Burn After Reading Website

Pastebin.vip

Delphi returns the minimum value of a 64 bit integer array

Reply to "Delphi returns the minimum value of a 64 bit integer array"