Вычислить элементы массива B, каждый из которых равен скалярному произведению строки матрицы G на массив X (Паскаль)

[Roman1992]

uses
    crt;
var
 g:array[1..100,1..100] of integer;
 b,x:array[1..1000] of integer;
 n,i,j:integer;
begin
     writeln('wvedite razmernost matrici ');
     readln(n);
     writeln('wvedite massiv g razmerom ',n,' x ',n);
     for i:= 1 to n do
         for j:= 1 to n do
             read(g[i,j]);
     writeln('wvedite massiv x razmerom ',n);
     for j:= 1 to n do
         read(x[j]);
     writeln('rezultat massiv b raven ');
     for i:= 1 to n do
         for j:= 1 to n do
             b[j]:=g[i,j]*x[j];
     for i:= 1 to n do
         write(b[j],' ');
readkey
end.

в результате получаются одни нули

_________
1) Название темы должно адекватно отражать суть решаемой задачи/проблемы.
На первый раз я исправил.
В дальнейшем темы с подобным названием будут закрываться/удаляться.

2) Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!

Модератор.

[Alex11223]

А что должно произойти? У меня не 0 получилось, но в предпоследнем цикле наверно происходит немного не то, что вы ожидаете.

[Roman1992]

оно должно вывести результат массива B

Вычислить и напечатать элементы массива B, каждый из которых равен скалярному произведению строки матрицы G на массив X.
Указание: B(j)= G(i,j)*X(j)
вот условие




_________________
Не используйте форум как чат - не пишите несколько коротких сообщений подряд!
Есть что добавить - нажимайте кнопку "Правка/Редактировать" на своём крайнем сообщении и изменяйте, добавляйте....

Модератор.