Ответы
Ответ дал:
1
===== PascalABC.NET =====
uses NumLibABC;
begin
var n := ReadInteger('n =');
// матрица А заполняется случайными числами
var t := MatrRandomReal(n, n, -99, 99);
t.Transform(p -> Round(p,2));
var A := new Matrix(t);
t := nil;
A.Println(8,2);
Writeln;
// Вектор b заполняется случайными числами
var r := ArrRandomReal(n, -50, 50);
r.Transform(p -> Round(p,2));
var b := new Vector(r);
r := nil;
b.Println;
Writeln;
// Собственно, решение
var M := A*A*b;
M.Println
end.
Приложения:
![](https://st.uroker.com/files/a28/a286c47a9833704e5e0b677adec6f53c.jpg)
Вас заинтересует
4 месяца назад
4 месяца назад
6 месяцев назад
2 года назад
7 лет назад