Результаты (
украинский) 2:
[копия]Скопировано!
Витягує квадратний корінь з значення, заданого параметром.
Function TruncfX: Extended): Int64;
Повертає ціле число типу Irit64, рівне цілої частини параметра X. Якщо
значення X більше, ніж припускає тип [nt64, то ініціюється виключення
ElnvalidOp.
Function MaxlntValue (const Data : array of Integer): Integer;
Повертає найбільше ціле з масиву, зазначеного параметром Data.Object Pascal 71
function MaxValue (const Data: array of Double): Double;
Повертає найбільше значення типу Double з масиву Data.
function Mean (const Data: array of Double): Extended;
Повертає середнє арифметичне всіх значень масиву Data.
function MinlntValue (const Data: array of Integer): Integer;
Повертає найменше ціле з масиву, зазначеного параметром Data.
function MinValue (const Data: array of Double): Double;
Повертає найменше значення типу Double з масиву Data.
function Sum (const Data: array of Double): Extended; register;
Повертає суму всіх елементів масиву, вказаного параметром Data.
function Sumlnt (const Data: array of Integer): Integer register;
Повертає суму всіх елементів масиву, вказаного параметром Data.
function SumOfSquares (const Data: array of Double): Extended;
Повертає суму квадратів всіх елементів масиву, вказаного параметром Data.
procedure SumsAndSquares (const Data: array of Double; var Sum,
SumOfSquares: Extended) register;
Окремо визначає для масиву Data суму всіх елементів і суму квадратів всіх елементів масиву.
Процедури і функції над дійсними
числами
Додатково до основних базових типів Object Pascal у функціях і методах
перетворення типів використовуються наступні типи і константи:
type TFloatRec = record
Exponent: Smallint; {Позитивна або негативна ступінь числа 10}
Negative: Boolean; {False, якщо число дорівнює 0 або позитивно}
Digits: array [0..20] of Char; {до 18 (для типу Extended) або до 19
(для типу Currency) значущих цифр числа}
type TFloatValue = (fvExtended, fvCurrency);
'fvExtended значення типу з плаваючою крапкою.
fvCurrency значення типу currency}
type TFloatFormat = (ffGeneral, ffExponent, ffFixed, ffNumber,
ffCurrency);
procedure FloatToDecimaKvar DecVal: TFloatRec; const Value; ValueType:
TFloatValue; Precision, Decimals: Integer);
Перетворює значення з плаваючою точкою, що визначене параметром
Value, в значення в десятковому поданні.
переводится, пожалуйста, подождите..
