Функція Min в Delphi видає мінімальне з двох цілих значень.
Math unit
function Min (const A, B : Integer|Int64|Single|Double|Extended) : Integer|Int64|Single|Double|Extended;
Функція Min повертає найменше значення одного із двох числових параметрів, A и B
Функція Min: Ілюстрація використання Min с Integer
var
int1, int2, int3 : Integer;
begin
int1 := 37;
int2 := 38;
int3 := Min(int1, int2);
ShowMessage('int1 = '+IntToStr(int1));
ShowMessage('int2 = '+IntToStr(int2));
ShowMessage('Min(int1, int2) = '+IntToStr(int3));
end;
Результат
int1 = 37
int2 = 38
Min(int1, int2) = 37
Функція Min: Иллюстрация Min зі змішаними типами чисел
var
int1 : Integer;
float1 : single;
begin
int1 := 38;
float1 := 37.5; 