Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Есть ли функция?  (Прочитано 4268 раз)
0 Пользователей и 1 Гость смотрят эту тему.
Альберт
Гость
« : 21-10-2006 11:30 » 

Народ, есть ли функция в Delphi,  возвращающая число знаков после запятой в числах типа real?
Записан
Igel
Опытный

ru
Offline Offline
Пол: Мужской

« Ответ #1 : 21-10-2006 18:07 » 

На сколько я помню таких функций нет, т.к. сама структура числа REAL фиксирует число знаков после запятой.
Сейчас не помню, но в Паскале там было порядка 8-ми знаков.
Записан

Ёжики, это не только ценные шкурки...
x77
Модератор

ro
Offline Offline
Пол: Мужской
меняю стакан шмали на обратный билет с Марса.


« Ответ #2 : 22-10-2006 10:03 » 

Альберт, именно функции - нет. но есть функция, возвращающая дробную часть Frac (x: extended): extended; соответственно можно узнать число знаков после запятой преобразовав полученное значение в строку и отбросив два знака (0 и точку, которые тоже возвращает Frac):

Length (FloatToStr (Frac (n))) - 2;
Записан

Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines