Определить, каких букв русского алфавита нет в строке

@Vlados007 · Регистрация: 08.12.2016

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

Здравствуйте, помогите пожалуйста!

Нужно определить каких букв русского алфавита нет в строке!

ФедосеевПавел · 07.06.2018, 09:02

Перевод в кодировку cp866 самостоятельно найдёте в интернете

Assembler

.model small
 
.stack 100h
 
.data
        CrLf            db      0Dh, 0Ah, '$'
        msgPressAnyKey  db      0Dh, 0Ah, 'Press any key to exit...', '$'
        asResult        db      'Absent: ', '$'
        Cyrillic        db      'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЬЫЪЭЮЯ'
                        db      'абвгдеёжзийклмнопрстуфхцчшщьыъэюя'
        CyrAmount       dw      $-Cyrillic
 
        Freq            db      256 dup(0)
 
        String          db      'Нужно определить каких букв русского алфавита нет в строке!'
        StrLen          dw      $-String
.code
 
main    proc
        ;инициализация сегментного регистра ds адресом сегмента данных
        mov     ax,     @data
        mov     ds,     ax
        mov     es,     ax
        ;Freq[i]:=0
        push    es
        mov     ax,     ds
        mov     es,     ax
        cld
        mov     cx,     256/2
        mov     ax,     0
        lea     di,     [Freq]
        rep     stosw
        pop     es
        ;
        lea     si,     [String]
        lea     di,     [Freq]
        mov     cx,     [StrLen]
        xor     bx,     bx
        @@ResearcFor:
                mov     bl,     [si]
                inc     si
                inc     byte ptr [di+bx]
        loop    @@ResearcFor
        ;вывод результатов
        mov     ah,     09h
        lea     dx,     [asResult]
        int     21h
        mov     cx,     [CyrAmount]
        lea     si,     [Cyrillic]
        lea     bx,     [Freq]
        @@ResultFor:
                lodsb
                mov     ah,     al
                xlat
                or      al,     al
                jnz     @@ResultNext
                mov     al,     ah
                int     29h
        @@ResultNext:
        loop    @@ResultFor
        mov     ah,     09h
        lea     dx,     [CrLf]
        int     21h
 
        ;ожидание нажатия любой клавиши
        mov     ah,     09h
        lea     dx,     [msgPressAnyKey]
        int     21h
 
        mov     ah,     00h
        int     16h
 
        mov     ax,     4C00h
        int     21h
main    endp
 
end     main

@Vlados007 · 07.06.2018, 13:44 **[ТС]**

Спасибо Вам огромное!!!

@Vlados007 · 12.06.2018, 19:24 **[ТС]**

Здравствуйте, можете как-то кратко прокомментировать данную программу для моего лучшего понимания этого языка.
Этот код выводит на экран буквы русского алфавита, которые отсутствуют в строке:

Assembler

.model small
 
.stack 100h
 
.data
        CrLf            db      0Dh, 0Ah, '$'
        msgPressAnyKey  db      0Dh, 0Ah, 'Press any key to exit...', '$'
        asResult        db      'Absent: ', '$'
        Cyrillic        db      'АБВГДЕЁЖЗИЙКЛМНОПРСТУФХЦЧШЩЬЫЪЭЮЯ'
                        db      'абвгдеёжзийклмнопрстуфхцчшщьыъэюя'
        CyrAmount       dw      $-Cyrillic
 
        Freq            db      256 dup(0)
 
        String          db      'Нужно определить каких букв русского алфавита нет в строке!'
        StrLen          dw      $-String
.code
 
main    proc
        ;инициализация сегментного регистра ds адресом сегмента данных
        mov     ax,     @data
        mov     ds,     ax
        mov     es,     ax
        ;Freq[i]:=0
        push    es
        mov     ax,     ds
        mov     es,     ax
        cld
        mov     cx,     256/2
        mov     ax,     0
        lea     di,     [Freq]
        rep     stosw
        pop     es
        ;
        lea     si,     [String]
        lea     di,     [Freq]
        mov     cx,     [StrLen]
        xor     bx,     bx
        @@ResearcFor:
                mov     bl,     [si]
                inc     si
                inc     byte ptr [di+bx]
        loop    @@ResearcFor
        ;вывод результатов
        mov     ah,     09h
        lea     dx,     [asResult]
        int     21h
        mov     cx,     [CyrAmount]
        lea     si,     [Cyrillic]
        lea     bx,     [Freq]
        @@ResultFor:
                lodsb
                mov     ah,     al
                xlat
                or      al,     al
                jnz     @@ResultNext
                mov     al,     ah
                int     29h
        @@ResultNext:
        loop    @@ResultFor
        mov     ah,     09h
        lea     dx,     [CrLf]
        int     21h
 
        ;ожидание нажатия любой клавиши
        mov     ah,     09h
        lea     dx,     [msgPressAnyKey]
        int     21h
 
        mov     ah,     00h
        int     16h
 
        mov     ax,     4C00h
        int     21h
main    endp
 
end     main

ФедосеевПавел · 12.06.2018, 19:51

Для вашего лучшего понимания языка комментируете весь код (80 строк) самостоятельно по учебнику. Особое внимание обратите на неявные (по умолчанию) параметры строковых инструкций.

