Задача на массивы, Тема сортировка. Опции

[dog]

Дан двумерный массив.

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

Заготовка:

PROGRAM PRP2;
const
n=5;
m=5;
var
   a:array[1..n,1..m] of integer;
   i,j:integer;
BEGIN
     {заполняем и выводим матрицу}
     writeln('Исходная матрица');
     for i:=1 to n do
     begin
          for j:=1 to m do
          begin
               a[i,j]:=random(30);
               write(a[i,j],' ');
          end;
          writeln;
     end;

     {основной алгоритм}





     {выводим матрицу}
     writeln('Полученная матрица');
     for i:=1 to n do
     begin
          for j:=1 to m do
          write(a[i,j],' ');
          writeln;
     end;
END.

Сообщение отредактировано: dog - 2.05.2010 16:06