Регистрация
OakCadet
01.03.2020 14:31
Информатика
Есть ответ 👍

Дан массив A(5.5) Упорядочить элементы массива построчно
Задача 2 пример

122
156
Посмотреть ответы 2

Ответы на вопрос:

Nikidiy
Nikidiy
4,5(42 оценок)

const

 n=5;

 m=5;

var

 a:array [1..n,1..m] of integer;

 i,j,k,t:integer;

begin

 writeln('Исходная матрица:');

 for i:=1 to n do

 begin

   for j:=1 to m do

   begin

     a[i,j]:=random(8)-4;

     write(a[i,j]:2,' ')

   end;

   writeln

 end;

 for i:=1 to n do

   for j:=1 to m-1 do

     for k:=j+1 to m do

       if a[i,j]>a[i,k] then

       begin

         t:=a[i,j];

         a[i,j]:=a[i,k];

         a[i,k]:=t

       end;

 

 writeln('Полученная матрица:');

 for i:=1 to n do

 begin

   for j:=1 to m do

     write(a[i,j]:2,' ');

   writeln

 end;

end.


Дан массив A(5.5) Упорядочить элементы массива построчноЗадача 2 пример
dashenkanosova5
dashenkanosova5
4,4(89 оценок)
Вор варует - хакер взламывает вирусболезнь это живое - вирус компьютерный не живое

Популярно: Информатика