Консультация № 64542
28.11.2006, 08:04
0.00 руб.
0 4 4
Добрый день, уважемые эксперты.
Подскажите, как узнать, есть ли у числа дробная часть или нет
например 2-нет дробнойчасти, 2,5-есть

Обсуждение

Неизвестный
28.11.2006, 08:15
общий
это ответ
Здравствуйте, Гребиников Павел Генадьевич!
Программно, см. приложение


Приложение:
Если (число-Окр(Число)<>0) тогда флДробЧасть = 1;КонецЕсли;
Неизвестный
28.11.2006, 08:23
общий
это ответ
Здравствуйте, Гребиников Павел Генадьевич!

Еще можно так:

Если Найти(Строка(ТвоеЧисло), ",") = 1 Тогда Сообщить("дробная часть есть"); КонецЕсли;
Неизвестный
28.11.2006, 10:05
общий
это ответ
Здравствуйте, Гребиников Павел Генадьевич!
Если Цел(Число1) = Число1 Тогда
//Число целое
иначе
//дробное
КонеЕсли;
Неизвестный
28.11.2006, 19:01
общий
это ответ
Здравствуйте, Гребиников Павел Генадьевич!
Процедура Сформировать()
Если ИсследуемоеЧисло-Цел(ИсследуемоеЧисло) = 0 Тогда
Сообщить("Число целое");
Иначе
Сообщить("ЧИсло дробное");
КонецЕсли;
КонецПроцедуры
Форма ответа