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

Учебная ЭВМ. Минимальное положительное число

23.11.2016, 19:28. Просмотров 1238. Ответов 2
Метки нет (Все метки)

Здравствуйте, задание, найти минимально-положительное число, при данном коде 0 считается программой как число "не достойное" быть в результате.
Вопрос: Что изменить, что бы и 0 мог быть результатом?
Assembler
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
rd #50     ; R0 - указатель на начало массива
wr r0
rd #6      ; R1 - длина массива
wr r1
rd #0      ; R2 - результат
wr r2
 
m1:          ; цикл сравнений
rd @r0+      ; автоинкрементное чтение элемента
wr r3        ; сохранение элемента
sub #1       ; проверка знака
js next      ; неположительный - перейти к следующему
rd r2        ; проверка текущего минимума
sub #1
jns NotFirst ; найден первый отрицательный элемент?
mov r2,r3    ; да - сохранить его как минимальный
jrnz r1,m1   ; и продолжить цикл
NotFirst:    ; нет - сравнить с минимумом
rd r3
sub r2
jns next     ; если не меньше - продолжить цикл
mov r2,r3    ; иначе - обновить минимум
next:
jrnz r1,m1   ; проверка счётчика цикла
 
rd r2      ; загрузка
out        ; и вывод результата
hlt
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.11.2016, 19:28
Ответы с готовыми решениями:

Учебная ЭВМ. Минимальное число
RD #40 WR 30 RD #6 WR 31 RD @30 WR 32 M1: RD 30 ADD #1 WR 30 RD 31

ЭВМ Жмакина. Найти минимальное положительное число среди 14 элементов массива
Вот характеристика последовательности: Минимальное положительное число; n=14; Сделать нужно в...

ЭВМ Жмакина. В последовательности чисел длиной n=14 найти минимальное положительное число.
Помогите написать программу определения заданной характеристики последовательности чисел С1,...

Найти минимальное положительное число в последовательности чисел (n=14)
Вот есть код, не могу разобраться в чем ошибка. RD #40 WR 37 RD #14 WR 38 M3: RD @37 JS M1...

Найти номер минимального числа (учебная модель ЭВМ Жмакина)
Написать программу определения номера минимального числа элементов массива чисел С1, С2,..., Сn. ...

2
Kukuxumushu
1628 / 618 / 114
Регистрация: 13.06.2015
Сообщений: 2,105
Завершенные тесты: 2
23.11.2016, 19:41 2
Узнаю свой код. Хорошо пошёл по миру.
0
Trokov
2 / 0 / 0
Регистрация: 05.03.2016
Сообщений: 3
23.11.2016, 20:00  [ТС] 3
Да Константин,это ваш код.
Спасибо за помощь ,извините что не обратился к вам сразу.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.11.2016, 20:00

Учебная ЭВМ (Assembler).
Всем доброго времени суток. Если может кто нибудь помочь с ниже приведенной задачей буду искренне...

учебная модель Эвм. АССЕМБЛЕР
как вбить число...ну например мне нужно вычислить 1800/х

В массиве Z[1..N] каждое из чисел уменьшить на минимальное значение. Минимальное число в массиве не изменять.
Вот код задачи, минимум находит, но уменьшить не могу! Помогите дописать Uses crt; const n=10;...


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

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

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