[عالم كول - alamcool]
صل على النبى عليه افضل الصلاه والسلام

انت لست مسجل بمنتدى عالــــم كـــول

[عالم كول - alamcool]

منتدى ترفيهى اسلامى افلام وثائقيه القران كاملا اغانى اسلاميه احدث البرامج
 
الرئيسيةالبوابةاليوميةمكتبة الصورس .و .جبحـثالمجموعاتضع التسجيلدخولالتسجيل

شاطر | 
 

 الدرس العاشر: جملة IF - ELSE منتدى عالم كول

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
king this web
Admin
Admin


ذكر 41200
عدد المساهمات : 347
تاريخ التسجيل : 05/08/2009

مُساهمةموضوع: الدرس العاشر: جملة IF - ELSE منتدى عالم كول   الثلاثاء يناير 08, 2013 8:58 pm


جملة IF - ELSE



قبل البدأ في شرح جملة IF - ELSE وتوضيح صيغتها العامة، يجب أن نتطرق إلى موضوع مهم وهو التعابير البوليانية في لغة باسكال، فلنبدأ على بركة الله.

التعابير البوليانية :

في لغة باسكال تظهر التعابير البوليانية على أحد شكلين:

1- المتغيرات البوليانية Boolean variables
وهي عبارة عن متغيرات خاصةتعرف في القسم VAR من البرنامج، وتأخذ أحد قيميتن True أو False

VAR
switch : Boolean;

هنا المتغير switch يأخذ أحد قيمتين Ture أو False

switch := Ture;
switch := False;

ويجب ملاحظة أنه لا يمكن قراءة مثل هذه المتغيرات باستعمال الدالة read إلا أنه من الممكن طباعتها بالدالة write.

2- متغيرات مربوطة بعوامل نسبية Relation Operators:
من الممكن صياغة التعابير البوليانية باستعمال متغيرات تربط بينها العوامل النسبية التالية

= يساوي
<> لا يساوي
=> أقل من أو يساوي
=< أكبر من أو يساوي
> أقل من
< أكبر من


3- تعابير بوليانية مربوطة بعوامل منطقية logical operators
يمكن ربط أكثر من تعبير بولياني باستعمال أحد العوامل المنطقية التالية

NOT نفي
AND و
OR أو


ملاحظة:

العوامل المنطقية تتمتع بأسبقية أعلى من العوامل النسبية، لهذا فإن التعبير التي يعتبر خطأ:
NOT 4>5


لأن العامل NOT سوف يطبق أولا، لذا يجب كتابه التعبير السابق كما يلي:

NOT (4>5)


لتكون قيمته true


بعد هذا الشرح عن التعابير البوليانية، نعود إلى جملة IF

جملة IF ELSE

الشكل العام لها:

IF boolean expression
THEN statment1
ELSE statment2


&& الحالة الأولى:

عندما يكون لدينا عبارة واحدة في فيعي جملة IF
مثال: لدينا متغيرين num1 و num2 والمطلوب طباعة العدد الأكبر بينهما

IF num1>num2
THEN writeln('The larger is: ', num1)
ELSE writeln('The larger is: ', num2)

لاحظ هنا عدم وجود فاصلة منقوطة في العبارات بعد THEN و ELSE


&& الحالة الثانية:

عندما تكون لدينا أكثر من عبارة في كل فرع من فرعي الـ IF
مثال: في نفس المثال السابق لو كان المطلوب تخزين الرقم الأكبر في متغير max بعد طباعته


IF num1>num2
THEN BEGIN
writeln('The larger is: ', num1);
max:= num1
END
ELSE BEGIN
writeln('The larger is: ', num2);
max:= num2
END

في هذه الحالة نحتاج إلى وضع العبارات التي بداخل الـ THEN بين BEGIN و END ونفصل بينها بفواصل منقوطة، ولكن بدون فاصلة قبل الـ ELSE



منتدى عالم كول قاعدة الدرس العاشر: جملة IF - ELSE منتدى عالم كول منتدى عالم كول عالم كول اصحاب كول جوجل عالم عالم عالم عالم
الرجوع الى أعلى الصفحة اذهب الى الأسفل
http://alamcool.ahlamontada.net
 
الدرس العاشر: جملة IF - ELSE منتدى عالم كول
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
[عالم كول - alamcool] :: 
قسم لغات البرمجه
 :: منتدى خاص لتعليم لغة الباسكال
-
انتقل الى: