А зачем отдельная библиотека?
Код:IF UpperLim = LowerLim THENRes := 0;ELSERes := 100 * (LIMIT(LowerLim, X, UpperLim) - LowerLim)/(UpperLim - LowerLim);END_IF
А зачем отдельная библиотека?
Код:IF UpperLim = LowerLim THENRes := 0;ELSERes := 100 * (LIMIT(LowerLim, X, UpperLim) - LowerLim)/(UpperLim - LowerLim);END_IF