Помогите пожалуйста....Вычислите в какой координатной четверти расположен треугольник,образованный прямой,заданной уравнением y=ax+b, и осями ординат. Числа a и b,что треугольник всегда существуетформат входных данных:Входной файл INPUT TXT содержит заданные целые числа a и b (-100 меньше или равно a b но больше чем 100)Выходной файл OUTPUT. TXT должен содержать номер четверти

Заданная уравнением прямая всегда будет гипотенузой прямоугольного треугольника, а его прямой угол всегда будет лежать в точке пересечения осей координат. Таким образом, размещение гипотенузы всегда будет определять четверть, в которой находится треугольник.
Гипотенуза пересекает ось Х в точке с координатами (х1; 0), а ось Y - в точке с координатами (0;y2). Найдем эти координаты, считая коэффициенты a и b в уравнении прямой заданными.

Теперь можно определить номера четвертей n, в которых располагается гипотенуза.


var
  a, b: integer;
  f: Text;

begin
  Assign(f, 'input.txt');
  Reset(f);
  Readln(f, a, b);
  Close(f);
  Assign(f, 'output.txt');
  Rewrite(f);
  if a < 0 then
    if b < 0 then Writeln(f, '3') else Writeln(f, '1')
  else
  if b < 0 then Writeln(f, '4') else Writeln(f, '2');
  Close(f)
end.