В цикле, задающем матрицу, не хватает операторных скобок. В результате выполняется только первый оператор v:=v*j;