section .data
    msg DB 'Input: '
    lenmsg EQU $ - msg

section .bss
    buf RESB 100

section .text
    global _start

_start:
; вывод приглашения
    MOV EAX, 4
    MOV EBX, 1
    MOV ECX, msg
    MOV EDX, lenmsg
; ввод строки
    MOV EAX, 3
    MOV EBX, 0
    MOV ECX, buf
    MOV EDX, 100
    MOV ESI, EAX ; сохранили в ESI число прочитанных байт
; замена второго символа
    MOV [buf+1], '!'
; вывод результата
    MOV EAX, 4
    MOV EBX, 1
    MOV ECX, buf
    MOV EDX, ESI
; выход
    MOV EAX, 1
    MOV EBX, 0
    INT 80H