[Assistant]

всмысле какой знак? положительный или отрицательный? если да, то:

Код:

var
  n: integer;
begin
  n := -1;
  if n < 0 then
    ShowMessage('Отрицательный')
  else
    ShowMessage('Положительный');
end;