Форум программистов, компьютерный форум, киберфорум
Наши страницы
Assembler, MASM, TASM
Войти
Регистрация
Восстановить пароль
 
Nuand
0 / 0 / 0
Регистрация: 22.04.2010
Сообщений: 2
1

вывод остатка

11.05.2010, 20:35. Просмотров 465. Ответов 0
Метки нет (Все метки)

Вопрос такой: всё считает, прога работает, но не получается вывести остаток 0,5. Всё время выводится 1. Вот код
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
.model small
.stack 100h
.data
a   dw 18
b   dw 13
.code
start:
mov   ax,@data
mov   ds,ax ;10
 
push ds
mov ah,25h;-уст вектор прерывания на указанный адрес.
mov al,60h
mov dx, seg pew 
mov ds, dx ;DS-сегмент устанавливаемой процедуры обр прерывания
mov dx, offset pew;;Dx-смещение уст проц обработки прерывания
int 21h
pop ds 
int 60h
 
pew proc
mov   ax,a
mul  b
mov   cx,ax
mov   ax,a       ;В ax значение a, множимое
mul  a          ;Умножить ax на a (dx:ax=a^2)
mul  a          ;                    (dx:ax=a^3)
cwd              ;Расширить делимое в dx из 16-разр в 32 разр
mov   bx,3       ;В bx делитель 3
div  bx         ;Делить ax на bx, остаток:частное в dx:ax
add   cx,ax      ;Сохранить частное в cx
mov   ax,b       ;В ax значение b, множимое
mul  b          ;Умножить на b (ax=b^2) ;20
cwd              ;Расширить делимое в dx
mov   bx,2       ;В bx делитель 2
div  bx         ;Делить ax на bx, остаток:частное в dx:ax
add   ax,cx      ;Добавить в ax сохраненное частное из cx
mov bx,13
add ax,bx
mov bx,dx
push dx
push -1 ;Сохраним признак конца числа
mov CX,10 ;Делим на 10
l1: 
mov DX,0 ;Очистим регистр DX ;30
div CX ;Делим 
push DX ;Сохраним цифру
cmp AX,0 ;Остался 0?
jne l1 ;нет -> продолжим
mov AH,2h
l2:
pop DX ;Восстановим цифру
cmp DX,-1 ;Дошли до конца -> выход
je tz
add DL,'0' ;Преобразуем число в цифру
int 21h ;Выведем цифру на экран
jmp l2 ;И продолжим
tz:
mov ah,2h;
mov dl,2ch; ставим запятую
int 21h;
\\Здесь я сам пытаюсь вывести 5 по-левому
mov ax,bx;заносим остаток
mov bx,5
mul bx
mov cx,10
mov dx,0
div cx
push dx
mov ah,2h
pop dx
add dl,30h
int 21h
\\\\\\\
jmp exit
iret; выход из процедуры прерывания
pew endp
 
exit: 
mov ah,8
int 21h
mov AX,4ch;Выход
int 21h
end start
Как её правильно вывести? Ответ должен получиться 2275.5
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.05.2010, 20:35
Ответы с готовыми решениями:

Деление ascii чисел, вывод целой части и остатка на экран
Помогите пожалуйста. Необходить написать проограмму которая делит два числа,...

Остаток от деления и занесение остатка в массив на Ассемблере
Вообщем задача следующая. Нужно брать элемент из массива 1, делить его на 3, а...

нужно найти сумму все чисел делящихся на 3 без остатка
Здравствуйте, помогите решить пожалуйста две задачи условия такие: 1) В...

Переменной целого типа k присвоить значение 1, если целое число x делится без остатка на 7, и 0 - в противном случае.
Помогите,тока начал учить ассемблер и пока очень трудно разобраться в нем. Если...

Не выводится значение регистра dx, в котором находится значение остатка от деления
собственно сабж Доброго времени суток, прошу подсказать, что в...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.05.2010, 20:35

массив четных чисел ("/" на 2 без остатка )
Задан массив А из N чисел. Найти сумму четных чисел (делящихся без остатка на...

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

Вывод остатка от деления
Всем здравствуйте! У меня задача: нужно реализовать средствами эксель перевод...


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

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

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