المحتوى الرئيسي

مفهوم التفرع (اتخاذ القرار)

في كثير من المشكلات، لا يكفي تنفيذ الخطوات بالتتابع فقط؛ بل يحتاج الحل إلى اختبار شرط معين، ثم اختيار أحد مسارين مختلفين بناءً على نتيجة هذا الشرط. يسمى هذا التركيب في خرائط التدفق التفرع (Selection/Decision)، ويُستخدم في الحالات التي تتضمن عبارات مثل: “إذا…”، “هل…؟”، “أكبر من”، “يساوي”، إلخ.

رمز القرار (المعين - Rhombus)

يُمثَّل اتخاذ القرار في خريطة التدفق برمز المعين (Diamond/Rhombus)، وله خاصية فريدة بين كل الرموز: هو الرمز الوحيد الذي يخرج منه سهمان (مساران) بدلًا من سهم واحد:

• مسار “نعم” (Yes/True): يُتَّبع إذا كان الشرط المكتوب داخل المعين متحققًا.
• مسار “لا” (No/False): يُتَّبع إذا كان الشرط غير متحقق.

يُكتب داخل رمز المعين عبارة الشرط فقط (مثل: A > B؟)، ولا تُكتب فيه أي عملية حسابية أو طباعة.

أشكال التفرع

1. تفرع أحادي (If فقط): يُنفَّذ إجراء معين إذا تحقق الشرط فقط، وإلا يتجاوزه البرنامج مباشرة دون تنفيذ أي شيء.
2. تفرع ثنائي (If…Else): يُنفَّذ إجراء إذا تحقق الشرط، وإجراء آخر مختلف إذا لم يتحقق؛ بحيث يُنفَّذ أحد المسارين دائمًا، لا كلاهما.

في الحالتين، يجب أن يلتقي المساران في نهاية التفرع (عند نقطة واحدة) قبل الاستمرار في باقي خطوات الحل، أو ينتهي كل مسار برمز النهاية مباشرة إذا كان التفرع هو آخر خطوة.

مثال 1: إيجاد الأكبر بين عددين

المشكلة: إدخال عددين A و B، وطباعة الأكبر منهما.

خطوات خريطة التدفق:

1. Start
2. أدخل A, B (Input)
3. هل A > B ؟ (Decision)
   • نعم → اطبع A (Output)
   • لا → اطبع B (Output)
4. End

يلاحَظ هنا أن رمز المعين أنتج مسارين منفصلين، كل منهما ينتهي بخطوة إخراج مختلفة، ثم يصل الحل في الحالتين إلى النهاية.

الكود المقابل بلغة VB.NET:

Dim A As Double
Dim B As Double

A = Console.ReadLine()
B = Console.ReadLine()

If A > B Then
    Console.WriteLine("الأكبر هو: " & A)
Else
    Console.WriteLine("الأكبر هو: " & B)
End If

يلاحَظ التطابق المباشر بين رمز المعين وجملة If...Then...Else...End If في VB.NET: الشرط داخل المعين يقابل الشرط بعد If، ومسار “نعم” يقابل الأسطر بعد Then، ومسار “لا” يقابل الأسطر بعد Else.

مثال 2: تحديد حالة النجاح والرسوب

المشكلة: إدخال درجة طالب، فإذا كانت 50 فأكثر يُطبع “ناجح”، وإلا يُطبع “راسب”.

خطوات خريطة التدفق:

1. Start
2. أدخل Degree
3. هل Degree ≥ 50 ؟
   • نعم → اطبع “ناجح”
   • لا → اطبع “راسب”
4. End

Dim Degree As Double
Degree = Console.ReadLine()

If Degree >= 50 Then
    Console.WriteLine("ناجح")
Else
    Console.WriteLine("راسب")
End If

ملاحظة: التفرعات المتداخلة

قد تحتاج بعض المشكلات إلى أكثر من قرار متتالٍ (مثل إيجاد الأكبر بين ثلاثة أعداد)، وهذا يتم بوضع رمز معين آخر داخل أحد مساري (نعم/لا) للمعين الأول، وهو ما يُعرف بـالتفرع المتداخل (Nested Decision)، ويقابله في VB.NET استخدام جملة If داخل جملة If أخرى.

أسئلة للمراجعة

1. ما الرمز المستخدم لاتخاذ القرار في خريطة التدفق؟ وما الذي يميّزه عن باقي الرموز؟
2. ما الفرق بين التفرع الأحادي (If فقط) والتفرع الثنائي (If…Else)؟
3. صمم خريطة تدفق لتحديد ما إذا كان عدد مُدخَل موجبًا أم سالبًا أم يساوي صفرًا (تلميح: تحتاج قرارين متتاليين).
4. حوّل الخريطة التي صممتها في السؤال السابق إلى كود VB.NET.
5. ما الخطأ في خريطة تدفق يخرج فيها من رمز المعين مسار واحد فقط؟
6. اكتب كود VB.NET يطبع “رقم زوجي” أو “رقم فردي” حسب قيمة متغير صحيح يسمى Num.