Можете не пользоваться учебником - набираете в поисковике "assembler mov" и так для каждой команды.
Для лучшего понимания алгоритма - решаете на любом известном языке программирования и ищете аналогии в моём коде.

@Vlados007 · 12.06.2018, 20:01 **[ТС]**

Я так и делаю, но я не могу понять цикл вывода результатов.

ФедосеевПавел · 12.06.2018, 20:02

Какие циклы?

@Vlados007 · 12.06.2018, 20:05 **[ТС]**

Вот-этот фрагмент кода

Assembler

;вывод результатов
        mov     ah,     09h
        lea     dx,     [asResult]
        int     21h
        mov     cx,     [CyrAmount]
        lea     si,     [Cyrillic]
        lea     bx,     [Freq]
        @@ResultFor:
                lodsb
                mov     ah,     al
                xlat
                or      al,     al
                jnz     @@ResultNext
                mov     al,     ah
                int     29h
        @@ResultNext:
        loop    @@ResultFor
        mov     ah,     09h
        lea     dx,     [CrLf]
        int     21h

ФедосеевПавел · 12.06.2018, 20:10

Код

for (i=0; i<CyrAmount; i++)
  if (Freq[ Cyrillic[i] ] == 0)
    putc(Cyrillic[i]);

@Vlados007 · 12.06.2018, 20:22 **[ТС]**

Не понял...
Можете словами описать цикл @@ResultFor???

ФедосеевПавел · 12.06.2018, 20:27

Вот именно то, что я написал на C-подобном языке.
Какой язык вам знаком?

@Vlados007 · 12.06.2018, 20:39 **[ТС]**

С++/С#

ФедосеевПавел · 12.06.2018, 20:50

Тогда всё должно быть понятно.
Перед набором исходника я примерно так и записал алгоритм на листе бумаги.

@Vlados007 · 12.06.2018, 20:51 **[ТС]**

Ясно...

ФедосеевПавел · 12.06.2018, 20:54

Для понимания алгоритма - решите эту задачу на C++ без использования методов и прочего ООП и штатных библиотек.

Добавлено через 1 минуту
Исходная проблема - не в ассемблере, а в непонимании алгоритма.
Решите задачу, прочувствуйте алгоритм.

@Vlados007 · 12.06.2018, 21:02 **[ТС]**

То-есть здесь берется первый символ алфавита, сравнивается с каждым символом строки и если нет совпадения, символ алфавита выводится на экран и цикл начинается сначала?!

ФедосеевПавел · 12.06.2018, 21:18

Зачем гадать - попробуйте решить на C++.
Отладьте и опубликуйте это решение.

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 20:27	11
	Вот именно то, что я написал на C-подобном языке. Какой язык вам знаком? 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
	12.06.2018, 20:51 [ТС]	14
	Ясно... 0

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 20:54	15
	Для понимания алгоритма - решите эту задачу на C++ без использования методов и прочего ООП и штатных библиотек. Добавлено через 1 минуту Исходная проблема - не в ассемблере, а в непонимании алгоритма. Решите задачу, прочувствуйте алгоритм. 0

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 21:18	17
	Зачем гадать - попробуйте решить на C++. Отладьте и опубликуйте это решение. 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
		1
	TASM Определить, каких букв русского алфавита нет в строке 06.06.2018, 22:21. Показов 1493. Ответов 16 Метки нет (Все метки) Здравствуйте, помогите пожалуйста! Нужно определить каких букв русского алфавита нет в строке! 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
	07.06.2018, 13:44 [ТС]	3
	Спасибо Вам огромное!!! 0

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 19:51	5
	Для вашего лучшего понимания языка комментируете весь код (80 строк) самостоятельно по учебнику. Особое внимание обратите на неявные (по умолчанию) параметры строковых инструкций. Можете не пользоваться учебником - набираете в поисковике "assembler mov" и так для каждой команды. Для лучшего понимания алгоритма - решаете на любом известном языке программирования и ищете аналогии в моём коде. 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
	12.06.2018, 20:01 [ТС]	6
	Я так и делаю, но я не могу понять цикл вывода результатов. 0

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 20:02	7
	Какие циклы? 0

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 20:10	9
	Код for (i=0; i<CyrAmount; i++) if (Freq[ Cyrillic[i] ] == 0) putc(Cyrillic[i]); 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
	12.06.2018, 20:22 [ТС]	10
	Не понял... Можете словами описать цикл @@ResultFor??? 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
	12.06.2018, 20:39 [ТС]	12
	С++/С# 0

ФедосеевПавел Модератор 8518 / 4372 / 1648 Регистрация: 01.02.2015 Сообщений: 13,583 Записей в блоге: 9
	12.06.2018, 20:50	13
	Тогда всё должно быть понятно. Перед набором исходника я примерно так и записал алгоритм на листе бумаги. 0

@Vlados007 0 / 0 / 0 Регистрация: 08.12.2016 Сообщений: 12
	12.06.2018, 21:02 [ТС]	16
	То-есть здесь берется первый символ алфавита, сравнивается с каждым символом строки и если нет совпадения, символ алфавита выводится на экран и цикл начинается сначала?! 0

Определить, каких букв русского алфавита нет в строке

Решение