Помогите решить задачу "Производная" (Delphi)
Добавлено: 14 окт 2008, 16:07
Задача состоит в следующем: вводиться функция от одной переменной. Нужно взять ее производную и построить ее график. Приблизительно, нужна следующая функция:
А вот и сам алгоритм:
1. Замена стандартных обозначений функций их краткими служебными названиями для ускорения работы программы.
2. Повторять замену производных суммы (разности) и произведения (частного) по соответствующим формулам, пока не останется ни одной производной суммы (разности) и произведения (частного). При этом каждый раз необходимо раскрывать скобки.
3. Замена всех производных их табличными значениями.
4. Повторять пункты 2 и 3, пока не останется ни одной производной.
5. Упростить полученное выражение: выкинуть из произведения все единицы, выкинуть все члены, в которых встречаются нули и т.п.
Помогите, пожалуйста, собрать это все в одно целое...
Буду очень благодарен за помощь )) Я думаю нужно еще учесть скобки...function proizvod(a:string):string; //общая производная
var a:string;
begin
repeat
repeat
zamen:=false;
a:=psum(a); //производная суммы и разности
a:=pproi(a); //производная поизведения и частного
until zamen=false;
a:=ptab(a); //производная табличных величин
until zamen=false;
a:=pupro(a); //упрощение внешнего вида формулы
proizvod:=a;
end;
А вот и сам алгоритм:
1. Замена стандартных обозначений функций их краткими служебными названиями для ускорения работы программы.
2. Повторять замену производных суммы (разности) и произведения (частного) по соответствующим формулам, пока не останется ни одной производной суммы (разности) и произведения (частного). При этом каждый раз необходимо раскрывать скобки.
3. Замена всех производных их табличными значениями.
4. Повторять пункты 2 и 3, пока не останется ни одной производной.
5. Упростить полученное выражение: выкинуть из произведения все единицы, выкинуть все члены, в которых встречаются нули и т.п.
Помогите, пожалуйста, собрать это все в одно целое...