[lxa85]

Среда разработки Lazarus. Все выполнилось не чихнув.
Давай смотреть входные данные.
BTW, а проще конструкции задать нельзя? Больно много действий перед idiv, что усложняет подготовку тестов.

Код:

program Project1;

{$mode objfpc}{$H+}

uses
  Classes, SysUtils
  { you can add units after this };


var
   a, b, c, ans : integer;

{$IFDEF WINDOWS}{$R Project1.rc}{$ENDIF}
{$ASMMODE intel}
begin
//   readln(a, b, c);
a:=1;b:=2;c:=7;
   asm
      mov bx, b
      mov ax, c
      imul bx
      neg ax
      mov cx, a
      add ax, cx
      mov cx, c
      sub bx, cx
      idiv bx
      mov ans, ax
   end;
end.