MyChat Scripts: функция Sqrt, вычисление квадратного корня от числа
"Для разработчиков", "Серверные скрипты", "Описание функций", "Математические", "Sqrt".
Вычислить квадратный корень от целого или вещественного положительного числа.
Синтаксис
function Sqrt(x: extended): extended;
Параметры и возвращаемые значения
Параметр |
Тип |
Значение |
x |
extended |
число, от которого нужно вычислить квадратный корень. Не может быть отрицательным числом. |
Результат функции
Вещественное число. Если параметр x < 0, то функция вернёт 0.
Пример
var
i, iValue: integer;
x: extended;
s: string;
begin
for i := 100 downto 1 do begin
x := Sqrt(i);
iValue := Trunc(x);
if iValue = x then begin
s := IntToStr(iValue);
mLogScript(IntToStr(i), s + 'x' + s);
end;
end;
end.
Результат работы скрипта
[13:28:56] (Log "Sqrt"): [10x10] 100
[13:28:56] (Log "Sqrt"): [9x9] 81
[13:28:56] (Log "Sqrt"): [8x8] 64
[13:28:56] (Log "Sqrt"): [7x7] 49
[13:28:56] (Log "Sqrt"): [6x6] 36
[13:28:56] (Log "Sqrt"): [5x5] 25
[13:28:56] (Log "Sqrt"): [4x4] 16
[13:28:56] (Log "Sqrt"): [3x3] 9
[13:28:56] (Log "Sqrt"): [2x2] 4
[13:28:56] (Log "Sqrt"): [1x1] 1
[13:28:56] (Run "Sqrt"): Время выполнения скрипта: 3 мс
[13:28:56] (Run "Sqrt"): Скрипт выполнен успешно.