Форум по Delphi программированию - Показать сообщение отдельно - Рекуррентное нахождение определителя матрицы по правилу Лапласа

cotseec · #3 06.04.2012, 22:04

Код:

uses
  SysUtils;

type
   TArr:array of array of single;

var
  arr:TArr; {исходная матрица}
  det:integer;

function lap(locarr :TArr): single;
......