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

Вниз

Как отсоеденить сотую часть!!!!!!!!   Найти похожие ветки 

 
OLGA   (2008-05-14 17:10) [0]

Например при расчетах в edit заносится результат расчета округленный до сотых, допустим 55,89. И мне необходимо сотую часть этого числа отделить, в данном случае девятку, для дальнейших действий.Как это сделать.Помогите пожалуйста!!!!!


 
evgenij   (2008-05-14 17:14) [1]

RightStr(Edit.Text,1) //StrUtils


 
Palladin ©   (2008-05-14 17:16) [2]

математически: нужно отнять 55,80
метафизически оперируя строками: найти позицию десятичного разделителя, скопировать 1 символ/все символы начиная с найденой позиции+2, добавить к скопированному спереди "0,0";


 
Vlad Oshin ©   (2008-05-14 17:36) [3]

label1.Caption:=FormatFloat("#,###,###.0",StrToFloat(label1.Caption))


 
Anatoly Podgoretsky ©   (2008-05-14 21:10) [4]

Сотая это не 9, а 0,5589
А отделить ты хочешь не сотою, а позицию 10Е-2
А это просто, если не вдаваться в особенности чисел с плавающей запятой.

Trunc(a*10) / 10



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

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

Наверх





Память: 0.45 MB
Время: 0.045 c
2-1210824339
brother
2008-05-15 08:05
2008.06.08
сколько строк в TstringList


15-1209317345
No_Dead
2008-04-27 21:29
2008.06.08
Что пишут в логах?


15-1209108197
Ega23
2008-04-25 11:23
2008.06.08
Правовые аспекты использования алгоритмов шифрования


2-1211109836
DooRs
2008-05-18 15:23
2008.06.08
Переменная классового типа


15-1208933357
sql
2008-04-23 10:49
2008.06.08
MS SQL 2000





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский