Сортировка одномерных массивов методом «пузыря»

@Vitalik778 · Регистрация: 18.01.2013

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста.

3. Создать с помощью генератора случайных чисел массив действительных чисел в диапазоне (1 .. 10). Отсортируйте этот массив от минимального до максимального элемента методом «пузыря».

@ntrx · 18.01.2013, 18:17

Pascal

program dfgdf;
uses crt;
const n = 10;
var a : array[1..n] of integer;
     i,j : byte;
     tmp : integer;
begin
   randomize();
   for i:=1 to n do  a[i] := random(9)+1;
   for i:=1 to n do write(a[i],' '); writeln;
       for i:=1 to n do begin
        for j:=n-1 downto 1 do begin
            if (a[j]>a[j+1]) then begin
              tmp:=a[j];
              a[j] := a[j+1];
              a[j+1] := tmp;
              end;
         end;
    end;
   for i:=1 to n do write(a[i],' '); writeln;
readkey;
end.

@Vitalik778 0 / 0 / 0 Регистрация: 18.01.2013 Сообщений: 4
		1
	Сортировка одномерных массивов методом «пузыря» 18.01.2013, 16:54. Показов 1463. Ответов 1 Метки нет (Все метки) Помогите пожалуйста. 3. Создать с помощью генератора случайных чисел массив действительных чисел в диапазоне (1 .. 10). Отсортируйте этот массив от минимального до максимального элемента методом «пузыря». 0

	18.01.2013, 18:17

Опции темы

Сортировка одномерных массивов методом «пузыря»

Решение