G:=TSlau.create(2);

G.addj(1,1,2); G.addj(1,2,4); G.addj(2,2,3); G.Addb(1,6); G.Addb(2,3);

G.SlauT;

G.print(StringGrid1,StringGrid2,StringGrid3);

G.free;

End;

end.

10.3. Индивидуальные задания

Решить поставленную задачу и продемонстрировать возможности разработанного программного продукта. Доказать, что разработан алгоритм, использующий минимально возможное число проверок и операций.

1.Создать метод чтения и удаления диагональных элементов матрицы.

2.Создать процедуру получения транспонированной матрицы, при этом исходная матрица должна сохраняться.

3.Создать процедуру умножения двух матриц. Исходные матрицы сохранить. Полезно использовать отсортированность стека по индексу j.

4.Создать метод перестановки двух заданных строк в матрице.

5.Создать метод перестановки двух заданных столбцов в матрице с упорядоченными по возрастанию индекса j элементами в стеке.

6.Создать метод нахождения максимального элемента матрицы.

7.Создать процедуру получения одномерной разреженной матрицы, содержащей максимальные элементы по каждому столбцу исходной матрицы.

8.Создать процедуру получения одномерной разреженной матрицы (векто- ра-столбца), содержащей максимальные элементы по каждой строке исходной матрицы.

9.Создать метод нахождения индексов максимального элемента матрицы.

10.Создать метод readd(i,j) чтения и удаления из матрицы элемента aij .

11.Создать метод нахождения суммы диагональных элементов матрицы.

12.Создать процедуру, реализующую прямой ход метода Гаусса, приводящий исходную матрицу к верхней треугольной матрице, и получить определитель.

13.Создать метод нахождения количества ненулевых элементов в матрице

иих среднего арифметического значения.

14.Имеется система уравнений Axr =b , причем заданы A – верхняя тре-

угольная разреженная матрица и вектор-столбец b . Составить процедуру нахождения решения в виде вектора-столбца x (см. обратный ход метода Гаусса).

15. Создать процедуру получения из одной матрицы двух. Одна содержит элементы исходной матрицы, меньшие среднеарифметического значения, другая состоит из элементов исходной матрицы, больших среднеарифметического значения. Нулевые элементы не проверять.

50