Главная страница
    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.044 c
15-1208981134
@!!ex_
2008-04-24 00:05
2008.06.08
Кому не лень - помогите.


15-1209453265
Восхищенный
2008-04-29 11:14
2008.06.08
LOL


15-1209148434
Res
2008-04-25 22:33
2008.06.08
http протокол


15-1209039444
sql
2008-04-24 16:17
2008.06.08
MS SQL 2000


2-1210706730
Julia
2008-05-13 23:25
2008.06.08
Поменять язык





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