CALCULATION PROC NEAR
    MOV BP,SP;вершина стека в ВР
    MOV AX,[BP+2];С в АХ
    MOVSX BX,AX;Расширяем С и записывае в АХ
    SAL BX,1;2*С
    MOV AX,[BP+4];В в АХ
    CBW
    ADD BX,AX;2*С+В в ВХ
    CMP BX,0;
    JE ERROR
    MOV AX,[BP+6]
    DEC AX
    CMP AX,0
    JNE OK
    MOV CX,0
    JMP END
OK:
    SAL AX,1;2*(А-1)
    CBW;расширяем
    IDIV BX
ERROR:
    ;БЛАБЛА
END:
    ;БЛАБЛА