Форум программистов, компьютерный форум, киберфорум
Наши страницы
Assembler: i8080/8085/KP580
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
Леопольд1241
0 / 0 / 0
Регистрация: 01.05.2017
Сообщений: 6
1

[CompModel-2K] Подсчёт количества чисел, меньших первого числа массива

01.05.2017, 12:09. Просмотров 823. Ответов 5

Задача звучит следующим образом:
Составить программу с подпрограммой, которая считает количество чисел, меньших первого числа массива, в трёх массивах и складывает их результаты.

Как записать массивы я разобрался, а чтобы он ещё и в подпрограмме считал количество этих чисел, а потом ещё и складывал эти результаты, ума не приложу.

Вот начало программы:
Код
                                    Первый массив
RD #60
WR R1
RD #10
WR R2
CALL M                           Вызов подпрограммы
WR R6                            Сохранение результата
RD #70                           Второй массив
WR R1
RD #10
WR R2
CALL M                           Вызов подпрограммы
WR R7                            Сохранение результата
RD #80                           Третий массив
WR R1
RD #10
CALL M                           Вызов подпрограммы
WR R8                            Сохранение результата
ADD R6                           Сложение результатов
ADD R7
ADD R8
OUT
                                     Начало подпрограммы
HLT
M: RD @R1
WR R3
L2: RD @R1+
Помогите разобраться.

Заранее спасибо.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.05.2017, 12:09
Ответы с готовыми решениями:

Подсчёт количества повторений символов в строке
Подскажите , почему не работает код? Ввожу строку , ввожу символ, проверяю...

Числа Фибоначчи: подсчёт количества n-значных чисел
Всем привет!!! Плиз помогите с прогой разобраться... Задание: Подсчитать...

Подсчёт суммы вводимых чисел до первого отрицательного числа.
1. Создайте программу подсчёта суммы вводимых чисел до первого отрицательного...

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

Нахождение количества чисел, значение которых больше первого числа
Создать программу с функциями: 1) ввод 12 чисел 2)нахождение количества...

5
ФедосеевПавел
Модератор
4162 / 2272 / 919
Регистрация: 01.02.2015
Сообщений: 7,549
01.05.2017, 15:23 2
Если бы ещё знать эту CompModel-2K...

Тут будет что-то подобное (только вам придётся разобраться с командами)
Код
M: RD @R1
WR R3            R3 - значение 1-го элемента
RD #0            R9 - количество искомых чисел
WR R9
L2: RD @R1+
CMP R3
JAE L3            Если очередной элемент массива больше первого, то пропустить
RD R9            Увеличение счётчика искомых чисел
ADD #1
WR R9
L3: RD R2         Уменьшение количества непросмотренных элементов
SUB #1
WR R2
CMP #0          Если не все просмотрены - продолжить
JA L2
MOV R9            Загрузить в аккумулятор количество найденных чисел
RET
Но это не совсем правильный ответ, т.к. я не знаю CompModel. Поищете в методичке правильные инструкции и замените.
0
Леопольд1241
0 / 0 / 0
Регистрация: 01.05.2017
Сообщений: 6
01.05.2017, 15:58  [ТС] 3
В том то и дело, что по методичке совсем другое задание, а именно нахождение среднего арифметического из максимальных элементов 3 массивов.

К сожалению команд CMP, JAE и JA нет в CompModel =(
0
ФедосеевПавел
Модератор
4162 / 2272 / 919
Регистрация: 01.02.2015
Сообщений: 7,549
01.05.2017, 17:36 4
Лучший ответ Сообщение было отмечено Леопольд1241 как решение

Решение

Но есть аналоги.
Все кому интересно, что такое CompModel, сюда.
JAE -> JNS
JA -> JO

CMP - в том описании нет.
Значит придётся заменять его вычитанием.
Код
M: RD @R1
WR R3            R3 - значение 1-го элемента
RD #0            R9 - количество искомых чисел
WR R9
L2: RD @R1+
SUB R3
JNS L3            Если очередной элемент массива больше первого, то пропустить
RD R9            Увеличение счётчика искомых чисел
ADD #1
WR R9
L3: RD R2         Уменьшение количества непросмотренных элементов
SUB #1
WR R2
SUB #0          Если не все просмотрены - продолжить
JO L2
MOV R9            Загрузить в аккумулятор количество найденных чисел
RET
0
Леопольд1241
0 / 0 / 0
Регистрация: 01.05.2017
Сообщений: 6
01.05.2017, 18:39  [ТС] 5
Почему-то ругается на MOV R9 - Неверная мнемоника
0
ФедосеевПавел
Модератор
4162 / 2272 / 919
Регистрация: 01.02.2015
Сообщений: 7,549
01.05.2017, 19:05 6
RD R9

Добавлено через 1 минуту
Я не знаю этот CompModel. Я действую по образцу. Передо мной их аж две штуки - ваш код и код по ссылке.

Призываю и вас поступать также.
0
01.05.2017, 19:05
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.05.2017, 19:05

Найти сумму чисел массива меньших заданного числа
Есть величины А, В(А<В) и массив Х(n). Найти сумму всех чисел в массиве, что...

Найти произведение всех элементов массива чисел, меньших заданного числа N
ПОМОГИТЕ ПОЖАЛУСТА:* Найти произведение всех элементов массива чисел, меньших...

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


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

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

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