الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

مقلوب مصفوفة

مغلق
بدأه sasouky في 21 يناير 2005 · 6 رد · 2,045 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اللي عنده كود مقلوب مصفوفة الرجاء المساعة أة حتى الخوارزمية تبعتها

#2

انا راح اعطيك فكرتها اخي وراح انت تبرمجها لوحدك ماشي

عندك مصفوفة من 10 عناصر هذه المصفوفة مثلا نسميها أ ونحجز مصفوفة اخرى بنفس الحجم من العناصر نسميها ب في المصفوفة أ نبدأ اللوب من اخر عنصر اما في المصفوفة ب فنبدأه من العنصر الأول من ثم نقرأ من المصفوفة أ ونخزن في المصفوفة ب

وبالتالي تصبح المصفوفة ب هي مقلوب المصفوفة أ هذه هي الخوارزمية اخي .

نموت وتحيا ...................فلسطين .

#3

السلام عليكم

إبحث في المنتدى ( في قسم السي ) سوف تجد برنامج مكتوب بالفورتران

#4

sasouky: أهلا بك :D .

كما قال لك الأخ Terminator1 تقوم بنسخ المصفوفة الأولى إلى الثانية على هذا النحو:

Algorithme ArrayToggle
variable:
  i: integer;
  ArrayA: Array of 10 Elements = (2,1,5,12,17,8,6,0,4,8);
  ArrayB: Array of 10 Elements;
start 
 for i=1 to 10  ArrayB[10-i+1]:=ArrayA;
end

سأعطيك مثالا آخر. لقد استعملت فيه نفس المصفوفة لقلب عناصرها دون اللجوء إلى تعريف مصفوفة أخرى.

وهذه نص الشيفرة:

procedure ToggleArray;
var
 i: integer;
 IntTemp: integer; //variable for chaging 2 values of the array
begin
 for i:=1 to 5  do
  begin
    IntTemp:= myarray;
    myarray:=myArray[10-i+1];
    MyArray[10-i+1]:= IntTemp;
  end;
end;

في الحلقة FOR بدأت من 1 إلى 5 بدلا من الالمواصلة إلى غاية 10 :wacko: . وهذه لحكمة: يجب أن نبادل بين عناصر الجدول بعدد نصف طول المصفوفة. وإلا ستحصل على نفس المصفوفة دون أي تغيير إذا استمريت 10 مرات بدل خمسة.(جربها)

في المرفقات أدرجت مثالا يبين طريقة استعمال هذا الكود :D . أرجو أن يكون هذا هو المطلوب (h) .

array.zip

تم تعديل هذه المشاركة بواسطة ikossan في 22 يناير 2005 في 04:30

سأتغيب عن المنتدى وستكون لي زيارات خفيفة بين الحين و الحين

يا صاحب الهم إن الهم منفرج.....................أبشر بخير فإن الفارج الله.

اليأس يقطع أحيانا بصاحبه..........................لا تيأس فإن الكافي الله.

الله يحدث بعد العسر ميسرة.........................لا تفزعن فإن الصانع الله.

إذا بليت فثق بالله وارض به...................فإن الذي يكشف البلوى هو الله.

و الله ما لك غير الله من أحد.......................فحسبك الله في كل لك الله

أخوكم مراد

27_06_06_05_21_41_1151410901logo_adl_wal_ihsan.jpg

#5

السلام عليكم

أولاً هل أنتم متأكدين من أنه يريد rotate

ربما يريد inverse

المهم إذا كنت تريد rotate فكلامهم صحيح

وإذا كنت تريد inverse كما قلت لك إبحث في منتدى السي

#6

the smart programmer: عفوا يا أخي لا أعلم ماذا كان يقصد الأخ sasouky بالمصفوفة :rolleyes: ؟

هل Array أم Matrix؟

هذا لينك إلى الموظوع الذي أشرت إليه في قسم منتدى لغة سي ++ الذي ذكر فيه مثال عن مقلوب مصفوفة مكتوب بلغة الفورتران.

أنقر هنا

الأخ الذي طرح الموضوع لم يظهر ثانيةَ حتى يوضح ما يريد !! على أيٍ إذا كان مقصوده هو قلب مصفوفة جبرية فهذا نص الكود لمثال عن طريقة قلبها:

Inverse Matrix.zip

تم تعديل هذه المشاركة بواسطة ikossan في 24 يناير 2005 في 00:28

سأتغيب عن المنتدى وستكون لي زيارات خفيفة بين الحين و الحين

يا صاحب الهم إن الهم منفرج.....................أبشر بخير فإن الفارج الله.

اليأس يقطع أحيانا بصاحبه..........................لا تيأس فإن الكافي الله.

الله يحدث بعد العسر ميسرة.........................لا تفزعن فإن الصانع الله.

إذا بليت فثق بالله وارض به...................فإن الذي يكشف البلوى هو الله.

و الله ما لك غير الله من أحد.......................فحسبك الله في كل لك الله

أخوكم مراد

27_06_06_05_21_41_1151410901logo_adl_wal_ihsan.jpg

#7

السلام عليكم شكراً لكل من كتب رداً و أأسف للتأخير ولكن كان لدي اختبارات ...

أنا أقصد بـ مصفوفة matrix و أريد الـ inverse و أريد أن أفهم فكرة إيجادها بطريقة التحويلات الاولية أو أي طريقة أخرى تعرفونها و شكراً .

هذا الموضوع مغلق.

مواضيع مشابهة