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

Приблизительное сравнение чисел

18.08.2012, 13:34. Показов 2085. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Возможно ли приблизительно сравнить два числа?
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
18.08.2012, 13:34
Ответы с готовыми решениями:

Приблизительное значение
Найти приблизительное значение, заменяя прирост функции диференциалом корень квадратный с (1,02^3+1,97^3)

приблизительное значение cos(x)
нужно получить значение cos , и что бы оно совпало с табличным значением , не могу найти ошибку #include <stdio.h> ...

Приблизительное значение SELECT
Доброе время суток, подскажите пожалуйста решение проблемы: Есть таблица в БД имеющая вид: Например такая запись: Улица ...

5
15155 / 6428 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
18.08.2012, 13:40
Лучший ответ Сообщение было отмечено как решение

Решение

Можно округлить до заданного числа значащих цифр и сравнить:
Visual Basic
1
2
3
4
Dim a, b
a = 1 / 3
b = 0.33
Debug.Print Round(a, 2) = Round(b, 2) 'True
1
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,904
18.08.2012, 15:39
А ещё можно сравнить разницу с требуемой точностью
Visual Basic
1
2
3
4
5
6
7
8
Function Is_Equ(a, b, d) As Boolean
  Is_Equ = Abs(a - b) < d
End Function
 
Sub Is_Equ_Example()
'равно ли 1.99 числу 2.01 с точностью до 0.02
MsgBox Is_Equ(1.99, 2.01, 0.02)
End Sub

Не по теме:

Каждый выбирает под себя:)

0
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
18.08.2012, 20:07
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Private Sub Command1_Click()
a = 4 * Atn(1)
b = 3.14
p = 4
Print r(a, b, p)
End Sub
Function r$(a, b, p)
a = Round(a, p)
b = Round(b, p)
r = Choose(Sgn(a - b) + 2, a & " < " & b, a & " = " & b, a & " > " & b)
End Function
0
15155 / 6428 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
18.08.2012, 20:36
gaw,
Visual Basic
1
r = a & " " & Chr(Sgn(a - b) + 61) & " " & b
1
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
18.08.2012, 22:04
Цитата Сообщение от Казанский Посмотреть сообщение
gaw, Код Visual Basic
1 r = a & " " & Chr(Sgn(a - b) + 61) & " " & b
а мне то зачем,

Добавлено через 1 минуту
а ТС скорей всего надо расказать о +61
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.08.2012, 22:04
Помогаю со студенческими работами здесь

Приблизительное значение числа
Я знаю что в шарпе есть возможность запрашивать не точное значение числа , а то в каком диапазоне оно должно находится. Например для теста...

Приблизительное значение SELECT
Доброе время суток, подскажите пожалуйста решение проблемы: Есть таблица в БД имеющая вид: Например такая запись: Улица | Дом |...

Вычислить приблизительное значение функции
Дано действительное число x и натуральное число k (0k 10). вычислить при- приблизительно значение sin (x) x...

Определить приблизительное время до старта ракеты
Запуск ракеты состоится ровно в 12:00, в течение ближайших суток. Необходимо определить приблизительное время до запуска. Ввод содержит...

Вычислить приблизительное значение бесконечной суммы
Помогите решить задачу! Это очень срочно! Составить программу нахождения суммы бесконечного ряда. Сложение заканчивается как только...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru