Подсчёт количества чисел, меньших первого числа массива

@Леопольд1241 · Регистрация: 01.05.2017

Author24 — интернет-сервис помощи студентам

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

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

Вот начало программы:

Код

                                    Первый массив
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+

Помогите разобраться.

Заранее спасибо.

ФедосеевПавел · 01.05.2017, 15:23

Если бы ещё знать эту 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. Поищете в методичке правильные инструкции и замените.

@Леопольд1241 · 01.05.2017, 15:58 **[ТС]**

В том то и дело, что по методичке совсем другое задание, а именно нахождение среднего арифметического из максимальных элементов 3 массивов.

К сожалению команд CMP, JAE и JA нет в CompModel =(

ФедосеевПавел · 01.05.2017, 17:36

Но есть аналоги.
Все кому интересно, что такое 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

@Леопольд1241 · 01.05.2017, 18:39 **[ТС]**

Почему-то ругается на MOV R9 - Неверная мнемоника

ФедосеевПавел · 01.05.2017, 19:05

RD R9

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

Призываю и вас поступать также.

@Леопольд1241 0 / 0 / 0 Регистрация: 01.05.2017 Сообщений: 6
		1
	CompModel Подсчёт количества чисел, меньших первого числа массива 01.05.2017, 12:09. Показов 3101. Ответов 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

@Леопольд1241 0 / 0 / 0 Регистрация: 01.05.2017 Сообщений: 6
	01.05.2017, 15:58 [ТС]	3
	В том то и дело, что по методичке совсем другое задание, а именно нахождение среднего арифметического из максимальных элементов 3 массивов. К сожалению команд CMP, JAE и JA нет в CompModel =( 0

@Леопольд1241 0 / 0 / 0 Регистрация: 01.05.2017 Сообщений: 6
	01.05.2017, 18:39 [ТС]	5
	Почему-то ругается на MOV R9 - Неверная мнемоника 0

ФедосеевПавел Модератор 8476 / 4335 / 1642 Регистрация: 01.02.2015 Сообщений: 13,461 Записей в блоге: 8
	01.05.2017, 19:05	6
	RD R9 Добавлено через 1 минуту Я не знаю этот CompModel. Я действую по образцу. Передо мной их аж две штуки - ваш код и код по ссылке. Призываю и вас поступать также. 0

Подсчёт количества чисел, меньших первого числа массива

Решение