إعـــــــلان

**ثامر أبو بلقيس ثامر أبو بلقيس** · 26-08-2017, 11:38 PM

المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة

تعديل لحل المشكل

كود PHP:


ref =  {1,2,3,4,5,6,7,11,145}  ; rep = {}; rep1 = {};
s1 = ""; 
Table.Sort(ref,nil); e=1; e1=1;
v1  = 10; ------------cible 
for i, n in pairs(ref) do 
  if n - v1 >=0  then rep[e] = n ; e=e+1;end  
  if v1 - n >= 0  then rep1[e1] = n ; e1=e1+1;end  
end 
Table.Sort(rep,nil); Table.Sort(rep1,nil); 

if Math.Abs(rep[1] - v1)  <  Math.Abs(v1 - rep1[#rep1]) then s1 = rep[1] 
elseif Math.Abs(rep[1] - v1) ==  Math.Abs(v1 - rep1[#rep1]) then  s1 = rep1[#rep1] .."-"..rep[1]
else s1 = rep1[#rep1] end
Dialog.Message("",s1)

واذ كان العدد متصمن (مشكل آخر )

كود PHP:


ref =  {1,2,3,4,5,6,7,10,11,145}  ; rep = {}; rep1 = {};
s1 = ""; 
Table.Sort(ref,nil); e=1; e1=1;
v1  = 10; ------------cible 
for i, n in pairs(ref) do 
  if n - v1 >=0  then rep[e] = n ; e=e+1;end  
  if v1 - n >= 0  then rep1[e1] = n ; e1=e1+1;end  
end 
Table.Sort(rep,nil); Table.Sort(rep1,nil); 

if Math.Abs(rep[1] - v1)  <  Math.Abs(v1 - rep1[#rep1]) then s1 = rep[1] 
elseif Math.Abs(rep[1] - v1) ==  Math.Abs(v1 - rep1[#rep1]) then  s1 = rep1[#rep1] .."-"..rep[1]
else s1 = rep1[#rep1] end
Dialog.Message("",s1)

أنا لا أنتقد فقط داير حساب يجي من يستعمل الكود مستقبلا

عبد الهادي بهاب · 27-08-2017, 12:06 AM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

واذ كان العدد متصمن (مشكل آخر )

أنا لا أنتقد فقط داير حساب يجي من يستعمل الكود مستقبلا

صحيح ....في التعديل فكرت في كون القيمة الصغرى و الكبرى متساويتين فسيعرضهما معا و كذلك للعدد المتضمن في المصفوفة

**المـهاجر المـهاجر** · 28-08-2017, 02:40 AM

السلام عليكم
هل يحتاج الحل لحجز كل هذه المصفوفات ؟
هل يحتاج لحجز كل هذه المتغيرات ؟
هل لابد من Table.sort ؟
هل ستفلح Table.sort فى جلب الاندكس الأصلى للعنصر فى مصفوفته الأصلية ؟ ام ستعقد الأمور ؟

ماذا لو كان سؤالك عن القيمة و الاندكس الخاص بها ؟؟
لا ارى اى سبب لاقحام Table.sort فى الحل
موفق

عبد الهادي بهاب · 28-08-2017, 09:59 AM

المشاركة الأصلية بواسطة المـهاجر مشاهدة المشاركة

السلام عليكم
هل يحتاج الحل لحجز كل هذه المصفوفات ؟
هل يحتاج لحجز كل هذه المتغيرات ؟
هل لابد من table.sort ؟
هل ستفلح table.sort فى جلب الاندكس الأصلى للعنصر فى مصفوفته الأصلية ؟ ام ستعقد الأمور ؟

ماذا لو كان سؤالك عن القيمة و الاندكس الخاص بها ؟؟
لا ارى اى سبب لاقحام table.sort فى الحل
موفق

عصرت مخي و لم تخرج الا على هذا الحل ...و انتم اعلم و منكم نتعلم استاذ

**المـهاجر المـهاجر** · 28-08-2017, 10:08 AM

المشاركة الأصلية بواسطة عبد الهادي بهاب مشاهدة المشاركة

عصرت مخي و لم تخرج الا على هذا الحل ...و انتم اعلم و منكم نتعلم استاذ

هذا لأنك اتبعت فكرة بعيدة جدا عن الصواب
تدبر التالى بعناية
1- اى كود وظيفته هى حل مشكلة برمجية
2- المشكلة البرمجية تحدد نفسها من منطوقها
3- الأكواد تكتب لتجسد المنطوق و ليس شيئ آخر

ستجد عندها انك غير مضطر لكتابة كود من 27 سطر (بدون دمج)
و ستجد ان الأمر لا يتطلب اكثر من 12 سطر

تلميح عن خطأ الفكرة المتبعة
أين فى منطوق سؤالك انك تبحث عن قيمة مطلقة ؟؟
انت تبحث عن القيمة الأقرب (قيمة نسبية و ليست مطلقة)
و لهذه سيناريو مختلف تماما

**ثامر أبو بلقيس ثامر أبو بلقيس** · 28-08-2017, 01:30 PM

إليك بحل رياضي آخر
استمتع بهذا الحل الذي استعملت فيه مقاربة distance de manhattan

[html]t = {4,45,20,23,69,26,458,75,158}
x= 70
tamer = 1
belkiss = Math.Abs(x-t[1]);
--------------------------
for i = 2, Table.Count(t) do
if Math.Abs(x-t[i]) < belkiss then
tamer = i
belkiss = Math.Abs(x-t[i]);
end
end
Dialog.Message("", t[tamer]);[/html]

نقرأ حلولكم

**المـهاجر المـهاجر** · 28-08-2017, 01:42 PM

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

كود PHP:


val = 76

array = {4,45,59,26,458,100,158,75}

max = math.max(unpack(array))

mohager={max,0,0}

for a,z in pairs(array) do

dif = Math.Abs(z-val) 

    if dif < mohager[1] then

       mohager[1]=dif

       mohager[2]=z

       mohager[3]=a  -- this line for store the index

    end

end

Dialog.Message("Mohager", "The Nearest Number To "..val.." is the number "..mohager[2] .."\r\n far away with "..mohager[1].." step \r\n in The index "..mohager[3]);

عبد الهادي بهاب · 28-08-2017, 02:03 PM

المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة

إليك بحل رياضي آخر
استمتع بهذا الحل الذي استعملت فيه مقاربة distance de manhattan

[html]t = {4,45,20,23,69,26,458,75,158}
x= 70
tamer = 1
belkiss = math.abs(x-t[1]);
--------------------------
for i = 2, table.count(t) do
if math.abs(x-t[i]) < belkiss then
tamer = i
belkiss = math.abs(x-t[i]);
end
end
dialog.message("", t[tamer]);[/html]

نقرأ حلولكم

المشاركة الأصلية بواسطة المـهاجر مشاهدة المشاركة

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

كود PHP:


val = 76

array = {4,45,59,26,458,100,158,75}

max = math.max(unpack(array))

mohager={max,0,0}

for a,z in pairs(array) do

dif = math.abs(z-val) 

    if dif < mohager[1] then

       mohager[1]=dif

       mohager[2]=z

       mohager[3]=a  -- this line for store the index

    end

end

dialog.message("mohager", "the nearest number to "..val.." is the number "..mohager[2] .."\r\n far away with "..mohager[1].." step \r\n in the index "..mohager[3]);

اكواد جد متميزة من حيث البناء ......لا نتوقع اقثل من هذا المستوى من الاساتذة
نتعلم من خبايا هذه الاكواد بوركتم

إعـــــــلان

سؤال في الرياضيات

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك