Из дробного числа в целое

@Arxangelname · Регистрация: 26.03.2009

Author24 — интернет-сервис помощи студентам

Помогите вспомнить есть такая функция или процедура не помню точно из дробного числа (ну т.е. из числа с плавающей запятой) переделать в целое
Спс заранее.

пример
x:=32,323
надо чтобы y := 32;

@Lord_Voodoo · 14.01.2010, 09:02

есть функция Trunc - округляет до целой части число с плавающей запятой

@Андрей Борисови · 14.01.2010, 09:07

Я знаю одного интузиаста.. он превращал такие числа в строку, искал запятую, и вытаскивал текст до запятой

да не я это))))

@Lord_Voodoo · 14.01.2010, 09:26

Андрей Борисови, а что тут такого, я по такому принципу делал функцию округления математического: анализировал цифру в заданном разряде, так что это вполне нормально

@Mиxaил · 14.01.2010, 10:06

А че, нормальный способ!!!!

Надо будет попробовать!!!

@Dream · 14.01.2010, 11:23

y:=Round(x);

@Чёрный Медведь · 14.01.2010, 11:50

Вот ф-ия округления с определённой точностью

Delphi

// Round(125.358, 100) = 125,36
function RoundTo(Value: Double; Precition: Integer): Double;
var
  N: Double;
  I: Integer;
begin
  N := Frac(Value) * Precition; // 
  I := Trunc(N);  // 
  if Frac(N) >= 0.5 then Inc(I);  // 
  if Frac(N) <= -0.5 then Dec(I); //
  Result := Trunc(Value) + I / Precition;
end;

@Inadequate · 14.01.2010, 12:45

Чёрный Медведь, а причём здесь определенная точность? Тут же ясно написано

Сообщение от Arxangelname

переделать в целое

Тут либо trunc либо round.
Arxangelname, вот в чем их различие

Round(x) возвращает результат округления x до ближайшего целого
Trunc(x) возвращает целую часть х

@Arxangelname 1 / 1 / 0 Регистрация: 26.03.2009 Сообщений: 14
		1
	Из дробного числа в целое 14.01.2010, 08:41. Показов 7395. Ответов 7 Метки нет (Все метки) Помогите вспомнить есть такая функция или процедура не помню точно из дробного числа (ну т.е. из числа с плавающей запятой) переделать в целое Спс заранее. пример x:=32,323 надо чтобы y := 32; 0

@Lord_Voodoo Почетный модератор 8784 / 2537 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	14.01.2010, 09:02	2
	есть функция Trunc - округляет до целой части число с плавающей запятой 0

@Андрей Борисови 714 / 402 / 33 Регистрация: 04.10.2009 Сообщений: 1,686
	14.01.2010, 09:07	3
	Я знаю одного интузиаста.. он превращал такие числа в строку, искал запятую, и вытаскивал текст до запятой да не я это)))) 0

@Lord_Voodoo Почетный модератор 8784 / 2537 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	14.01.2010, 09:26	4
	Андрей Борисови, а что тут такого, я по такому принципу делал функцию округления математического: анализировал цифру в заданном разряде, так что это вполне нормально 0

@Mиxaил 542 / 447 / 162 Регистрация: 10.12.2009 Сообщений: 1,857
	14.01.2010, 10:06	5
	А че, нормальный способ!!!! Надо будет попробовать!!! 0

@Dream 158 / 157 / 16 Регистрация: 26.07.2008 Сообщений: 549
	14.01.2010, 11:23	6
	y:=Round(x); 1

@Inadequate Retired 7727 / 2559 / 671 Регистрация: 17.10.2009 Сообщений: 5,100
	14.01.2010, 12:45	8
	Чёрный Медведь, а причём здесь определенная точность? Тут же ясно написано Сообщение от Arxangelname переделать в целое Тут либо trunc либо round. Arxangelname, вот в чем их различие Round(x) возвращает результат округления x до ближайшего целого Trunc(x) возвращает целую часть х 0