小编shd*_*com的帖子

在MATLAB中如果:

x = rand(a,b,c); 

什么是第三输入rand,c,是什么意思？

a:行数

b:列数

c:??

我在Delphi中有这个源代码,为什么我得到这个错误"浮点溢出".当我运行代码？以及如何纠正它？

错误消息:

代码:

procedure TForm1.Button1Click(Sender: TObject);
 var n, d, i, j, maxiter , iter: Integer;
 Lower,Upper : Double;
 X, V : TArray<TArray<Double>>;
 begin
  Lower := 0;
  Upper := 0.2;
  n := 100;
  d := 55;
  SetLength(V, n, d);
  SetLength(X, n, d);
  maxiter := 2000;
  iter := 1;

  for i:= 0 n-1 do
    for j:=0 to d-1 do
     begin
      X[i][j]:= Lower + (Upper - Lower) * Random;
      V[i][j] := 0.1 * X[i][j];
     end;

 while (iter <= maxiter) do
  begin …

在这个Delphi代码中,为什么更新X后F_pBest的值会发生变化？

在更新X之前它应该是相同的值

德尔福代码:

        ...........

type TMDarray = array of array of Double;

       ............

  public
    { Public declarations }
     X, pBest : TMDarray;
     F_X, F_pBest : array of Double;
     D, maxIter, N : Integer;
     Lower, Upper : Double;   
  end;
 .................
procedure TForm1.btn1Click(Sender: TObject);
    begin
       main();
  end;

function TForm1.FitnessFunc(X : array of Double): Double;
var
  sum : Double;
  i, j : Integer;
begin
    d := length(X);
    sum := 0;
    for j := 1 to D-1 do …