Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];

Вниз

узнать разницу между числами   Найти похожие ветки 

 
md   (2005-11-17 15:43) [0]

надо узнать разницу между двумя числами (double). Ответ нужен в виде положительного числа. Есть ли какая-нибудь функция которая может это стелать?
Или хотя бы как получить модуль числа?


 
TUser ©   (2005-11-17 15:45) [1]

abs()


 
Manufel ©   (2005-11-17 18:50) [2]

Напишу подробнее:
x1,x2:double;
....
raznica:=abs(x1-x2);


 
Johnmen ©   (2005-11-17 18:51) [3]

http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/reals.htm


 
Separator ©   (2005-11-17 18:53) [4]

function Difference(const Value1, Value2: Extended): Extended
begin
   Result:= ABS(ABS(Value1) - ABS(Value2))
end;


 
Separator ©   (2005-11-17 18:54) [5]

[2] - не пойдет, а если одно из чисел отрицательно?


 
Leonid Troyanovsky ©   (2005-11-17 19:02) [6]


> Separator ©   (17.11.05 18:54) [5]
> [2] - не пойдет, а если одно из чисел отрицательно?


Лаконично и уверенно.
Сильно. Уважаю.

--
Regards, LVT.


 
Германн ©   (2005-11-18 01:36) [7]


> Separator ©   (17.11.05 18:54) [5]
>
> [2] - не пойдет, а если одно из чисел отрицательно?

Добавь к Regards, LVT. смайлик :) и получишь ответ.


 
Leonid Troyanovsky ©   (2005-11-18 12:35) [8]


> Германн ©   (18.11.05 01:36) [7]

> Добавь к Regards, LVT. смайлик :) и получишь ответ.


Тут, как раз, хочется плакать.

--
Regards, LVT :)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.035 c
14-1132033296
syte_ser78
2005-11-15 08:41
2005.12.04
Приношу свои извинения модераторам раздела "Базы".


2-1132140756
MitjaT
2005-11-16 14:32
2005.12.04
Глюки при крупном размере экрана


14-1131786030
lookin
2005-11-12 12:00
2005.12.04
Общая проблема - отсутствие реального опыта


14-1131537258
TButton
2005-11-09 14:54
2005.12.04
Системные Сервисы


14-1132067730
Анонимщики
2005-11-15 18:15
2005.12.04
Дебаг библиотеки





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский