стандартная сортировка пузырьком. кто может помочь?
сорри, что здесь, но не нашёл раздела посвященному программированию. вопрос такой:
procedure BubbleSort(var Arr : TReal1DArray; const N : Integer); var I : Integer; J : Integer; Tmp : Double; begin i:=0; while i<=N-1 do begin j:=0; while j<=n-2-i do begin if Arr[j]>Arr[j+1] then begin Tmp := Arr[j]; Arr[j] := Arr[j+1]; Arr[j+1] := Tmp; end; Inc(j); end; Inc(i); end; end; Входные параметры: Arr - сортируемый массив. Нумерация элементов от 0 до N-1 N - размер массива Выходные параметры: Arr - массив, упорядоченный по возрастанию. Нумерация элементов от 0 до N-1 надо распараллелить, чтобы можно было запускать на множестве компьютеров. помогите:bye2: |
Часовой пояс GMT +3, время: 18:05. |
Powered by vBulletin® Version 3.7.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод:
Search Engine Friendly URLs by vBSEO 3.6.0zCarot
© 2005—2015 ООО «Интернет компания ННОВ.РУ», friends.nnov.ru
Реклама на форуме