Работа 3.7 Упр.8 ГДЗ Семакин 10 класс (Информатика)

Задана матрица порядка $$n$$ и число $$k$$. Разделить элементы $$k$$-й строки на диагональный элемент, расположенный в этой строке.

Нужно разделить все элементы $$k$$-й строки матрицы на диагональный элемент этой же строки, то есть на элемент $$a_{k,k}$$.

Сначала вводим размер матрицы $$n$$ и номер строки $$k$$. Если $$k<1$$ или $$k>n$$, работа программы завершается. Затем создаём и выводим матрицу, запоминаем диагональный элемент $$d=a_{k,k}$$ и делим каждый элемент $$k$$-й строки на $$d$$.

var n:=ReadInteger(‘n=’);
var k:=ReadInteger(‘Введите 1<k<=n:’);
if (k>n) or (k<1) then exit;
var a:=MatrRandomReal(n,n,1,20); a.Println(7,2);
k:=k-1;
var d:=a[k,k];
Writeln(n*7*’-‘);
for var j:=0 to n-1 do a[k,j]/=d; a.Println(7,2)
end.

Здесь строка $$k:=k-1$$ нужна потому, что в программе используется нумерация элементов массива с нуля.

Ответ: программа делит все элементы заданной строки на её диагональный элемент и выводит полученную матрицу.