Assambler

.model small
.stack
.data
 lm db 11
 ef db ?
 siz1 db 11 dup(?)
 final db 4 dup(?)
 a db "Introduceti un sir:" , 10,13,'$'
 b db 10,13, "Am introdus:", 10,13,'$'
 c db 10,13, "Sirul modificat este: ", 10,13,'$'
 .code
        mov ax, @data
        mov ds, ax
                mov ah, 9
                lea dx, a
                int 21h
        mov ah, 10
        lea dx, lm
        int 21h
                mov ah,9
                lea dx,b
                int 21h
        mov bl,ef
        mov bh,0
        mov siz1[bx], '$'

                mov ah,9
                lea dx, c
                int 21h

                mov al,siz1
                mov final, al

                mov al,siz1+1
                mov final+1,al

                mov al,siz1+2
                mov final+2,al

                mov final+3,'$'

                mov ah, 9
                lea dx, final
                int 21h

                mov ah,4ch
                int 21h

                end