массивы записей

[Z1daN]

хэлП пипл =)
1) Отсортировать по возрастанию элементы нечетных строк.
3) Найти минимальный из элементов квадратной матрицы размерностью 6х6, расположенных в заштрихованной части

[ROMA2PVT]

Program massiv;
uses crt;
var
mas:array [1..100,1..100] of integer;
i,j,c,d,e,n,m:integer;
begin
     clrscr;
     randomize;
     write('Введите количество строк: ');
     readln(n);
     write('Введите количество столбцов: ');
     readln(m);
     writeln('Исходный массив: ');
       for i:=1 to n do
         begin
       for j:=1 to m do
         begin
          mas[i,j]:=random(10);
          write(mas[i,j],' ' );
         end;
          writeln;
         end;
       for i:=1 to n do
       for j:=1 to m do
        if odd(i) then
         begin
       for c:=1 to n do
       for d:=c to m do
        if mas[i,c]<mas[i,d] then
        begin
        e:=mas[i,c];
        mas[i,c]:=mas[i,d];
        mas[i,d]:=e;
        end;
        end;
        writeln('Результирующий массив: ');
       for i:=1 to n do
        begin
       for j:=1 to m do
        write(mas[i,j],' ');
        writeln;
        end;
      readkey;
end.

Первая.

[Z1daN]

можно 2?
у нас экзамены на носу, типовые задачи будут. хотел посмотреть как решаются подобные и потренироваться

[ROMA2PVT]

можно 2?
у нас экзамены на носу, типовые задачи будут. хотел посмотреть как решаются подобные и потренироваться

Конечно можно!Даже нужно.Вот совет:Берёте хороший учебник по паскалю и изучаете всё.Дальше садитесь и пробуете сделать это задание.