أخر الأخبار

دورة إحترافية باسكال و دلفي - الجمل الشرطية المركبة في الباسكال If - Else

 


الجمل الشرطية المركبة في الباسكال If - Else

رأينا في درس سابق مذخل الى الجمل الشرطية القاعدية و بدأنا بالجملة الشرطية IF
اليوم سنرى نفس الجملة الشرطية و لكن المركبة من شرطين معكوسين بإستعمال الكلمة المحجوزة في 
مكتبة الباسكال و الدلفي معا و هي  Else
ومعنى ذلك نفي للسطر او التعليمة بتعليمة أخرى تعكس الأولى 

If - Else

كلمات لغة باسكال.
تُستخدم هذه التعليمات لإجراء عملية فقط عند استيفاء شرط محدد  وبالتالي ، إذا تم تقييم التعبير المنطقي على أنه صحيح ، يتم تنفيذ التعليمات 1 (تعليمات من اختيارك) ، وفي الحالة المعاكسة ، أي إذا تم تقييم التعبير المنطقي إلى خطأ ، فسيتم تنفيذ التعليمات 2. 
لاحظ أن إختيار التعليمات يعد أمرًا اختياريًا (في بعض الأحيان لا يوجد أي إجراء يتم تنفيذه).
و سنأخذ مثال على ذلك
------------------------------------------------------------------
نصرح بالمتغيرات الأتية 

x, y , z                             


 : if (x > y) and (x> z) then                              

(' هو الأكبرx')  writeln                            

else

(' ليس هو الأكبرx') writeln

هذا يعني x   انه هوالأصغر
------------------------------------------------------------------
يمكن أن تكون العبارات الشرطية متداخلة. في حالة الغموض ، يشير الآخر دائمًا إلى أقرب IF

if (10 < 5) then 

if (5 > 6) then 

('الحالة الأولى') writeln

else

('الحالة الثانية') writeln

في هذا المثال لا يظهر في النتيجة أي شئ عند التنفيذ لأن العبارة الأولى خاطئة و أخر if تأخد الحالة الثانية
و  يتم استخدام العبارة المركبة لتجميع العبارات في مجموعة واحدة. هذا مثير للاهتمام بشكل خاص مع التعليمات الشرطية ، خاصة في حالة العملية التي تتطلب أكثر من تعليمة واحدة. لاحظ العرض التقديمي ، الموصى به بشدة ، مع إزاحة التعليمات المتعلقة بالبداية والنهاية والتي تمت محاذاتها.في المثال التالي لحساب الجدر ستوضح ذلك


program racine;

var x,y : real; 

begin

writeln ('Entrez un nombre quelconque'); 

readln(x); if (x >= 0) then 

begin

y := sqrt (x);

writeln(' The real root is: ',y:5:2);

end

                                         else

                                          begin

                 y := sqrt (-x);

           writeln('The complex root is : ',y:5:2,'i');

end;

end.

الجمل الشرطية المركبة في الباسكال If - Else وفي هذا الفيديو سنشرح بالتفصيل 



تعليقات



حجم الخط
+
16
-
تباعد السطور
+
2
-