administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

CbRt - в стандартном модуле

Browse source
This commit is contained in:
Mikhalkovich Stanislav 2025-10-15 12:53:31 +03:00
parent 0e066aac48
commit 329191b360
2 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
InstallerSamples/WhatsNew/3_11_1/CbRt.pas Normal file
View file

@ -0,0 +1,4 @@
begin
// Вычисление кубического корня. Отрицательные числа допускаются
Print(CbRt(-27));
end.

4
bin/Lib/PABCSystem.pas
View file

@ -1829,6 +1829,8 @@ function Log10(x: real): real;
function LogN(base, x: real): real;
/// Возвращает квадратный корень числа x
function Sqrt(x: real): real;
/// Возвращает кубический корень числа x (x может быть < 0)
function Cbrt(x: real): real;
///-function Sqr(x: число): число;
/// Возвращает квадрат числа x
function Sqr(x: shortint): integer;
@ -9384,6 +9386,8 @@ function LogN(base, x: real) := Math.Log(x) / Math.Log(base);
function Sqrt(x: real) := Math.Sqrt(x);
function Cbrt(x: real) := Sign(x) * Power(Abs(x), 1/3);
function Sqr(x: integer): int64 := int64(x) * int64(x);
function Sqr(x: shortint): integer := x * x;