Консультация # 194142: Здравствуйте, уважаемые эксперты! Прошу помощи в следующем вопросе: Три массива в памяти заданы начальными адресами и длинами. Вычислить и вывести на устройство вывода среднее арифметическое параметров этих массивов. Параметр массивов это минимальное положительное число. CompModel, Модель ЭВМ. Есть такой код, но здесь необходимо сд...
Здравствуйте, уважаемые эксперты! Прошу помощи в следующем вопросе: Три массива в памяти заданы начальными адресами и длинами. Вычислить и вывести на устройство вывода среднее арифметическое параметров этих массивов. Параметр массивов это минимальное положительное число. CompModel, Модель ЭВМ.
Есть такой код, но здесь необходимо сделать поиск минимального из положительных.
RD #3 ;количество массивов и минимальных положительных
WR R4 ;(для подсчета среднего арифметического)
RD #40 ;загрузка начального адреса первого массива
WR R0 ;в регистр R0
RD #5 ;загрузка длины массива k=5 в регистр R2
WR R2
CALL MINPOS ;ищем минимальное положительное в массиве
WR R3 ;накапливаем сумму для среднего арифметического
RD #50 ;загрузка начального адреса второго массива
WR R0 ;в регистр R0
RD #4 ;загрузка длины массива k=4 в регистр R2
WR R2
CALL MINPOS
ADD R3 ;накапливаем сумму для среднего арифметического
WR R3
RD #60 ;загрузка начального адреса второго массива
WR R0 ;в регистр R0
RD #5 ;загрузка длины массива k=5 в регистр R2
WR R2
CALL MINPOS
ADD R3 ;накапливаем сумму для среднего арифметического
DIV R4 ;делим на количество
OUT ;выводим среднее арифметическое
HLT ;останов
MINPOS:RD #0 ;обнуляем минимальное положительное
WR R5
M1:RD @R0+ ;берём очередной элемент массива (с автоинкрементом адреса)
JS NEXT ;отрицательные
JZ NEXT ; и нулевые пропускаем
WR R6 ;сохраним в R6
RD R5 ;проверим текущее минимальное положительное на 0
JZ NEW ;если найдено первое положительное, то просто сохраняем в R5
RD R6 ;только что прочитанное положительное число
SUB R5 ;сравниваем с минимальным
JNS NEXT ;если >= , то на следующее
NEW:MOV R5,R6 ;нашли очередное минимальное
NEXT:JRNZ R2,M1 ;циклим по всем элементам массива
RD R5 ;возвращаем результат в аккумуляторе
RET
Консультировал: Лысков Игорь Витальевич (Старший модератор)
Дата отправки: 10.12.2018, 16:58
Команда портала RFPRO.RU благодарит Вас за то, что Вы пользуетесь нашими услугами. Вы только что прочли очередной выпуск рассылки. Мы старались.
Пожалуйста, оцените его. Если совет помог Вам, если Вам понравился ответ, Вы можете поблагодарить автора -
для этого в каждом ответе есть специальные ссылки. Вы можете оставить отзыв о работе портале. Нам очень важно знать Ваше мнение.
Вы можете поближе познакомиться с жизнью портала, посетив наш форум, почитав журнал,
который издают наши эксперты. Если у Вас есть желание помочь людям, поделиться своими знаниями, Вы можете зарегистрироваться экспертом.
Заходите - у нас интересно!