Функція Sqr в Delphi повертає квадрат числа.
System unit
- function Sqr (Number : Integer) : Integer;
- function Sqr (Number : Int64) : Int64;
- function Sqr (Number : Extended) : Extended;
Функція Sqr повертає квадрат числа (Number).
Sqr(Number) = Number * Number
Число може бути цілого або дійсного типу.
Для чисел типу Integer, Int64Якщо квадрат числа перевищує ємність змінної, на яку буде поміщений результат, то результат буде:
Результат Mod Емкость
Для чисел типу ExtendedЯкщо квадрат числа перевищує розмір змінної, то викликається виняток EOverFlow.
Особливі значення наведені нижче:
- Infinity, -Infinity : Нескінченність
- NaN (Not a Number - не число) : Не число
Функція Sqr: Знаходження квадрата різних значень
var
number, squared : Byte;
float : Extended;
begin
// Квадрат 15 = 225
number := 15;
squared := Sqr(number);
ShowMessageFmt('%d в квадрате = %d',[number, squared]);
// Квадрат 17 = 289
// Але результат перевищує розмір байта, відповідно результат= 289 MOD 256 = 33
number := 17;
squared := Sqr(number);
ShowMessageFmt('%d в квадрате = %d',[number, squared]);
// The square of infinity is still infinity
float := Infinity;
float := Sqr(float);
ShowMessageFmt('Нескінченність у квадраті = %f',[float]);
end;Результат
15 в квадрате = 225
17 в квадрате = 33
Нескінченність у квадраті = INF
Схожі функції та команди
Dec — декремент порядкової змінної.
Inc — збільшує порядкову змінну.
Sqrt — повертає квадратний корінь числа.
Sum — знаходить суму елементів масиву, що складається з чисел з плаваючою точкою.
Пригостити автора кавою
