Консультация № 68183
22.12.2006, 18:42
0.00 руб.
0 3 3
Здравствуйте Уважаемые Эксперты!
Прошу ответить на мой вопрос?:
Есть 1 переменная типа Real и одна типа Integer...в Переменной типа Real находиться дробное число с большим кол-вом знаков после запятой, хотелось бы запихнуть значения перемнной Real в Integer не округляя(просто отбросить все числа после запятой)
Заранее благодарен, Ustas.

Обсуждение

Неизвестный
22.12.2006, 19:45
общий
это ответ
Здравствуйте, Ustas!

Если я правильно понял Ваш вопрос, то решение в приложении :)
Функция <b>trunc</b> выделяет целую часть из числа.
Функция <b>frac</b> выделяет дробную часть из числа.

Удачи!

Приложение:
var a: real; c:integer;begin a:=1123.41234325; c:=trunc(a);end;
Неизвестный
23.12.2006, 00:34
общий
это ответ
Здравствуйте, Ustas!

В Delphi имеется великолепный тип Variant

вот код:

var
a: Float;
b: Variant;
c: Integer;
begin
a:=32467967,36686809573;
b:=a;
c:=b;
ShowMessage(IntToStr(c));
end;

Приложение:
i
Неизвестный
23.12.2006, 13:27
общий
это ответ
Здравствуйте, Ustas!
trunc(x)
x число целую часть которого нужно взять
попробуй еще INT(x)
Форма ответа