Паскаль.матрица

[Yelisey]

здравствуйте!! Помогите пожалуйста с задачей!



Пусть e - единичный вектор n-го порядка и A - квадратная матрица n-го порядка.
Пусть t - вещественное число. Вычислить c помощью процедуры: (t * A * e, t * e) * A .

[Летучий_СкилетиК]

Что у вас не получается? показывайте свой код

[Yelisey]

uses crt;
const n=4;
type matrica=array [1..n,1..n] of integer;
var
i,j:integer;
m,:matrica;
a,:matrica;
procedure OutMatr(m:matrica);
var i,j:byte;
begin
for i:=1 to n do begin
for j:=1 to n do begin
write (' ',m[i,j]);
end;
writeln;
end;
end;Я ВОТ Так матрицу вывожу. Процедуру для данной формулки не догнал как сделать, ну и конец проги соответственно