四元二次方程求解

qq_26078653 2015-03-27 11:41:23
也就是求某些点的集合,使得这些点的距离等于一个常数50,使用matlab怎么实现阿。本人小白,求助大神帮忙!
2500=(a-b)^2+(c-d)^2;
约束条件为:
-100<a<100
-100<b<100
-100<c<100
-100<d<100
...全文
372 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
lyhoo163 2015-03-28
  • 打赏
  • 举报
回复
有454672个解。
lyhoo163 2015-03-28
  • 打赏
  • 举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var i,j,k,l,LL:integer;
    S:string;
begin
  LL:=0;
  for i:=-99 to 99 do
  for j:=-99 to 99 do
  for k:=-99 to 99 do
  for l:=-99 to 99 do
  begin
    if (I-j)*(I-j)+(k-l)*(k-l)=50 then
    begin
      LL:=LL+1;
      S:=Inttostr(LL)+'、('+Inttostr(i)+'*'+Inttostr(j)+')*('+Inttostr(i)+'*'+Inttostr(j)+')'+
         '('+Inttostr(k)+'*'+Inttostr(l)+')*('+Inttostr(k)+'*'+Inttostr(l)+')';
      Memo1.Lines.Add(S);
    end;
  end;
end;
有很多解......

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