Ввести 3 символа и вывести больше чётных или не чётных

@yashenko2016 · Регистрация: 08.06.2016

Author24 — интернет-сервис помощи студентам

Здравствуйте. Помогите решить задачу. Ввести 3 символа и вывести словами больше чётных или не чётных цифр.

Assembler

.Model tiny
.Code
org 100h
start:
 
 mov ah,0ah
 lea dx,a
 int 21h
 
 mov ah,2
 mov dl,10
 int 21h
 
 xor ax,ax
 
 
 
ret
 a db 4,?,5 dup('$')
 b db 3,?,4 dup('kolichestvo chitnix bolche $')
 c db 3,?,4 dup('kolichestvo ne chitnix bolche $')
end start

Дальше не понимаю как реализовать
TASM 1.4 , DOSBox

Добавлено через 24 минуты
вот моя задумка , но программа работает не правильно, прошу вас объяснить и показать почему так

Assembler

.Model tiny
.Code
org 100h
start:
 
 mov ah,0ah
 lea dx,a
 int 21h
 
 mov ah,2
 mov dl,10
 int 21h
 
 xor bx,bx
 xor cx,cx
 mov al,0
 mov ah,0
 
 mov cx,3
 
 K: mov bl,a+2
    div bl
    cmp ah,0
    jnz u ; esli ne ravno nul
    inc ah ; hitnoe
 u: inc al
loop k
 
cmp ah,al
jb hit ; esli al>ah
mov ah,9
mov dl,b
int 21h
ret 
hit:
mov ah,9
mov dl,c
int 21h
 
ret
 a db 4,?,5 dup('$')
 b db 3,?,4 dup('kolichestvo chitnix bolche $')
 c db 3,?,4 dup('kolichestvo ne chitnix bolche $')
end start

@Mikl___ · 27.06.2018, 15:00

yashenko2016,
в корне неправильно, "Ввести 3 символа и вывести словами больше чётных или не чётных цифр", пользователь может ввести три символа "запятых"? Может, а латинские буквы ввести? Это символы или нет? А управляющие символы "Ctrl+Ins", "Ctrl+Del"? Пользователю нужно, по крайней мере, в приглашении написать "нажми на три любые цифры", дальше для чего-то в регистр BL заносятся символы из строки, в которую пользователь введет символы с клавиатуры, а там между прочим 4 символа, а не 3. Что на что мы делим и для чего? Чтобы узнать четный символ или нет? Так для этого достаточно проверить чему равен последний бит 0 или 1. Попробуй ту же задачу сформировать на Паскале или Си. Разберешься -- поможем перевести на ассемблер...

@yashenko2016 · 27.06.2018, 15:38 **[ТС]**

вот так работает если вводить числа

Assembler

.Model tiny
.Code
org 100h
start:
 
 mov ah,0ah
 lea dx,a
 int 21h
 
 mov ah,2
 mov dl,10
 int 21h
 
 xor bp,bp
 xor bx,bx
 xor cx,cx
 xor ax,ax
 
test a+2,1
jnz f1  ;ne hitnoe
inc ah ; hitnoe
jmp f
 
f1:
inc al ;ne hitnoe
 
f:
 
test a+3,1
jnz f3  ;ne hitnoe
inc ah ; hitnoe
jmp f2
 
f3:
inc al ;ne hitnoe
 
f2:
test a+4,1
jnz f5  ;ne hitnoe
inc ah ; hitnoe
jmp f4
f5:
inc al ;ne hitnoe
 
f4:
 
cmp al,ah
ja hit ; esli al>ah
mov ah,9
lea dx,b+2
int 21h
ret 
hit:
mov ah,9
lea dx,c+2
int 21h
 
ret
 a db 4,?,5 dup('$')
 b db 3,?,4 dup('kolichestvo chitnix bolche $')
 c db 3,?,4 dup('kolichestvo ne chitnix bolche $')
end start

@Mikl___ · 27.06.2018, 15:58

yashenko2016,

Assembler

mov ax,word ptr a+2
and ax,0101h
add ah,al
mov al,a+4
and al,1
add al,ah; в AL количество нечетных символов

@Mikl___ Ушел с форума 16281 / 7605 / 1066 Регистрация: 11.11.2010 Сообщений: 13,618
	27.06.2018, 15:00	2
	yashenko2016, в корне неправильно, "Ввести 3 символа и вывести словами больше чётных или не чётных цифр", пользователь может ввести три символа "запятых"? Может, а латинские буквы ввести? Это символы или нет? А управляющие символы "Ctrl+Ins", "Ctrl+Del"? Пользователю нужно, по крайней мере, в приглашении написать "нажми на три любые цифры", дальше для чего-то в регистр BL заносятся символы из строки, в которую пользователь введет символы с клавиатуры, а там между прочим 4 символа, а не 3. Что на что мы делим и для чего? Чтобы узнать четный символ или нет? Так для этого достаточно проверить чему равен последний бит 0 или 1. Попробуй ту же задачу сформировать на Паскале или Си. Разберешься -- поможем перевести на ассемблер... 0

	27.06.2018, 15:58

Ввести 3 символа и вывести больше чётных или не чётных

Решение