Как определить дробное число или нет ?

04.04.2013, 20:39. **Показов** 3274. **Ответов** 3

Студворк — интернет-сервис помощи студентам

Не знаю как так сделать чтоб если при делении число выходило дробным то сохранялась в переменную .d а если делилось нацело то в .q. Помогите решить проблему.

@locm · 04.04.2013, 20:57

А зачем такое понадобилось?
Ну раз нужно.

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var.d=20/4
If Int(var)=var
  Debug "Число целое"
Else
  Debug "Число дробное"
EndIf
 
var.d=20/3
 
If Int(var)=var
  Debug "Число целое"
Else
  Debug "Число дробное"
EndIf

04.04.2013, 21:10

locm, спасибо за помощь а пригодилось за тем , что я пишу калькулятор(ну тренируюсь)
и чтоб не получалось такого "20.0000000/4.0000000=5.0000000" ну или такого "20/8=2"

@locm · 04.04.2013, 21:22

Сообщение от Spirit01

чтоб не получалось такого "20.0000000/4.0000000=5.0000000"

У меня этот код выдает 5, без нулей после точки.

PureBasic
1
2
x.d=20.0000000/4.0000000
Debug StrD(x)

Новые блоги и статьи Все статьи Все блоги /
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .

Spirit01

	Как определить дробное число или нет ? 04.04.2013, 20:39. Показов 3274. Ответов 3 Метки нет (Все метки) Не знаю как так сделать чтоб если при делении число выходило дробным то сохранялась в переменную .d а если делилось нацело то в .q. Помогите решить проблему.

Spirit01
	04.04.2013, 21:10
	locm, спасибо за помощь а пригодилось за тем , что я пишу калькулятор(ну тренируюсь) и чтоб не получалось такого "20.0000000/4.0000000=5.0000000" ну или такого "20/8=2"