Это . 42, программа на паскале

max100500206 max100500206    2   03.03.2019 16:41    2

Ответы
Jillzay Jillzay  24.05.2020 18:26

нумерация элементов, а соответственно и строк в массиве начинается с 0

программа не проверяет введенные данные на корректность, то есть если ввести номер строки выходящий за рамки массива то будет ошибка.

так как не было указано где брать элементы массива то он заполняется случайными числами в диапозоне 0..100

var

   n, k : integer;

   a : real;

   var d : array[,] of real;

begin

   write('введите размер матрицы n=');

   readln(n);

   d := new real[n,n];

   for var i := 0 to n-1 do begin

       for var j := 0 to n-1 do d[i,j] := random(101);

   end;

   write('введите номер строки k=');

   readln(k);

   a := d[k,k];

   for var i := 0 to n-1 do if d[k,k] <> 0 then d[k,i] := d[k,i]/a;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика