痴 痴心绝对 Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-24 #1 求任意两个多项式的乘法运算 要求1:由键盘随机输入两个多项式 2:将多项式及乘法的结果输出
X XWHope Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-24 #2 procedure TForm1.BitBtn2Click(Sender: TObject); var vScript,x: Variant; begin vScript := CreateOleObject('ScriptControl'); vScript.Language := 'JavaScript'; x:= vScript.Eval(多项式拼的串); showmessage(多项式拼的串+'='+x); end;
procedure TForm1.BitBtn2Click(Sender: TObject); var vScript,x: Variant; begin vScript := CreateOleObject('ScriptControl'); vScript.Language := 'JavaScript'; x:= vScript.Eval(多项式拼的串); showmessage(多项式拼的串+'='+x); end;
W WoDing Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-24 #3 可以用SQL adoquery.sql.add(' select '''+edit1.text+'''*'''+edit2.text +''', '+edit1.text+'*'+edit1.text ); 取出来就可以了
可以用SQL adoquery.sql.add(' select '''+edit1.text+'''*'''+edit2.text +''', '+edit1.text+'*'+edit1.text ); 取出来就可以了
A app2001 Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-28 #5 XWHope就可以在DELPHI中运行呀?你要试一下才行
痴 痴心绝对 Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-29 #6 俺的意思是用单链表作为多项式的存储结构,一个节点有两个数据域,一个表示多项式某一项X的系数,一个表示X指数,用两单连表的插入,删除,循环等方法作两个多项式的乘法,最后还是用一单连表做多项式的存储结构。
刘 刘麻子 Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-29 #7 你的想法。。。好复杂。。。。。 我有计算任意表达式的代码,要不?
B beta Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-29 #8 呵呵,楼主应该是数据结构的课程设计要交差了吧:) 可惜我手边没有pascal的代码:(