Помогите с Паскалем…

7 декабря 2009

Друзья,прошу вашей помощи...
Имеется такой вот массивчик с рандомными числами.

const
m=5;
n=8;
var
a:array[1..m,1..n]of integer;
i,j:integer;
begin
randomize
for i:=1 to m do
for j:=1 to n do
a[i,j]:=-50+random(100);
for i:=1 to m do
begin
for j:= 1 to n do
write(a[i,j]:5);
readln;
end;

Мне нужно его отсортировать во возрастанию.Любым методом.
Пожалуйста,решите.
Заранее спасибо.


26 ответов в теме “Помогите с Паскалем…”

    Страницы: [1] 2 »
  1. 1) Юрий Зимин ответил:

    это матрица.
    как именно сортировать нужно? по строкам/столбцам?

  2. 2) Дмитрий Шифруюссьь ответил:

    Условие некорректно. Отсортировать по возрастанию откуда куда? Как текст читаем, сперва по строке слева направо, а затем по вертикали?
    Или из одного угда в противоположный?

  3. 3) Сергей Ващенко ответил:

    По возрастанию в строках слева направо.

  4. 4) Юрий Зимин ответил:

    for i :=1 to m do
    for j := 1 to n-1 do
    for k:=j+1 to n do
    if a[i,j]>a[i,k] then
    begin
    t:=a[i,k];
    a[i,k]:=a[i,j];
    a[i,j]:=t;
    end;

  5. 5) Сергей Ващенко ответил:

    Спасибо.Вы проверяли это решение?Работает?

  6. 6) Юрий Зимин ответил:

    работает, не проверял

  7. 7) Пётр Мазин ответил:

    чуть опоздал :(
    Уже ответили:(

  8. 8) Сергей Ващенко ответил:

    при запуске выходит абсолютная ахинея.Никакой сортировки и не наблюдается.Все числа рандомно распологаются.

  9. 9) Сергей Ващенко ответил:

    Ребят,помогите…
    t и k-это новые integеr?

  10. 10) Сергей Ващенко ответил:

    и если не сложно,напишите программу вместе с тем первоначальным кодом массива,который я привёл…

  11. Страницы: [1] 2 »