Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
NiSTeR
0 / 0 / 0
Регистрация: 21.04.2015
Сообщений: 5
#1

Определить, имеется ли среди трех заданных хотя бы одна пара равных между собой чисел

20.01.2016, 21:20. Просмотров 896. Ответов 2
Метки нет (Все метки)

Помогите пожалуйста решить задачи
Даны три вещественных числа. Определить, имеется ли среди них хотя бы одна пара равных между собой чисел.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.01.2016, 21:20
Ответы с готовыми решениями:

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

Определить, имеется ли среди них хотя бы одна пара равных между собой чисел
Вообще не поняла..:( Даны три вещественных числа a, b, c . Определить, имеется ли среди них хотя...

Даны три вещественных числа a,b,c. Определить, имеется ли среди них хотя бы одна пара равных между собой чисел
если надо какие то формулы: напишу

Данны три вещественных числа a,b,c.Определить имеется ли среди них хотя бы одна пара равных между собой чисел.
братцы составте программу полность:)

Есть ли среди трех чисел хотя бы одна пара равных между собой
Даны три действительных числа a, b з. Определить, есть ли среди них хотя бы одна пара равных между...

2
Shersh
Заблокирован
21.01.2016, 09:51 #2
Visual Basic
1
2
3
4
a=3'inputbox("a=?")
b=5
c=3
msgbox a=b or a=c or b=c
0
echs
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
21.01.2016, 11:13 #3
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Вещественные числа вообще говоря напрямую не сравнивают
Но можно задать некоторое число epsilon (погрешность при сравнении)
И сравнивать не сами числа а модуль их разности. То есть ваш код будет выглядеть как-то так
Visual Basic
1
   If Abs(a-b) < epsilon Or Abs(b-c) < epsilon Or Abs(c-a) < epsilon Then Print "YES" Else Print "NO"
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.01.2016, 11:13

Определить, имеется ли хотя бы одна пара равных между собой чисел
даны три вещественных числа а,в,с. Определить, имеется ли среди них хотя бы одна пара равных между...

Определить, имеется ли среди чисел хотя бы пара равных между собой
Помогите решить, Пожалуйста) 3.Даны 3 вещественных числа a,b,c. Определить, имеется ли среди них...

Определить, есть ли хотя бы одна пара равных между собой чисел
Даны три действительных числа a, b з. Определить, есть ли среди них хотя бы одна пара равных между...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru