ля обробки
Видалення "зайвих" знаків пунктуації
Пошук слова з максимальною довжиною
Приведення слів до "одному розміру"
Сортування
Визначення довжини кожного слова і його запис у кінець слова
Видалення "зайвих" знаків пунктуації
Виведення на екран результату
Завершення роботи програми
4. Результати
При запуску файлу Course.exe у відповідь на запрошення "Введіть рядок:" набираємо:
apple, melon astrachansky, african banana, armenian peachs are fruits.
"Оброблена рядок:
В
За результатами видно, що програма працює правильно.
5. Лістинг програми
://Лістинг основної програми
;//Сортування слів з визначенням їх довжини і видаленням розділових знаків.
; дві попередні макрокоманди забезпечують виконання програми ГМ на реальній ЕВМSEGMENT; Початок кодового сегмента
START; ПОЧАТОК ПРОГРАММИMessageIn; Висновок рядки пріглашеніяMyString; Введення рядка для обробки; Видалення "зайвих" знаків пунктуації; Пошук слова з MAX довжиною; Приведення всіх слів до одного розміру; Сортування слів; Визначення довжини кожного слова
; і запис цього значення в кінець слова; Видалення "зайвих" знаків пунктуації
; після приведення слів до одного размеруMessageOut; Висновок рядки повідомлення про закінчення обработкі.MyString; Висновок обробленої рядка
FINISH; КІНЕЦЬ ПРОГРАММИENDS; Кінець кодового сегментаATA SEGMENT; Початок сегмента даннихdb 15, 'Введіть рядок:', '$'; Повідомлення-'Пріглашеніе'db 20,' Оброблена рядок: ',' $ ' ; Повідомлення-'Рядок обработана'db 249 dup (0),' $ '; Рядок для обработкіdb 0h; Регістриdb 0h; общегоdb 0h; назначеніяdb 0h; Прапор сортіровкіdb 0h; Перший покажчик на словоdb 0h; Другий покажчик на словоENDS; Кінець сегмента даних
;
; Лістинг макро бібліотеки для файлу Course.asm;
InitRealComputer MACRO
.286
fw = 24; розрядність слова ГМ; fw = 8 .. 255 = 8; розрядність байта
EndLine EQU 10,13, '$...
