خوارزمية الفقاعات

[ثامر أبو بلقيس]

السلام عليكم ورحمة الله
ترتيب الأعداد من الإجراءات الصعبة برمجيا
لأنه تعتمد على المقارنات الثنائية و الاستخلاص
وتستمر العملية في عمل يشبه الدوامة - ان صح التعبير-
ولعل في الاوتوبلاي وفرت لنا المصفوفة من خلال
الكود Table.Sort الترتيب وللغوص في الالية التي يعمل بها
الكود Table.Sort في المقارنه فهي تشبه التالي :
نضع في global functions
الكود :
function bubbleSort(A)
local itemCount=#A
local hasChanged
repeat
hasChanged = false
itemCount=itemCount - 1
for i = 1, itemCount do
if A[i] > A[i + 1] then
A[i], A[i + 1] = A[i + 1], A[i]
hasChanged = true
end
end
until hasChanged == false
end


و تحت زر نضع
list = { 125, 6, 11, 29, 77, 24, 23, 115, 65, 17, 83, 97 }
bubbleSort(list)
p ="";
for i, j in pairs(list) do
p=p..j..","
end
result = Dialog.Message("Notice", p);


ليتم ترتيب الأعداد من الأصغر إلى الأكبر
وللقيام بالعكس نغير فقط الإشارة > في global functions

السلام عليكم

[azizsoft]

بسم الله الرحمن الرحيم

بارك الله فيكم استاذ ثامر ونفع بكم

[فرح صالحي]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية . :abc_152:

[Haitham.2012]

بارك الله فيك أخي ثامر .. افكار جميله و إحترافيه

[أبو يوسف]

جزاك الله خيرا اخانا أبا بلقيس :abc_152: وبارك الله فيك :abc_022:

[أبو فارس]

بوركت جهودك المتميزة .

موفق بإذن الله ... لك مني أجمل تحية . :abc_152:

[ثامر أبو بلقيس]

مرور عطر أساتذتي ::abc_152::abc_050::abc_138::abc_022::abc_022:

[عبود عبود]

أتمنى لكم التوفيق
..............
:abc_152:

[امل الماضي]

موفق بإذن الله ... لك مني أجمل تحية .

[الحارث بن فيصل]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ثامر أبو بلقيس]

شكرا إخواني :
عبود عبود:abc_152:
امل الماضي:abc_152:
الحارث بن فيصل:abc_152:
على المرور المشجع