Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 12.06.2010
Сообщений: 7

Даны три действительных числа a, b, c; найти наибольшее из них

14.06.2010, 19:05. Показов 608. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Кот у меня вопрос вроде малость понял но серовно есть недопонимание вот мне надо чтоб ты дал подсказку у меня тема вот в чем мне нужна помощь в сравнении 3 чисел а незнаю как написать помоги если не трудно

91. Даны три действительных числа a, b, c. Найти наибольшее из них
QBasic/QuickBASIC
1
2
3
4
5
6
7
CLS
INPUT "CHISLO 1" a
INPUT "CHISLO 2" b
INPUT "CHISLO 3" c
IF a > b AND c THEN a
IF b > a AND c THEN b
IF c > a AND b THEN c
vot tak ja napisal О_о vidno 4to nepraveljno no vsetaki :S
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
14.06.2010, 19:05
Ответы с готовыми решениями:

Даны три действительных числа a,b,c. Вычислить количество положительных чисел среди них. Какой код можно написать?
Даны три действительных числа a,b,c. Вычислить количество положительных чисел среди них. Какой код...

Даны три действительных числа a,b,c. Выбрать из них те, которые принадлежат интервалу [1, 30]
Sub Primer1() Dim a As Integer, b As Integer, c As Integer a = InputBox("a=") b = InputBox("b=")...

Даны два действительных числа x и если наименьшее из них отрицательно, то заменить его нулем, в противном случае един
Даны два действительных числа x и y. Если наименьшее из них отрицательно, то заменить его нулем, в...

3
0 / 0 / 0
Регистрация: 28.09.2014
Сообщений: 8
14.06.2010, 19:41
QBasic/QuickBASIC
1
2
3
4
5
6
7
8
CLS
INPUT "Введите число a", a
INPUT "Введите число b", b
INPUT "Введите число c", c
IF a>b AND a>c THEN PRINT "а - самое большое" ELSE
IF b>a AND b>c THEN PRINT "b - самое большое" ELSE
IF c>b AND c>a THEN PRINT "c - самое большое" 
END
вроде так.
0
0 / 0 / 0
Регистрация: 12.06.2010
Сообщений: 7
14.06.2010, 19:48  [ТС]
Большое спасибо если что не поможешь если будут вопросы ?
0
Платежеспособный зверь
 Аватар для кот Бегемот
8966 / 4389 / 1655
Регистрация: 28.10.2009
Сообщений: 11,647
14.06.2010, 21:43
можно и проще
PureBasic
1
2
3
4
5
6
7
CLS
INPUT "CHISLO 1" a
INPUT "CHISLO 2" b
INPUT "CHISLO 3" c
IF a > b then max=a else max=b 
if c> max then max=c
print max
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
14.06.2010, 21:43
Помогаю со студенческими работами здесь

Даны три числа. Используя эти числа создать наибольшее четное число, если невозможно, то программа должна напечататьНЕТ
Даны три числа Используя этих чисел создать наибольшее четное число, если невозможно, то программа...

Даны три натуральных числа. Разделить все числа нацело на меньшее из них
Cоставить программы для решения следующих задач: 1. Даны три натуральных числа K,L,M (K>=L>=M)....

Даны 4 числа. Найти наибольшее и наименьшее среди них
Даны 4 числа x,y,z,q.Найти наибольшее и наименьшее среди них , Среди двух оставшихся найти...

Даны три числа. Найти среди них максимальное отрицательное число
Всем примет, начал изучать Visual Basic никак не могу решить задачу. Даны три числа. Найти среди...

Даны три разных числа. Найти среди них произведение и количество отрицательных
Пожалуйста помогите!!! Даны три разных числа. Найти среди них произведение и количество...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru