Задачка в Delphi.
Добавлено: 25 фев 2013, 15:17
Помогите решить задачку)))
Задание:
1. Методом Гаусса:
a) решить систему линейных уравнений и вычислить невязку;
b) вычислить определитель;
c) найти обратную матрицу.
a[1,1]:=5.0;
a[1,2]:=0.0;
a[1,3]:=4.0;
a[1,4]:=1.0;
a[1,5]:=-1.38;
a[2,1]:=2.0;
a[2,2]:=3.0;
a[2,3]:=-4.0;
a[2,4]:=2.0;
a[2,5]:=0.34;
a[3,1]:=-1.0;
a[3,2]:=2.0;
a[3,3]:=1.0;
a[3,4]:=3.0;
a[3,5]:=-4.99;
a[4,1]:=1.0;
a[4,2]:=4.0;
a[4,3]:=-2.0;
a[4,4]:=0.0;
a[4,5]:=1.88;
Задание:
1. Методом Гаусса:
a) решить систему линейных уравнений и вычислить невязку;
b) вычислить определитель;
c) найти обратную матрицу.
a[1,1]:=5.0;
a[1,2]:=0.0;
a[1,3]:=4.0;
a[1,4]:=1.0;
a[1,5]:=-1.38;
a[2,1]:=2.0;
a[2,2]:=3.0;
a[2,3]:=-4.0;
a[2,4]:=2.0;
a[2,5]:=0.34;
a[3,1]:=-1.0;
a[3,2]:=2.0;
a[3,3]:=1.0;
a[3,4]:=3.0;
a[3,5]:=-4.99;
a[4,1]:=1.0;
a[4,2]:=4.0;
a[4,3]:=-2.0;
a[4,4]:=0.0;
a[4,5]:=1.88;