Какая ошибка в этой программе? ​

Нужно заключить выражения между and в скобки т.к. приоритет выполнения операции and выше чем у > и условие выполняется неверно.

Правильная запись шестой строчки:

if ((a+b)>c) and ((a+b)>b) and ((c+b)>a) then