Задана матрица и вектор.получить их произведение напечатать в строку.

1 2 3 4 5 6 umn_matrix([],_,[]). umn_matrix([Stroka|Tail],Vector,[A|ATail]):-umn_stroka(Stroka,Vector,A), umn_matrix(Tail,Vector,ATail).   umn_stroka([],_,0). umn_stroka([E1|Tail],[E2|Tail2],Ans):-umn_stroka(Tail,Tail2,TempAns), Ans is TempAns+E1*E2.