منتدى بلدية مناعة
مرحبا بك عزيزي الزائر. المرجوا منك أن تعرّف بنفسك و تدخل المنتدى معنا. إن لم يكن لديك حساب بعد, نتشرف بدعوتك لإنشائه


منتدى بلدية مناعة
مرحبا بك عزيزي الزائر. المرجوا منك أن تعرّف بنفسك و تدخل المنتدى معنا. إن لم يكن لديك حساب بعد, نتشرف بدعوتك لإنشائه

منتدى بلدية مناعة
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.

منتدى بلدية مناعةدخول

منتدى شامل

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

descriptionالدالة Case Emptyالدالة Case

more_horiz

الدالة Case


عبارة case
يمكن اعتبار تركيب case كتركيب if موسعة ، إنها تمكنك من تنفيذ عبارة واحدة من عدة كتل برمجة معتمدة على نتيجة تعبير معين
التعبير ممكن يكون متغير ، أو نتيجة استدعاء تابع أو أية شفرة من باسكال كلها تعطي تعبيرا
للتعرف على الصيغة العامة لتركيب case نشاهد المثال
case var of
val_1 : statement_1;
val_2 : statement_2;

val_3 : statement_3;

;
;

else
statement_else;
end;

عندما يبدأ البرنامج في تنفيذ تركيب case سيمر على قيمة val_1 ويقارن بين الثابت val_1 والمتغير Var إذا وجدهما متساويين سيقوم البرنامج بتنفيذ جميع الأوامر التي تليها حتى يصل إلى نهاية الكتلة ( تحدد الكتلة بالعبارات بين Begin , end في حالة استخدام أكثر من عبارة واحدة كما سبق شرحه ) أما إذا لم يجدهما متساويين فإنة سيتخطاها بجميع العبارات الواردة بعدها وينتقل إلى الثابت الآخر ويكرر المحاولة وهكذا يمر البرنامج عليها كلها فإذا لم يجد الثابت المطلوب منها فإنه سيتخطاها إلى كلمة else وينفذ العبارات الواردة بعدها حتى نهاية التركيب .

ملاحظة مهمة
يجب أن يعطى التعبير ضمن الدالة case قيمة تنتمي إلى نمط مرتب من الأنواع ( Integer,Byte,Word )

بحيث لايمكنك كتابة مايلي مثلاً

case str of
'Own' : {code};
'Two' : {code};
end;
يمكن جعل البرنامج ينفذ كتلة أوامر عند أكثر من قيمة
كما أن إستخدام الدالة else في الإجراء Case يعتبر اختياري ومثال على ذلك
case x of
1: y:=sin(x);
2,3 : y:=cos(x);
4,5,6: y:=x;
end;


descriptionالدالة Case Emptyرد: الدالة Case

more_horiz
الدالة Case Fb21ac83ab
privacy_tip صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
power_settings_newقم بتسجيل الدخول للرد