Здесь для работы необходим модуль (файл) 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 , так как она обладает еще дополнительной опцией:
вывод ошибки.
|