сложная задача

[ugradvizhok]

Всем доброго время суток. Помогите с курсовичком. Иначе смерть мне.
задача в паскале такого типа:

а) Вычесть из А единичную матрицу
б) сформировать диагональную матрицу С из элементов, которые определяются как суммы элементов столбцов полученной матрицы
в) найти след матрицы С

Еще нужна схема и описание выполнения.

[Mad_Cat]

Помогите с курсовичком

for i:=1 to n do
a[i,i]:=a[i,i]-1;
Spc:=0;
for j:=1 to n do
c[j,j]:=0;
begin
for i:=1 to n do
c[j,j]:=c[j,j]+a[i,j]
spc:=spc+c[j,j];
end;

контакты в подписи! за денюжку помогу дописать остальное!