Результаты (
украинский) 2:
[копия]Скопировано!
Процедури і функції над дійсними
числами
Додатково до основних базових типів 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, в значення в десятковому поданні.
переводится, пожалуйста, подождите..
