Здесь для работы необходим модуль (файл) FunctionString.pas. В этом модуле рассмотрены следующие функции:
function FunctionToReal(s: string): real;
function FunctionToString(s: string): string;
function MsgError: string;
где
s - исходное строковое выражение, записанное с помощью математических операций, формул и т.д.
Функция FunctionToReal вычисляет готовое численное выражение, записанное в виде десятичной дроби (вещественного числа).
Функция FunctionToString вычисляет готовое численное выражение, записанное в виде строки.
Функция MsgError выдает ошибку в выражении.
Например, FunctionToReal('(6+4)*(.85-7.1)-2/5.') выведет '-62,9'; FunctionToString('-LogN(11,-Round(-121.47))') выведет '-2'; FunctionToString('Sqrt(-3)') выведет 'Корень отрицательного числа -3 не существует'.
Примечание 1. Для ввода десятичных чисел используется точка, так как выражения строятся по правилам языка Паскаль.
Примечание 2. Рекомендуется использовать функцию FunctionToString, так как она обладает еще дополнительной опцией: вывод ошибки.
|