Двумерные массивы (PascalABC)

[quakenez]

Дана квадратная матрица А порядка n и вектор x и y с n элементами. Получить вектор A*(x-y)

[BDA]

А что не получается? Два вложенных цикла, чтобы получить вектор ci = ∑aij * (xj - yj).

[quakenez]

Сообщение от BDA

А что не получается? Два вложенных цикла, чтобы получить вектор ci = ∑aij * (xj - yj).

а "ci" это тоже матрица?

[ForenLi]

Сообщение от BDA

получить вектор ci

Вы читаете посты?

[newerow1989]

const n = 5;
var i, j: integer;
    a: array[0..n-1, 0..n-1] of integer;
    x, y, c: array[0..n-1] of integer;
begin
   Randomize;
   for i:=0 to n-1 do
   begin
      for j:=0 to n-1 do
      begin
         a[i, j]:=Random(21);
         Write(a[i, j]:3, '  ');
      end;
      Writeln;
   end;
   Writeln;
   for i:=0 to n-1 do
   begin
      x[i]:=Random(21);
      Write(x[i]:3, '  ');
   end;
   Writeln;
   for i:=0 to n-1 do
   begin
      y[i]:=Random(21);
      Write(y[i]:3, '  ');
   end;
   Writeln;
   Writeln;
   for i:=0 to n-1 do
   begin
      c[i]:=0;
      for j:=0 to n-1 do
         c[i]:=c[i]+a[i, j];
      c[i]:=c[i]*(x[i]-y[i]);
      Write(c[i]:3, '  ');
   end;
   Writeln;
   Readln;
end.

[BDA]

newerow1989, я не согласен с формулами вычисления вектора c