Подскажите с условием

[K_Sergey]

Подскажите с условием, мне нужно чтобы если T1 и T2 (каждый) меньше единицы, то выполнялось бы...

Код: Выделить всё

T1, T2: real;
  if Abs (T1) < 1
  then
  begin
T1:= T1*10;
T2:= T2*10;
  end;

  if Abs (T2) < 1
  then
  begin
T1:= T1*10;
T2:= T2*10;
  end;

А нужно что-то такое: if Abs (T1)<1 and Abs (T2)<1
then....
Так у меня выдает ошибку пробовал еще по другому не получается...

[Naeel Maqsudov]

Код: Выделить всё

if (abs(T1)<1) and (abs(T2)<1) then begin
   ...
end;

NOT, AND и OR имеют более высокий приоритет => нужны скобки

[K_Sergey]

Большое спасибо!