الدرس التاسع : اوامر التحكم (الشرط المتناوب)

كيفكم
بخير ان شاء الله

حل التطبيق السابق

program test; 

uses wincrt; 

var x:char; 

begin 

writeln('enter the letter: '); 

read(x); 

if (x='s') then {condition} 

writeln('sa3eka'); {instruction} 

writeln('.com'); 

end.

في الدرس السابق قلنا

if <condition> then <instruction>;

يعني ينظر في الشرط اذا تحقق و ينفذ التعليمة

في هذا الدرس سيكون

if <instruction> then <condition>

else <condition>;

سنشرح
الأمر سهل
اذا <تحقق الشرط> اذن <نفذ التعليمة>

غير ذلك <نفذ تعليمة أخرى>;

يعني يمر على الشرط فاذا تحقق فانه ينفذ التعليمة و يخرج من مجسم الشرط
و اذا لم يتحقق فانه يدخل في الـ (غير ذلك) و ينفذ التعليمة

الصورة توضح



مثال
نكتب برنامج حيث اذا تم ادخال عدد زوجي فانه يقول أن العدد زوجي
و غير ذلك يقول العدد فردي

نستخدم الكلمة المفتاحية
mod
(modulo)

راجع دروس الأساسيات اذا لم تعد تتذكر عملها

(هي تظهر الباقي من القسمة الاقليدية)

هنا ستستخدم هذه الكلمة النفتاحية على فكرة:
أي عدد زوجي لما يتم قسمته على 2 فان الباقي هو 0

ممتاز

اذا البرنامج هو كما يلي

program test;

uses wincrt;

var a: integer;

begin

writeln('enter the number please');

read(a);

if (a mod 2 = 0) then

writeln('al3ada zawji')

else

writeln('al3ada fardi');

writeln('d0n3');

end.

انسخ و الصق عندك بالباسكال
نفذ و ترى الناتج

هذا تقديم بالبور بوينت
نشرح فيه
كيف يتعامل البروسيس مع هذا البرنامج

http://www.mediafire.com/?29iasvrwdh36a0l



--------------------
تطبيق الدرس

1- ماذا يظهر على الشاشة عند وضع المثال في كلتا الحالتين

2- أكتب برنامج حيث ندخل عددين حقيقيين (معناه من -مالانهاية الى +مالانهاية)
سالب أو موجب
يكتب على الشاشة أقرب العددين الى 0

طريقة العمل
استخدم الكلمة المفتاحية abs (راجع درس الأساسيات)
ثم قارن أي العددين أصغر من الأخر

---------------------

المصدر شبكة الصاعقة العربية لتعليم الهكرزhttp://forum.sa3eka.com/soft97181.html#ixzz1YPeSOSef

التصنيف : تعلم البرمجة