Получить максимальное из двух целых чисел.

 

Синтаксис

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

 

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

Параметр

Тип

Значення

iValue1

integer

перше число;

iValue2

integer

друге число.

 

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

Більше із двох цілих чисел.

 

Приклад


var
  iVal1, iVal2, iMax: integer;
begin
  iVal1 := 37;
  iVal2 := 38;
  
  iMax := Max(iVal1, iVal2);
  mLogScript('value 1 = ' + IntToStr(iVal1), '');
  mLogScript('value 2 = ' + IntToStr(iVal2), '');
  mLogScript('Max value is: ' + IntToStr(iMax), '');
end.


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

[19:02:02] (Log "Max"): value 1 = 37

[19:02:02] (Log "Max"): value 2 = 38

[19:02:02] (Log "Max"): Max value is: 38

[19:02:02] (Run "Max"): Час виконання скрипту: 4 мс

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

Дивитися ще

IntToStr
mLogScript