Курсовая работа: Выполнение арифметических действий и строковых операций

4.2 Текст программы, реализующий данный алгоритм:

.model small

.586

.stack 100h

.data

Mes1 db "Input the first string",0ah,0dh,'$'

Mes2 db "Input the second string",0ah,0dh,'$'

Mes3 db "Input the simbol, from which you want to paste the second string",0ah,0dh,'$'

Str1 db 255

db ?

db 255 dup (0)

Str2 db 255

db ?

db 255 dup (0)

Char1 db 2

db ?

db 0,'$'

Res db "Result is:",0Ah,0Dh,'$'

Str db 255 dup (0)

.code

include string.lib

.startup

mov ax,dgroup

mov ds,ax

cls

locate 0,0

lea dx, Mes1

mov ah,09h

int 21h