:: MVP ::
|
|
:: RSS ::
|
|
|
EvalComp
|
Модуль для вычисление математических формул. представленных в строковом виде.
Допускаются переменные x, y и z, а также операторы, перечисленные ниже.
- x <> y // логические операторы возвращают 1 в случае истины и 0 если ложь.
- x <= y
- x >= y
- x > y
- x < y
- x = y
- x + y
- x - y
- x eor y // исключающее или
- x or y
- x * y
- x / y
- x and y
- x mod y
- x div y
- x ^ y // степень
- x shl y
- x shr y
- not (x)
- sinc (x)
- sinh (x)
- cosh (x)
- tanh (x)
- coth (x)
- sin (x)
- cos (x)
- tan (x)
- cot (x)
- sqrt (x)
- sqr (x)
- arcsinh (x)
- arccosh (x)
- arctanh (x)
- arccoth (x)
- arcsin (x)
- arccos (x)
- arctan (x)
- arccot (x)
- heavy (x) // 1 для положительных чисел, 0 для остальных
- sgn (x) // 1 для положительных чисел, -1 для отрицательных и 0 для нуля
- frac (x)
- exp (x)
- abs (x)
- trunc (x)
- ln (x)
- odd (x)
- pred (x)
- succ (x)
- round (x)
- int (x)
- fac (x) // x*(x-1)*(x-2)*...*3*2*1
- rnd // Случайное число в диапазоне [0,1]
- rnd (x) // Случайное число в диапазоне [0,x]
- pi
- e
Пример: sin(x)*cos(x^y)+exp(cos(x)).
Пример использования:
uses
{...,} EvalComp;
procedure TForm1.Button1Click(Sender: TObject);
var
Calc: EvalVec; // evalvec - указатель на объект, определяемый evalcomp
Formula: string;
begin
Formula := 'x+y+z';
New( Calc, init( Formula ) ); // Построение дерева оценки
ShowMessage( FloatToStr( Calc^.eval1d( 7 ) ) ); // x=7 y=0 z=0; result: 7
ShowMessage( FloatToStr( Calc^.eval2d( 7, 8 ) ) ); // x=7 y=8 z=0; result: 15
ShowMessage( FloatToStr( Calc^.eval3d( 7, 8, 9 ) ) ); // x=7 y=8 z=9; result: 24
Dispose( Calc, done ); // Разрушение дерева оценки
end;
|
Скачать. |
2,6kb |
ZIP |
TMatix 1.1
|
Класс TMatix 1.1 - Основные действия над матрицами.
Возможности: загрузка матрицы из файла, сохранение в файл, умножение на число,
сумма (разность) матриц, произведение матриц, обратная матрица, ранг, определитель.
Так же есть возможность изменять матрицу - вставлять (удалять) столбцы (строки).
Присутствует возможность установки начального индекса матрицы (Origin), что
позаимствованно из MathCad'а.
TMatrix эффективен там, где порядок матрицы велик или ее размеры определяются на
этапе выполнения программы.
Совместимость - Delphi5 и выше. В комплекте пример решения системы линейных уравнений.
|
Скачать. |
7,6kb |
RAR |
|