Проверить, образуют ли базис векторы

@Hardcore 4 LIFE · Регистрация: 23.03.2011

Author24 — интернет-сервис помощи студентам

Для решения задачи необходимо найти определитель матрицы F, состоящей из столбцов . Если определитель отличен от нуля, то заданные векторы образуют базис.

Вот мой исходник на даннойстадии он уже не правильно работает (
Подправьте и пожалуйста допишите часть вычисления определителя матрицы F

Pascal

program zz;
 uses crt;
 const 
  f1:array [1..4] of real=(1,-2,1,1);
  f2:array [1..4] of real=(2,-1,1,-1);
  f3:array [1..4] of real=(5,-2,-3,1);
  f4:array [1..4] of real=(1,-1,1,-1);
 var
  F:array [1..4,1..4] of real;
  i,j:integer;
begin
 i:=1;
 for j:=1 to 4 do
  F[j,i]:=f1[j];
 i:=2;
 for j:=1 to 4 do
  F[j,i]:=f2[j];
 i:=3;
 for j:=1 to 4 do
  F[j,i]:=f3[j];
 i:=4;
 for j:=1 to 4 do
  F[j,i]:=f3[j];
 for i:=1 to 4 do
  for j:=1 to 4 do
   writeln('F[',i,j,']=',F[i,j]);
end.

@S9 · 28.03.2011, 23:53

Если посчитать матрицу
(1,-2, 1, 1)
(2,-1, 1,-1)
(5,-2,-3, 1)
(1,-1, 1,-1) то вроде базис есть.

@Hardcore 4 LIFE · 29.03.2011, 00:09 **[ТС]**

Большое, человеческое спасибо!

@nuHrBuH · 29.03.2011, 00:09

Если вектора образуют базис, то их скалярное произведение равно нулю. Например:
a(1; 0; 0); b(0; 1; 0)
ab = (1*0 + 0*1 + 0* 0) = 0.

@Hardcore 4 LIFE 0 / 0 / 0 Регистрация: 23.03.2011 Сообщений: 10
	29.03.2011, 00:09 [ТС]	3
	Большое, человеческое спасибо! 0

@nuHrBuH 483 / 427 / 205 Регистрация: 04.03.2011 Сообщений: 1,259
	29.03.2011, 00:09	4
	Если вектора образуют базис, то их скалярное произведение равно нулю. Например: a(1; 0; 0); b(0; 1; 0) ab = (10 + 01 + 0* 0) = 0. 1