Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 27.09.2019
Сообщений: 8

Через оператор if проверить, дробное число или целое

09.03.2020, 20:38. Показов 1539. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
как через оператора if проверить дробное число или целое, если дробное то чтобы выводило что ошибка??
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
09.03.2020, 20:38
Ответы с готовыми решениями:

Проверить, целое число или дробное
Ввожу в консоль значение 5.5, но ошибка не выдается (а должна). В чем проблема, почему не видит функцию? Попутный вопрос: кто-нибудь...

Определить, целое число хранится в переменной, или дробное
помогите ребята.я только учу сам с++.наработал свой проект все вроде пока понимаю но мне ужен маленький кусочек алгоритма.смотрите.скажем...

Прочитать дробное или целое число из строки с заданной позиции
Нужно прочитать только одно число. Примеры строк: ыв123.45ывы99... ыв-45выв... У обоих строк читать число с 3 символа, выводить в...

4
 Аватар для Argus19
1427 / 444 / 78
Регистрация: 24.09.2017
Сообщений: 2,525
Записей в блоге: 22
09.03.2020, 21:59
Kateryn, число положительное или отрицательное? Если и то и другое, то с помощью функции Fix.

Добавлено через 8 минут
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
Option Explicit
Dim num As Double, prom As Integer
 
Private Sub Command1_Click()
num = Val(Text1.Text)
prom = Fix(num)
If num - prom <> 0 Then
Label1.Caption = "Число дробное"
Else
Label1.Caption = "Число целое"
End If
Text1.Text = ""
End Sub
2
Супер-модератор
Эксперт функциональных языков программированияЭксперт Python
 Аватар для Catstail
38173 / 21108 / 4307
Регистрация: 12.02.2012
Сообщений: 34,709
Записей в блоге: 14
11.03.2020, 10:01


Visual Basic
1
2
3
4
5
6
7
8
Sub test()
    v = 12
    If VarType(v) = vbInteger Then
       Debug.Print "Число целое"
    ElseIf VarType(v) = vbDouble Then
       Debug.Print "Число дробное"
    End If
End Sub
2
sleep
 Аватар для I can
4931 / 4593 / 840
Регистрация: 13.04.2015
Сообщений: 9,753
11.03.2020, 10:04
Catstail, а вот, допустим, 5.0 - целое число, или нет ?
0
Супер-модератор
Эксперт функциональных языков программированияЭксперт Python
 Аватар для Catstail
38173 / 21108 / 4307
Регистрация: 12.02.2012
Сообщений: 34,709
Записей в блоге: 14
11.03.2020, 10:17
I can, не целое.

Добавлено через 8 минут
Но мне кажется, что постановка задачи предполагает анализ дробной части (а не типа вариантной переменной, как у меня).
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
11.03.2020, 10:17
Помогаю со студенческими работами здесь

Перевести любое целое или дробное число из восьмеричной системы счисления в двоичную
Разработать программу, позволяющую перевести любое целое или дробное число из восьмеричной системы счисления в двоичную! Умоляю,...

Проверить, целое число или нет
появился совсем глупые вопрос . Была задача , нужно было проверить целое число или нет . так вот не знал как это сделать по простому и...

Как проверить, целое число или вещественное?
Доброго времени суток! Как в делфи проверить целое число или вещественное. Если вещественное то записывать его, если целое то добавлять...

Не могу умножить целое число на дробное
Всем привет! Не получается умножить целое число на дробное. Пытаюсь получить результат из: 1*0.00000007 echo 1*0.00000007; ...

Разделить дробное число на целое и остаток
Есть дробное число, например 14.4054 Нужно убрать в отдельную переменную целую часть. Типа того: float fN = 14.1319139 float fO...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru