لغة باسكال

موضوع: لغة باسكال الثلاثاء نوفمبر 29, 2011 1:45 am

اساسيات اللغة

قبل أن نتمكن من كتابة برامج بلغة الباسكال أو أي لغة أخرى لا بد لنا أولا من فهم منطقي لجميع الخطوات الواجب

إتباعها لحل المسألة بواسطة الحاسب

هذه الخطوات هي ما تعرف باللوغاريتم The Algorithm بعد ذلك يمكن تحويل هذه الخطوات إلى إيعازات باسكال

والتي ستتحول بدورها إلى لغة الآلة المستعملة

بواسطة برنامج المصنف Compiler

وبرنامج الباسكال هو مجموعه من الإيعازات بعضها منفذ Executable وبعضها غير منفذ Non-Executable

وتتألف هذه الإيعازات من كلمات دليليه أو من كلمات تعريفية يجب على المبرمج تعريفها في بداية كل برنامج

ولتوضيح ذلك نرى مخطط لبرنامج باسكال

Program The Total (input, output);

Writeln (‘The sum of’, A,’and’, B,’is’,

حيث نلاحظ

- السطر الأول هو للتعريف باسم البرنامج ووسيله الإدخال والإخراج

- أن الجزء الملون بالأزرق هو عباره عن كلمات محجوزه سنتعرف عليها بالتفصيل بالدروس القادمه

- الجزء الملون بالأخضر هو عباره عن إيعاز غير منفذ وهي ملاحظات خاصه بقاريء البرنامج

- الكلمه الدليليه Var للتصريح عن المتغيرات وسيتم دراستها بالتفصيل

- الجزء الممتد من Begin إلى End هو عباره عن جسم البرنامج والأوامر بينها

- السطر الأخير يحتوي على End متبوعه بنقطه وذلك للدلاله على نهايه البرنامج وسنلاحظ أن

1- بعد كل سطر هنالك نقطه فاصلة ( للدلالة على سطر آخر يلية

2- بعد كلمه End هنالك نقطة (.) للدلاله على أنه لا يوجد سطر بعد ذلك

أنواع البيانات في باسكال

سوف نتعرف على أنواع البيانات في لغة الباسكال والقواعد الخاصه لكل منها

للتمكن من جمع هذه البيانات في تعابير تشكل إيعازات البرامج في هذه اللغة

يمكننا تمييز نوعين من أنواع البيانات :

الأول

وهو ما تشترك فيه كل لغات البرمجه لذلك سنطلق عليه إسم البيانات القياسيه وهي:

1- الكميات الصحيحه Integer

وهي الأعداد الصحيحه الكامله التي لا تحوي على كسور

مثل 11

2- الكميات الحقيقيه Real
وهي الأعداد الحقيقيه التي تحوي كسور فيها

مثل 2.3434

3- الكميات المميزه Char

وهي الحروف والأشكال المميزة

مثل A,@,H,^,&

4- الكميات المنطقيه Boolean

ويمكن أن تأخد قيمتين هما إما صحيح True أو خطأ False

الثاني
وهو البيانات التي يصرح بها عن طريق المبرمج وذلك بتعريف أنواع جديده من البيانات ليست من الأنواع الأربعة التي تكلمنا عنها

المتغيرات في برنامج باسكال

التصريح Var

ويتم في هذا القسم من البرنامج التصريح عن نوع البيانات بالبرنامج قبل إستخدامها

ويتم التصريح حسب نوع البيانات إما الأنواع الأربعه Integer , Real , Boolean , Chr أو نوع قام المستخدم بتعريفه وسيتم دراسته بفصل آخر

ويخضع إسم المتغير إلى شروط وهي

1- أن يبدأ بحرف ( ولا تقبل الأسماء التي تبدأ بأرقام )

2- يحوي الإسم حروفا وأرقاما فقط

3- لا يكون الإسم من ضمن الكلمات المحجوزه بالذاكرة

4- يفضل دائما أن يكون إسم له معنى للتسهيل

أمــــثــلة

A: integer; تم تعريف مكان بالذاكره إسمه A وهو يقبل البيانات فقط من نوع الأعداد الصحيحه

B: Real; تم تعريف مكان بالذاكره إسمه B وهو يقبل البيانات من النوع الصحيح وأيضا النوع الذي الحقيقي الذي يحوي كسور

Grade: Chr; تم تعريف مكان بالذاكره إسمه Grade وهو يقبل البيانات من النوع Chr

F: Boolean; تم تعريف مكان بالذاكره إسمه F وهو يقبل بيانات من النوع Boolean أي قيم منطقيه (يقبل إما قيمه True – False )

والآن لنأخذ مثال تطبيقي على إستخدام التصريح Var

A:=5; (صحيح)

A:=3.5; (خطأ) – لإنه تم إسناد عدد حقيقي كسري إلى متغير صحيح

B:=5; (صحيح)

B:=3.5; (صحيح)

Grade:=`r`; (صحيح)

Grade:=d; (خطأ) – لعدم وضع الأقواس

F:=True; (صحيح)

F:=False; (صحيح)

F:=10; (خطأ) – لإن المتغير F لايقبل إلا قيم منطقيه إما True أو False

ونلاحظ مما سبق

القيمه Real اعم من Integer فهي تقبل القيم الصحيحه والحقيقيه ولكنها تأخد حيز من الذاكرة أكبر

الثوابت

لقد تعرفنا على طريقة تعريف متغيرات بالبرنامج لحفظ البيانات فيها حسب نوعها وذلك داخل التعريف Var

ولكن ماذا لو أردنا تعريف بيانات تكون قيمتها ثابته طوال عمل البرنامج فإننا نستخدم لتعريفها

نوع جديد داخل الأمر Const وتكون على الشكل التالي

Const
A = 30 ;

B = 9.6 ;

C = “Name”;

- طوال عمل البرنامج سيسند للثابت A القيمة 30 ولا يمكن تغيير هذه القيمة خلال البرنامج أبدا

- نلاحظ أن هناك علامة مساواة = بين إسم الثابت وقيمته بينما في تعريف Var المتغيرات هناك علامة : بين إسم المتغير ونوعه

- الثابت المعرف يعامل في البرنامج على أنه كلمة محجوزة Reserved Word

Program Circle(input,output);

Const

Pi=3.14;

Var

Radius : integer ;

Circum , area : real ;

Begin

Writeln ( ‘Enter Radius’);

Read ( radius);

Circum := 2*pi* radius ;

Area := pi * radius * radius ;

Writeln (‘The value of circum is’,circum);

Writeln (‘The value of area is’,area);

End.

في البرنامج السابق قمنا بتعريف ثابت في البرنامج بالإسم pi وهو يتخذ دائما القيمة 3.14

إستخدام الثوابت في البرنامج يسهل عمل البرنامج ويسهل تعديل القيم بسهولة بخاصة في البرامج الكبيرة

لو أردنا تنفيذ البرنامج السابق ولكن بدون الإعتماد على الثوابت فسيكون البرنامج على الشكل

Program Circle(input,output);

Var

Pi : real ;

Radius : integer ;

Circum , area : real ;

Begin

Write (‘Enter Value of pi :’);

Readln (pi);

Writeln ( ‘Enter Radius’);

Read ( radius);

Circum := 2*pi* radius ;

Area := pi * radius * radius ;

Writeln (‘The value of circum is’,circum);

Writeln (‘The value of area is’,area);

End;

Writeأمر

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

الأول : Writeln

وهو يقوم بطباعة الجملة والإنتقال بعدها إلى السطر الذي يليه مثل

Writeln (‘This is First Line’);

Writeln (‘This is the second Line’);

Writeln (‘This is the first line’,’This is complete of the first line’);

نلاحظ في هذا المثال أنه سيقوم بطباعة الجملة الأولى وفي نفس السطر سيقوم بطباعة الجملة الثانية وسينتقل بعدها للسطر الذي بعده

الثاني : Write

وهو مشابه للأمر Writeln ولكن الفرق الوحيد أنه لا ينتقل سطر للأسفل بعد طباعة الجملة بل يكمل بنفس السطر

Write (‘This is the first line ‘);

Writeln (‘This is the complete of the first line’);

Write (‘This is the Second line’);

Write (‘This is complete of line 2’);

Writeln (‘This is the End’);

في هذا المثال توضيح كامل لعمل دالة الإخراج بحالتيها

يقرأ البرنامج السطر الأول ويطبعه وبما أنه Write فإن المؤشر لن ينتق للسطر الذي يليه بل سيقرأ السطر الآخر ويطبعه بنفس السطر

وبما أن السطر الثاني من النوع Writeln فإن المؤشر بعد الإنتهاء من طباعة السطر ينتقل للسطر التالي لطباعة البيانات الأخرى

لذلك سيكون ناتج السطور السابقة بعد التنفيذ

This is the first line This is the complete of the first line

This is the Second line This is complete of line 2 This is the End

I

بعد الإنتهاء من نتفيذ الأوامر ينتقل المؤشر I إلى السطر الذي يلي آخر جمله لإنها من النوع Writeln

مثـــآل ..لو أراد منك طباعة الأسطر التالية

My Name is Rayan
o

I live in Riyadh

حيث يقصد دائما بالعلامة o فراغ

الجواب

Writeln (‘My Name is Rayan’);

Writeln ;

Writeln (‘I Live in Riyadh ‘);

ويمكن أيضا حلها بالشكل التالي

Writeln (‘My Name is Rayan’);

Writeln(‘’);

Write (‘I Live in Riyadh ‘);

والفرق بينهما أن المؤشر في الحالة الأولى سيكون في النهاية في السطر الذي يلي آخر عبارة
وفي المثال الثاني سيكون في نفس السطر الأخير

لو أراد طباعة قيمة في متغير فنستخدم الأمر كما يلي في هذا المثال

فلو فرضنا أن S=10 وأراد طباعة قيمتها فنكتب

Writeln (‘The Value of S =’,s);

ويمكن أيضا طباعة أكثر من قيمة أكانت جملة أو متغير وذلك بإستخدام الفاصلة [,] بينها

مثل لو عرفنا المتغيرات التالية

A = ‘Rayan’;
B = ‘=’ ;
C= ‘20’;

Writeln (‘My Name is’,B,A,’and my age is’,c);

فسيكون الناتج على الشكل

My Name is =Rayan and my age is 20

Readأمر

سنتعرف في هذا القسم على نوع جديد من الأوامر في الباسكال وهذا النوع من
الأنواع الشائعة الإستخدام في البرنامج وهو الأمر Readln ويستخدم هذا الأمر
لإدخال البيانات من المستخدم وحفظها في متغيرات تناسب نوع البيانات
المدخلة وله نوعان

الأول : Readln

وهو يقوم بقراءة البيانات من المستخدم وبعدها ينتقل المؤشر للسطر التالي

الثاني : Read

وهو مشابه للأمر Readln ولكن الفرق الوحيد أنه لا ينتقل سطر للأسفل بعد قراءة البيانات بل يكمل بنفس السطر

Write (‘Enter Your Name :’);

Readln (Name);

في المثال السابق يقوم البرنامج في السطر الأول بطباعة السؤال ( أدخل إسمك ) ولإننا إستخدمنا الأمر Write فإن المؤشر لا ينتقل للسطر التالي بل يقرأ السطر التالي والمؤشر في نفس السطر

في السطر التاني ينتقل البرنامج لوضع إستقبال البيانات من المستخدم ومن ثم حفظها في المتغير المختار Name و يجب أن تكون البيانات المدخلة من نفس نوع المتغير وإلا سوف يولد البرنامج رسالة خطأ

Enter your name : I

لو أضفنا السطور التالية للمثال

Writeln (‘Enter your Age :’);

Read (Age);

Write (‘Enter your Salary :’);

Readln (Salary);

في السطر الثالث يطبع البرنامج الرسالة وينتقل بعدها للسطر التالي لإستقبال البيانات من المستخدم ، ونلا حظ هنا اننا إستخدمنا الأمر Read بعدها سيقوم البرنامج بطباعة السطر الخامس ولن ينتقل للسطر التالي بل سيستقبل البيانات في نفس السطر لإننا إستخدمنا الأمر Write

قاعدة الأولويات

يجب علينا قبل الدخول في البرمجة فهم الطريقة الرياضية للتعامل مع البيانات وطريقة تعامل المصنف مع الدوال الرياضية والأقواس

وبرنامج الباسكال يتعامل مع العمليات الرياضية حسب القاعدة التالية

والتي تعتمد على الأسبقية بحيث

أولا : تنفيذ الدالة Not

ثانيا : تنفيذ الدوال التالية

AND

MOD

DIV

/

*

بحيث أن الدالتين Div و Mod دوال رياضية سيتم التعرف عليها لاحقا

ثالثا : تنفيذ العمليات

OR
-
+

رابعا : تنفيذ المعاملات المنطقية
=
<>
<=
>=
<
>

عندما يكون هناك دالتين من نفس المستوى ننفذ الدالة بدءا من اليسار إلى اليمين

لتتضح الرؤيا حول إستخدام قاعدة الأولويات نرى الأمثلة التالية

1-Write a PASCAL program to find the roots of a quadratic equation (assume that b2 – 4ac >= 0)

يريد في هذا المثال إيجاد جذور لمتتابعة ثنائية

الحل

Program Root(input,output);

Var

A,b,c :integer;

X1,x2 : real ;

الناتج عرفناه على أنه عدد حقيقي لإنه سيكون ناتج من عمليات منها عمليات قسمة

وفي حالة وجود عمليات قسمة فناتجها دائما عدد حقيقي وليس صحيح

Begin

Writeln (‘Enter the Numbers A , B ,C’);

Readln (a,b,c);

X1:= (-b+sqrt(b*b –4*a*c))/(2*a);

X2:= (-b-sqrt(b*b –4*a*c))/(2*a);

Write (‘The Nunmber X1 =’,x1 ,’And Number X2 =’,x2);

End.

2- Find (7 Div 2/3)

في هذا المثال نلاحظ أن الدالتين Div و / يأتيان في مرتبة واحده في أولوية التنفيذ

ولكن لإن Div أتت قبل من جهة اليسار فنقوم بتنفيذها أولا لذلك

7 div 2/3 =

3 / 3 =

1.0

( لاحظ أن العدد جوابه 1.0 وليس 1 لإنه ناتج من قسمة فلذلك يعد عدد حقيقي Real ولا يعتبر Integer)

التعابير الرياضية

في هذا القسم سوف تنعرف على العمليات الرياضية المستخدمة في الباسكال وطريقة إستخدامها

أولا : العمليات - و + و *

التعامل مع هذه العمليات متشابة وهي تقبل الأعداد الحقيقة والصحيحة

5 + 7 = 12

5.0 + 7 = 12.0

7 –5 =2

7*5 = 30

نلاحظ من هذا المثال أن ناتج

عدد صحيح Integer + عدد صحيح Integer = Integer

عدد حقيقي Real + عدد حقيقي Real = Real

عدد صحيح Integer + عدد حقيقي Real = Real

ثانيا : العملية /
عملية القسمة دائما مهما كان نوع المدخلات أكانت أعداد حقيقة أو صحيح

فجوابها دائما عدد حقيقي Real

طبعا القسمة على الصفر لا تصح وتولد خطأ بالبرنامج وهو خطأ من النوع الذي يظهر عند تشغيل البرنامج فيجب الإنتباه

ثالثا : العملية Div

وهي عملية قسمة ولكن فقط تعطي الناتج من القسمة وتهمل الباقي من القسمة

20 Div 3 = 6

18 Div 3 = 6

(-17) Div 3 = -5

19 Div 3 = 6

3 Div 10 = 0

16 Div (-3) = -5

الدالة Div تقبل دائما مدخلات من النوع الصحيح Integer وتعطي جواب دائما Integer

ولا تقبل أبدا القيم الحقيقية Real

1.4 Div 4 = X

ثالثا : العملية Mod

وتعطي هذه العملية الباقي من قسمة عددين ولاحظ دائما عند قسمة عدد على أكبر منه فناتجها العدد نفسه

20 Mod 3 = 2

18 Mod 3 = 0

19 Mod 3 =1

3 Mod 10 = 3

الدالة Mod تقبل دائما مدخلات من النوع الصحيح Integer وتعطي جواب دائما Integer

ولا تقبل أبدا القيم الحقيقية Real

1.4 Mod 4 = X

في هذا القسم سوف نتعرف على دوال رياضية موجودة في برنامج الباسكال ولا تحتاج لتعريف للتعامل معها ويطلق عليها Built-in

القيمة العائدة من نفس نوع القيمة المعطاة
Real – Integer
تعطي القيمة المطلقة للدالة x

ABS (X)

Real
Real – Integer
تعطي ظل تمام الزاوية x

قيمة x من نوع Radian
ArcTan(x)

Real
Real – Integer
تعطي جيب تمام الزاوية x
COS(X)

Real
Real – Integer
تعطي جيب الزاوية x
SIN(X)

Real
Real – Integer
تعطي ex بحيث

قيمة e = 2.718
EXP(X)

Real
Real – Integer
تعطي لوغاريثم الزاوية x
LN(X)

Integer
Real
تعطي أقرب قيمة صحيحة للعدد x بحيث

Round (n.5^) = n+1

الكسر العشري أكبر من أو يساوي 5

Round (n.4) = n

الكسر العشري أصغر من 5
ROUND(X)

القيمة العائدة من نفس نوع القيمة المعطاة
Real – Integer
يعطي مربع العدد x = x2
SQR(X)

القيمة العائدة من نفس نوع القيمة المعطاة
Real – Integer
يعطي الجذر التربيعي للعدد x
SQRT(X)

Integer
Real
يعطي القيمة الصحيحة للعدد x

أي يأخذ القيمة الصحيحة قبل الفاصلة ويهمل الكسر
TRUCE(X)

التعليقات

انــمــآط الكتــآبه في بأسكـآل ودلفي

في باسكال، يتم ضمّ التعليقات في أقواس braces أو أقواس parentheses متبوعة
بنجمة. دلفي تقبل ايضا نمط التعليقات المتبعة في س++ ، والتي يمكنها ان
تمتد الى نهاية السطر:

{هذا تعليق}
(* هذا تعليق آخر *)
// هذا تعليق آخر يمتد حتى نهاية السطر

الشكل الأول أقصر و أكثر اتّباعا. الشكل الثاني كان مفضلا أكثر في اوربا بسبب عدم وجود رمز القوس السهمي في لوحات المفاتيح. الشكل الثالث
من التعليقات تم استعارته من س++ و متوفر فقط في نسخ 32 بت من دلفي.
التعليقات المحدودة بنهاية السطر مفيدة جدا للملاحظات القصيرة و لتلك
الخاصة بسطر محدد في التوليف.

خلال سرد الأمثلة في هذا الكتاب سأحاول تعليم التعليقات بأحرف مائلة، (و
الكلمات الرئيسية بالتغميق)، لتكون متسقة مع النمط الافتراضي للصياغة في
دلفي.

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

{ ... code
{comment, creating problems}
... code }

مع علامة تعليق ثانية، يمكنك كتابة التعليمات الآتية، و التي هي صحيحة:

{ ... code
//this comment is OK
... code }

لاحظ أن القوس المفتوح او القوس_نجمة اذا كان تليه علامة الدولار ($)، فسوف
يتحول الى توجيه للمُجمّع compiler directive ، كما في {$X+}.

في الواقع، توجيهات المجمّع تعد تعليقات أيضا. مثال ذلك، {$X+ This is a
comment} هي صحيحة. هي كلاهما توجيه و تعليق صحيحين، الا أن المبرمج
المتعقل سوف يختار ان يفصل بين التوجيهات والتعليقات.

... يتـــبع .

استخدام الأحرف العالية
مجمّع باسكال (بعكس اللغات الأخرى) يغضّ الطرف عن حالة الأحرف (عالية أو
منخفضة). لذلك؛ فإن التعريفات التالية Myname ، MyName، myname، myName، و
MYNAME كلها متساوية. بشكل عام، هذا يعدّ أمرا ايجابيا، ففي اللغات
الحسّاسة لحالة الأحرف، العديد من الأخطاء اللغوية قد تحدث بسبب الإهمال في
مراعاة حالة الأحرف.

ملاحظة: ربما الحالة الإستثناء الوحيدة لقاعدة
حساسية الأحرف في باسكال هي: إجراء Register في حزمة المكونات، لابد لها أن
تبدأ بحرف R العالي، وذلك للمحافظة على التوافقية مع C++ Builder.

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

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

MyLongIdentifier
MyVeryLongAndAlmostStupidIdentifier

هناك حالات أخرى لايأبه لها المجمّع كالفراغات، و الأسطر الفارغة، و
المسافات (tabs) التي تقوم بوضعها في البرنامج. كل هذه الحالات مجتمعة
تسمّى بالفراغ الأبيض white space . الفراغات البيضاء تستخدم فقط لتحسين
مقروئية البرنامج؛ و لا تؤثر في عملية التتجميع.

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

مرّة أخرى، لاتوجد قواعد ثابتة لاتستخدام الفراغات و التعليمات متعددة الأسطر، فقط بعض الأعراف:

محرّر نصوص دلفي له خطا عموديا تستطيع وضعه على بعد 60 أو 70 حرف. إذا
استخدمت هذا الخطّ كمؤشر لتجنب تجاوزه، فإن برنامجك سوف يبدو أفضل عندما
تقوم بطباعته على الورق. غير هذا فإن الأسطر الطويلة قد يتم تجزئتها من أي
موضع حتى من منتصف الكلمة عند طباعة البرنامج.
عندما يكون للوظيفة أو الإجراء عدة محددات parameters ، فإن العادة المتّبعة هنا هي وضع هذه المحدّدات في سطر آخر.
تستطيع ترك سطر بكامله أبيضا (فارغا) قبل وضع أي تعليق أو ملاحظة، أو
لتقسيم جزء كبير من التعليمات الى أجزاء أصغر. وحتى هذه الفكرة البسيطة
بإمكانها تحسين مقروئية البرنامج، سواء على الشاشة أو عند طباعتها.
استخدم الفراغات لفصل محددات استدعاء وظيفة function call، وربما حتى فراغ
قبل فتح الأقواس، ايضا حافظ على فراغات لفصل رموز العمليات في التعابير
البرمجية. أنا أعلم أن بعض المبرمجين لن يوافقوا على هذه الفكرة، لكن أنا
أصرّ: الفراغات بالمجان؛ لن تدفع شيئا مقابلها .(نعم، أعلم انها تستهلك
مكانا للتخزين أو وقتا اضافيا في عملية اتصال الموديم لتحميل أو تنزيل ملف،
لكن هذا أصبح لامعنى له في وقتنا الحاضر.)

الطباعة الأنيقة
الاقتراح الأخير فيما يخصّ استخدام الفراغات البيضاء له علاقة بالعرف
المتبع لنسق تشكيل لغة باسكال، و الذي يعرف بالطباعة الأنيقة
pretty-printing. القاعدة بسيطة: كل مرة تحتاج فيها لكتابة تعليمة مركّبة،
قم بوضعها بعد هامش فراغين الى اليمين من باقي التعليمة الحالية. التعليمة
المركبة داخل تعليمة أخرى مركبة يتم تهميشها بأربع مسافات، وهكذا:

if ... then
statement;

if ... then
begin
statement1;
statement2;
end;

if ... then
begin
if ... then
statement1;
statement2;
end;

الصياغة السابقة تعتمد نسق الطباعة الأنيقة، لكن المبرمجين لديهم تفسيرات
مختلفة لهذه القاعدة العامة. بعض المبرمجين مثلا يقومون بتهميش تعليمات
begin و end للمستوى التالي مع نفس التعليمات الداخلية، بعضهم يهمش begin و
end ثم يقومون بتهميش التعليمات الداخلية لمستوى اضافي، مبرمجون آخرون
يضعون begin في نفس سطر شرط if . هذا في معظمه أمر له علاقة بالذوق الشخصي.

نفس نمط التهميش يتّّبع عادة عند سرد المتغيرات أو أنواع الببيانات، و لمواصلة تعليمة من سطر سابق:

type
Letters = set of Char;
var
Name: string;
begin
{ long comment and long statement, going on in the
following line and indented two spaces }
MessageDlg ('This is a message',
mtInformation, [mbOk], 0);

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

تعليم الألفاظ
لتسهيل قراءة و كتابة توليف code باسكال، يملك محرر دلفي خاصية تسمّى تعليم
الألفاظ syntax highlighting . فالكلمات التي تقوم بطباعتها في المحرر،
يتم اظهارها باستخدام ألوان مختلفة بحسب معناها في باسكال. عرضا، الكلمات
المفتاحية keywords تكون داكنة، النصوص و التعليقات تظهر ملونة (و غالبا
مائلة)، وهكذا.

الكلمات المحجوزة، و التعليقات، و النصوص تقريبا هي العناصر الثلاثة الأكثر
استفادة من هذه الخاصية. فمن أول نظرة يمكنك ملاحظة كلمة مفتاحية غير
صحيحة، أو نصّ غير مقفل بصورة سليمة، أو طول الملاحظة المتعددة الأسطر.

بإمكانك بسهولة تعديل مواصفات تعليم الألفاظ باستخدام صفحة ألوان المحرر
Editor page في لوحة خيارات البيئة Environment Options (انظر الشكل 2.1).
إذا كنت تعمل بمفردك، يمكنك اختيار الألوان التي تفضل. أما إذا كنت تعمل
بالتعاون مع مبرمجين آخرين، فالأفضل أن توافقوا جميعا على نسق ألوان نمطي.
لقد وجدت ان العمل على حاسوب به تلوين الفاظ مختلف عمّا تعوّدت عليه أمر
صعب بالفعل.

الشكل 2.1: لوحة الحوار المستخدمة لتحديد لون تعليم الألفاظ.

استخدام قوالب اللغة
قدّمت دلفي 3 خاصيّة جديدة ذات علاقة بكتابة شفرة البرامج. عند كتابة
تعليمات لغة باسكال تجد نفسك عادة ما تعيد كتابة نفس التتابع من الكلمات
الرئيسية، لذلك قدمت بورلاند خاصية جديدة تسمّى قوالب اللغة Code Templates
. قوالب اللغة هي ببساطة قطعة من توليف مرتبطة بمفاتيح مختصرة. حيث تقوم
بكتابة النص المختصر ثم تتبعها بالضغط على Ctrl+j، فيظهر التوليف ذو
العلاقة مكتوبا بالكامل. مثلا، اذا قمت بكتابة arrayd ، ثم ضغطت على Ctrl+j
، فان محرر دلفي سوف يوسع من النص المختصر الى التالي:

array [0..] of ;

و حيث ان قوالب التوليف المحددة سلفا عادة ما تأتي بنسخ مختلفة لنفس
الاختصار، فان النص المختصر ينتهي عموما بحرف يشير الى النسخة التي قد
تهمك. عموما يمكنك كتابة فقط جزء من النص المختصر. مثال ذلك، اذا كتبت ar
ثم ضغطت على Ctrl+j ، يظهر المحرر قائمة تظهر الخيارت المتوفرة مع وصف موجز
لكل اختصار، مثلما هو واضح في الشكل 2.2 .

الشكل 2.2 اختيار قالب التوليف

تستطيع صياغة قوالب التوليف إما بتعديل الموجود منها، أو ببناء قوالب جديدة
خاصة بك. واذا قمت بهذا، تذّكر ان نص قالب التوليف عادة ما يحوي حرف '|'
ليشير الى الموقع الذي سيقفز له المؤشر بعد انتهاء العملية، حيث تتابع
الكتابة لإكمال نص القالب.

تعليمات اللغة
حالما تقوم بتحديد بعض المعرفات، يمكنك استخدامها في تعليمات او في معادلات
هي جزء من بعض التعليمات, تقدم باسكال مجموعة من التعليمات والتعبيرات.
دعنا أولا نلقي نظرة على الكلمات المفتاحية، و التعبيرات ، و العاملات.

الكلمات المفتاحية
الكلمات المفتاحية هي كل المعرّفات المحجوزة من قبل اوبجكت باسكال، و التي
لها دور في اللغة. دليل دلفي (Help) يميّز بين الكلمات المحجوزة والتوجيهات
كالتالي: الكلمات المحجوزة لا يمكن استخدامها كمعرّفات، بينما التوجيهات
لا يجب استخدامها لنفس الغرض، حتى لو قبلها المجمّع. عند الممارسة، عليك
تجنّب استخدام أية كلمة محجوزة كمعرّف.

التعبيرات والعامِلات
لا توجد قاعدة عامة لبناء التعبيرات expressions ، حيث تعتمد اساسا على
العامِلات التي تستخدم، و التي لباسكال العديد منها. هناك المنطقي logical
والحسابي arithmetic والبولي Boolean والعلائقي relational ، و عاملات
الفئة set، بالاضافة الى عدد آخر. يمكن استعمال التعبيرات لتحديد القيمة
التي ستخصص للمتغير، او لحساب المحدد parameter التابع لوظيفة او اجراء، او
لاختبار شرط. و قد تتضمن التعبيرات استدعاء وظائف ايضا. في كل مرة تقوم
فيها باجراء عملية على قيمة في معرّف، و ليس استعمال المعرف في حد ذاته،
فان هذا يعدّ تعبيرا.

تعد التعبيرات امرا شائعا في لغات البرمجة. التعبير هو أي توليفة من
الثوابت constants ، المتغيرات، القيم الحرفية literal ، عاملات، و نتائج
الوظائف. التعبيرات يمكن ايضا تمريرها الى المحددات القيمية value
parameters في الاجراءات و الوظائف، و لكن ليس دائما الى المحددات المرجعية
reference parameters (التي تحتاج الى قيمة يمكن تخصيصها).

العامِلات و أسبقيتها
اذا سبق لك و أن كتبت برنامجا في حياتك، فانك تعلم بالفعل ماذا تعني كلمة
تعبير expression. هنا سوف ألقي الضوء على عناصر محددة في عاملات باسكال.
يمكنك رؤية قائمة بعاملات اللغة، مجمعة حسب الأسبقية، في الجدول 2.1.

على العكس من معظم اللغات الأخرى، فإن عاملات and و or لهما الأسبقية على
العاملات العلائقية. لذاك اذا كتبت a < b and c < d، فان المجمّع
سيحاول تنفيذ عملية and أولا، منتجا بذلك خطأ تجميع. لهذا السبب عليك وضع
كل من تعبير < بين قوسين: (a < b) and (c < d).

بعض العاملات الشائعة لديها معان مختلفة مع انواع بيانات مختلفة. مثال ذلك،
العامل + يمكن استخدامه لجمع رقمين، لوصل جملتين، صنع اتحاد بين فئتين، او
حتى جمع رصيف offset مع مؤشر Pchar . الا انك لاتستطيع جمع حرفين، كما هو
ممكن في لغة c.

عامل آخر غريب وهو div . ففي باسكال، يمكنك تقسيم أي رقمين (حقيقي أو صحيح)
بواسطة العامل / ، وسوف تحصل بصورة ثابتة على رقم حقيقي كناتج. اما اذا
احتجت الى تقسيم رقمين صحيحين للحصول على ناتج صحيح، استخدم العامل div
كبديل.
عامِلات الفئة
عاملات الفئة تتضمن اتحاد union (+)، طرح difference (-)، تقاطع
intersection (*)، اختبار عضوية membership (in)، بالإضافة الى مجموعة من
العاملات العلائقية. لاضافة عنصر لمجموعة، يمكنك جعل اتحاد فئةة مع آخرى
تملك فقط العنصر الذي تحتاجه. فيما يلي مثال بدلفي له علاقة بنمط الخطّ
font styles:

Style := Style + [fsBold];
Style := Style + [fsBold, fsItalic] - [fsUnderline];

كبديل يمكنك استخدام الاجرائين الاعتيادين Include و Exclude، وهما أكثر
فاعلية (لكنهما لايمكن استعمالهما مع سمات مكوّن التي تكون من نوع set،
لأنها تحتاج الى محدد لقيمة l-):

Include (Style, fsBold);

وهذا كتاب كااامل لدورة تعليم لغة باسكال(Turbo Pascal) بالعربية

[ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]

ودمتم سالمين