• дан двумерный массив,нужно отсортировать по возрпастанию,и в другой массив(одномерный) записать эти числа

Ответы 3

  • спасибо
    • Автор:

      shelby30
    • 6 лет назад
    • 0
  • Не за что
  • constn=5;m=7;vara:array[1..n,1..m]of integer;b:array[1..n*m]of integer;i,j,buf,k:integer;     begin               for i:=1 to n do                       begin                               for j:=1 to m do                                      begin                                                a[i,j]:=random(100);                                               write(a[i,j]:4);                                                 k:=k+1;                                                 b[k]:=a[i,j];                                     end;        writeln;              end;writeln;           for i:=1 to n*m-1 do                  for j:=i+1 to n*m do             if b[i]>b[j] then                               begin                       buf:=b[i];                                       b[i]:=b[j];                                       b[j]:=buf;                              end;                     for i:=1 to m*n do                           write(b[i]:4);end.
    • Автор:

      pastor
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years