Справа Вы вычисляете разность двух целых без знаковых чисел(формат WORD), а слева хотите получить значение целое знаковое (INT)Сообщение от DIPHENHYDRAMINE
T_v-T_z = 65526, а не (-10), т.к. T_v и T_z Вы объявили как WORD, для WORD нету знака "-"
Соответственно ABS (65526) = 65526
А вот дальше, когда выполняется
T_d := 65526
получается -10, что совершенно правильно, ведь для INT значение 65526 - это -10 в дополнительном коде
T_v и T_z нужно объявить как INT
Ответить с цитированием