Консультация № 188502
21.12.2015, 20:37
0.00 руб.
0 5 1
Уважаемые эксперты! Пожалуйста, ответьте на вопрос:

Помогите пожалуйста с программой на CompModel. Требуется из массива чисел найти произведение всех чисел. Массив задается пользователем, 10 значений начиная с адреса 40.

Спасибо заранее!

Обсуждение

давно
Посетитель
399341
3
21.12.2015, 20:52
общий
00 RD #40 Загрузка начального адреса массива 040
001 WR R3 в РОН R3
002 RD #10 Загрузка параметра цикла k = 10
003 WR 31
004 RD #0
005 WR 32
006 M1: RD 32
007 ADD @R3
008 WR 32
009 RD R3
010 ADD #1 адреса массива
011 WR R3 (переход к следующему адресу)
012 MUL 31 умножение
013 SUB #1
014 WR 31
015 JNZ M1
016 RD 32 Вывод
017 OUT результата

давно
Посетитель
7438
7205
21.12.2015, 20:55
общий
Адресаты:
Хорошо, я посмотрю, чуть позже
Об авторе:
"Если вы заметили, что вы на стороне большинства, —
это верный признак того, что пора меняться." Марк Твен
давно
Посетитель
399341
3
21.12.2015, 20:56
общий
Спасибо, жду с нетерпением
давно
Посетитель
399341
3
21.12.2015, 22:22
общий
Если сегодня сделайте, буду очень благодарен!
давно
Посетитель
7438
7205
21.12.2015, 23:16
общий
это ответ
Здравствуйте, toshkinggg
Вопросы есть?
Код:

RD #40
WR R3
RD #10
WR R2
RD #1
WR 32

M1: RD @R3+
mul 32
WR 32
JRNZ R2,M1
RD 32
OUT
HLT
Об авторе:
"Если вы заметили, что вы на стороне большинства, —
это верный признак того, что пора меняться." Марк Твен
Форма ответа