написать программу, которая в массиве случйных чисел С[1..5,1..5] меняет местами значения элементов главной и вспомогательнй диагонали

Есть ответ
17.12.2022
184

Ответ


uses crt;

var C:array[1..5,1..5] of integer;

i,j,temp:integer;

 

begin

   randomize();

   for i:=1 to 5 do

      for j:=1 to 5 do

         C[i,j]:=random(1000);

   for i:=1 to 5 do begin

      t:=C[i,i];

      C[i,i]:=C[i,6-i];

      C[i,6-i]:=t;

   end

end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.