Форум программистов, компьютерный форум, киберфорум
Наши страницы
Assembler для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
kolins_1995
0 / 0 / 0
Регистрация: 05.10.2015
Сообщений: 41
1

Перевод из 2-ой системы счисления в 8-ую систему счисления

23.10.2018, 22:16. Просмотров 893. Ответов 2
Метки нет (Все метки)

Здравствуйте !Мб у кого нибудь есть код или процедура перевода из 2-ой системы счисления в 8-ую систему счисления?
Спасибо!
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.10.2018, 22:16
Ответы с готовыми решениями:

Исправить код: Перевод из 8-ой системы в 16-ую систему счисления
Программа неправильно переводит числа из восьмеричной системы счисления в шестнадцатеричную....

Написать программу которая будет переводить числа из 14-ой системы счисления в 8-ую систему счисления
Помогите. очень нужно. Если можно, то как можно скорее) заранее спасибо) что-то у самой не...

Перевод числа из 16 в 10 систему счисления
Необходимо перевести четырехразрядное число (допустим A59F) в 10 форму и записать в строку. Для...

Перевод из десятичной в восьмеричную систему счисления
Есть программка которая переводит из 10 в 8 систему счисления stkseg segment stack db 256 dup...

Перевод из десятичной в пятеричную систему счисления [tasm]
Нужно решить задачу Преобразовать двухразрядное Десятичное число в пятеричное. Результат с...

2
ФедосеевПавел
Модератор
4311 / 2386 / 954
Регистрация: 01.02.2015
Сообщений: 7,860
23.10.2018, 22:50 2
Смотрите среди "похожих тем" внизу этой страницы
0
ФедосеевПавел
Модератор
4311 / 2386 / 954
Регистрация: 01.02.2015
Сообщений: 7,860
25.10.2018, 18:20 3
Лучший ответ Сообщение было отмечено kolins_1995 как решение

Решение

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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
LOCALS
 
.model small
 
.stack 200h
 
.data
        CrLf            db      0Dh, 0Ah, '$'
        msgPrompt       db      'Input (bin):', '$'
        msgResult       db      'Result (oct):', '$'
        msgPressAnyKey  db      0Dh, 0Ah, 'Press any key to exit...', '$'
.data?
        KeyBuffer       LABEL   byte
        MaxLen          db      ?
        Len             db      ?
        String          db      80 dup(?)
 
        X               dw      ?
.code
 
main    proc
        ;инициализация сегментного регистра ds адресом сегмента данных
        mov     ax,     @data
        mov     ds,     ax
 
        ;ввод строки
        mov     ah,     09h
        lea     dx,     [msgPrompt]
        int     21h
        mov     [MaxLen],       16+1
        mov     ah,     0Ah
        lea     dx,     KeyBuffer
        int     21h
 
        xor     cx,     cx
        mov     cl,     [Len]
        lea     si,     [String]
        xor     ax,     ax
        @@StrToInt:
                lodsb
                sub     al,     '0'
                shl     bx,     1
                add     bx,     ax
        loop    @@StrToInt
        mov     [X],    bx
        mov     ah,     09h
        lea     dx,     [CrLf]
        int     21h
 
        ;вывод результата
        mov     ah,     09h
        lea     dx,     [msgResult]
        int     21h
 
        mov     ax,     [X]
        ; Начинаем перевод числа AX в строку
        mov    cl,      ((16-1)/3)*3    ; 16-битный регистр, будем выводить по 3 бита (0..7)
        mov    dx,      ax              ; Сохраняем число в DX
 
@@Repeat:
 
        mov    ax,      dx              ; Восстанавливаем число в AX
        shr    ax,      cl              ; Сдвигаем на CL бит вправо (делим на 8*i)
        and    al,      07h             ; Получаем в AL цифру 0..7 (остаток от деления на 8)
        add    al,      '0'             ; Получаем в AL символ цифры
 
        int    29h                      ; Выводим символ в AL на экран
        sub    cl,      3               ; Уменьшаем CL на 3 для следующей цифры
        jnc    @@Repeat                 ; Если знаковый CL >= 0, то повторяем
 
        ;ожидание нажатия любой клавиши
        mov     ah,     09h
        lea     dx,     [msgPressAnyKey]
        int     21h
 
        mov     ah,     00h
        int     16h
 
        ;завершение программы
        mov     ax,     4C00h
        int     21h
main    endp
 
end     main
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.10.2018, 18:20

Перевод чисел из восьмеричной в десятичную систему счисления
Надобно перевести два двузначных числа из восьмеричной в десятичную систему счисления. Вот мои...

Перевод из 10 системы счисления в 2
Всем привет! Нашел программу на форуме, но в некоторых местах не понимаю что она делает. Можете...

Перевод из 10 системы счисления в 16
Помогите, пожалуйста! Дали задание, а я в ассемблере очень плохо разбираюсь. Нужно написать...


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

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

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