Отримати менше двох цілих чисел.

 

Синтаксис

function Min(iValue1, iValue2: integer): integer;

 

Параметри та значення, що повертаються

Параметр

Тип

Значення

iValue1

integer

первое число;

iValue2

integer

второе число.

 

Результат функции

Найменше з двох цілих чисел.

 

Приклад


var
  x1, x2: double;
  iMinimal: integer;
begin
  x1 := LogN(2, 4);
  x2 := LogN(4, 3);
  
  iMinimal := Min(round(x1), round(x2));
  
  mLogScript(inttostr(iMinimal), '');
end.


Результат роботи скрипту

[19:22:56] (Log "Min"): 1

[19:22:56] (Run "Min"): Час виконання скрипту: 5 мс

[19:22:56] (Run "Min"): Скрипт виконано успішно.

Дивитися ще

IntToStr

LogN

mLogScript

Round