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

Даны три числа, которые изменяются по правилу

11.07.2016, 09:10. Показов 604. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Даны три числа 79; 78; 77,
которые изменяются по следующему правилу
1. Из наибольшего числа можно вычесть число 7, если оно
при этом останется двузначным. Если вычитание невозможно, то
это число (переменная) присваивает значение 10.
2. Из среднего числа можно вычесть число 3, если оно при этом
останется двузначным.
3. Наименьшее число не меняется
4. Все это повторяется до тех пор, пока числа могут меняться.
Определить на каком шагу все числа сравняются по величине.
(Ответ: 22)

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
DIM SHARED x, y, z
 
DECLARE SUB ORD ()
CLS
x = 79: y = 78: z = 77
 
FOR i = 1 TO 22
   IF x - 7 > 9 THEN x = x - 7 ELSE x = 10
   IF y - 3 > 9 THEN y = y - 3
   z = z
   CALL ORD
   PRINT x; y; z
NEXT
END
 
SUB ORD
   IF x < y THEN SWAP x, y
   IF x < z THEN SWAP x, z
   IF y < z THEN SWAP y, z
END SUB
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
11.07.2016, 09:10
Ответы с готовыми решениями:

Даны натуральные числа от 1 до 33. Вывести на экран эти числа, кроме тех, которые делятся или оканчиваются на три
Даны натуральные числа от 1 до 33. Вывести на экран эти числа, кроме тех, которые делятся на три или оканчиваются на три.

Даны три действительных числа,которые принадлежат интервалу(1;3)
Даны три действительных числа.выбрать из них те,которые принадлежат интервалу(1;3). помогите пжалста

Даны три действительных числа, выбрать из них те, которые принадлежат интервалу от 1 до 3
Даны три действительных числа, выбрать из них то которые принадлежат интервалу от 1 до 3. Программа: Program Pawel; Var ...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
11.07.2016, 09:10
Помогаю со студенческими работами здесь

Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1, 3)
Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1, 3).

Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу
1. Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1,3) 2. Дана таблица из n строк и n...

Даны три действительных числа, выбрать из них то которые принадлежат интервалу
Даны три действительных числа, выбрать из них то которые принадлежат интервалу от 1 до 3. Программа: Program Pawel; Var ...

Даны три числа. Выберите те из них, которые принадлежат заданному отрезку [e,f]
Даны три числа. Выберите те из них, которые принадлежат заданному отрезку . (без исп. массивов)

Даны три числа. Выберите те из них, которые принадлежат заданному отрезку [e, f]
даны три числа. выберите те из них которые принадлежат заданному отрезку Паскаль.


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
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