الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

دوره لتعلم لغه باسكال

مغلق
بدأه Mohammed27 في 28 أغسطس 2005 · 39 رد · 10,253 مشاهدة · في قسم برمجة الألعاب و الرسوميات العام
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ..

احببت في هذا الموضوع ان اطرح عليكم دوره للابتداء في لغه كانت من لغات البرمجه القويه .. - للأسف الان تعد لغه منقرضه لانها لم تتطور مع باقي اللغات - هذه اللغه تمكنك من صنع العديد من البرامج حيث انها كانت من احدى اللغات القويه في برمجه البرامج تحت نطاق دوس .. لا يهم هذا فان نطاق دوس ما زال مطلوب لحد الان ويوجد العديد من البرامج التي ما زالت تكتب في نطاق دوس .. لذلك فانا اقترح عليكم ان ابتدىء في تعليم هذه اللغه -هذا مشروط في وجود عدد من الاعضاء الذين يودون الاستفاده من هذه اللغه - .

اهداف الدوره :

ان الدوره تهدف الى ان توصل جميع الاعضاء الى البرمجه تحت نطاق دوس يشمل بذلك برمجه العاب دوس ثلاثي وثنائي الابعاد و برمجه البرامج .

البدايه :

ساقوم بالبدء بالدوره عند اكتمال عدد ملائم للبدء .

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#2

اذا كانت الدوره جديه وانك ستستمر فيها ال النهايه فأنا سأكون اول المشتركين والشاكرين لمبادرتك الطيبه :)

#3

السلام عليكم ورحمة الله وبركاته

ما الحاجة الى تعلم لغة الباسكال فى ظل وجود لغات مثل السى بلس بلس والجافا والدلفى والفيجوال بيسيك؟

ممكن تكون الدورة فى الدلفى مثلاً لانها تقريباً مشابهة للباسكال

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#4

مع ذلك عزيزي جوست لغه باسكال بالرغم من انها قديمه الا اني اشوف انها مهمه من عده نواحي. اولا يصير فيه حركه بالقسم ثانيا المبتدئين رح يتعلمون البرمجه بأساسيات صحيحه وبلغه بسيطه وسهله مثل باسكال ثالثا تعلم لغه جديده ولو مبادئ هذي اللغه شي ايجابي جدا :)

#5

احببت الاضافه والرد على الاخ Ghost اولا لغه باسكال صحيح انها وذكرت اعلاه انها من اللغات "المنقرضه" لكن ذلك لا يبطل قوتها ذلك لانها كانت من اول اللغات التي كان لها شان في برمجه برامج الدوس .. كما ان البرمجه بشكل عام لا تتطرق الى لغه فلا يوجد .. - على المستوى النظري - مبرمج باسكال او مبرمج سي .. ذلك لان كلهم مبرمجين وكلهم يقفون امام المشاكل الالكترونيه وكل منهم يحلها بطريقته الخاصه ( اي لغته ) لكن اذا اعطيت مبرمج لغه باسكال اوامر لغه سي فلا اظن انه سوف يقول لك لا استطيع .. لان الاختلاف البسيط الذي حصل هو اوامر البرنامج فقط .. اما طرق البرمجه بقيت هي هي لم تتغير .. على كلا ان لغه باسكال ليست بعيده جدا عن دلفي و سي .. واظن انها ستفيد بشكل عام .

بالنسبه للجديه في الموضوع اخي انا جدي وملتزم لكن ذلك مشروط بوجود عدد مناسب للبدء ...

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#6

اعتبرنى اول تلميذ :lol:

مش هاتعبك اصل انا درستها لما زهقت منها :lol:

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#7

كم لازم يكونو عدد المشتركين حتى تبدء ؟؟؟؟

#8

باسكال ليست منقرضة ..

الكومبايلر الجديد Free Pascalالمفتوح المصدر أسرع من C++ أحيانا كثيرة باعتراف الجميع , كما أنه يعمل على عدة نظم تشغيل (كلينكس وماك و أي بي ام مثلا)

http://www.freepascal.org/

لاحظ أول خبر بالموقع عن برمجة الألعاب للأجهزة الذكية الصغيرة ,, gbasp_red.gif

بالتأكيد أخي Mohammed27 كنت تتحدث عن Turbo Pascal الذي لم يعد يحدث .. وهذا صحيح , صار لغة للتدريس أكثر منه لغة للبرمجة .. ولكن البركة بدلفي لازالت تحمل أساسيات لابأس بها من باسكال , رغم الإختلافات الكبيرة

#9

اخي لا يوجد عدد معين المقصود هو وجود بعض الاعضاء الملتزمين للدوره وحضورها .. وسأبدأ ان شاء الله حالما ارى اعضاء يرودون في الموضوع ...

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#10

وهذا موقع سيعجبكم مخصص لبرمجة الألعاب بالباسكال ..

http://www.pascalgamedevelopment.com/

الموقع رائئئئئئئئئئئئئئئع جدا . وفيه منتديات وأخبار ومقالات متحدثة يوميا ..

#11

اخي عروه يوجد العديد المسماه باللغه المنقرضه وطبعا هذا لانها من اللغات المنقرضه فعلا اي ان مبرمجين هذه اللغات يأخذوا بالتناقص واذا قلت لك اسماء بعض اللغات المنقرضه ستندهش لانه من هذه اللغات :

Basic

Pascal

ASP

HTML*

....

ويوجد العديد المقصود بباسكال هي تربو باسكال ...

* هتمل تعد من اللغات التي ستنقرض قريبا مع انها ما زالت ام الويب وذلك ليتم استبدالها بلغه Xml

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#12

و ما علاقة ال HTML في برمجة صفحات الWeb بال XML

الXML في حد ذاتها ليست لغة تصلح لبرمجة و لكن هي طريقة تنظيم معلومات في محتوى أشبه بالجداول أو قواعد البيانات و لكن استخدامها في الweb design محدود و يجب استخدام XSL و هي من العائلة و إن كانت غير منتشرة بسبب أنها حديثة و لكن لا يعني هذا انقراض ال HTML حتى في العشرة سنوات القادمة

Sr. Software Development Engineer
Hulu, LLC
My Blogs

#13

اخي بشمهندس اني اعي ما اقول .. وكذلك انت لكن هل في بالك ان اي لغه من اللغات ستكون مخفيه عن العالم ولو حتى بعد 50 سنه ... لا اظن ذلك ... ان مضمون المعنى لغه منقرضه اي ان اللغه قد بدأت تتباطىء في السير والتطور واللحاق في الركب ... ولذلك بدأت قدراتها وكأنها قديمه بعض الشيء .. لم تتطور منذ مده .. وبذلك ولو حتى نظريا سيقل عدد مبرمجيها في عهد معين وستنقرض الى الابد لكن ذلك ليس في خلال سنه او سنتين !!

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#14

السلام عليكم

لقد قررت البدء في الدوره دون الانتظار للمزيد ... وبذلك نكون قد نفعنا انفسنا بشيء واتمنى ان ارى ردود ومتابعات للدوره ... والان اليكم الدرس الاول :

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

او الغورثميات وأظن ان الكل هنا يعرف هذا الموضوع .. اذ ان المهم في هذا

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

البرمجه .

المبنى الرئيسي للغه كالتالي:

Program ________ ; {Program Name} 1

2 Var

منطقه التعريفات .

___________________________________

3 Begin

كود البرنامج الرئيسي .

___________________________________

4 .end

والان سأضع اول برنامج :

- يمكنكم وضعه على الكومبايلر ورؤيه نتيجه البرنامج .

<Code>

Program example;

var

num1,num2,x:integer;

begin

num1:=7;

num2:=5;

x:=num1+num2;

writeln(x);

end.

</Code>

والان لنرى ما يقوم البرنامج بفعله .. حيث نرى ان البرنامج له 3 متغيرات

- المتغير هو خانه في الذاكره لحجز قيمه معينه .

المتغير الاول Num1 قمنا بتعويض القيمه 7 له عن طريق الكود :

Num1:=7;

وهذه هي الطريقه المتبعه لتعويض القيم في باسكال .. سوءا بصوره مباشره

كمثل Num1:=7; او بصوره غير مباشره كمثل X:=Num1+Num2; .

الامر Write معناه يدل على ماذا سيفعل اذ انه يقوم بطباعه البرامتر

المكتوب له على الشاشه. التعليمه ln الملتصقه بالتعليمه السابقه تقوم

بانزال المؤشر سطر بعد ان يقوم بالكتابه .

والان لنتتبع البرنامج وطريقه عمله :

يوجد لدينا 3 متغيرات وكذلك وضع الشاشه ...

Num1 > ?

Num2 > ?

X > ?

I/O > -

ملاحظه ان القيمه الابتدائيه للمتغيرات تكون عاده غير معرفه تسمى Trash

ولذلك قبل القيام بأي شيء في المتغيرات يجب اعطاء قيم للمتغيرات وغير

ذلك يحسب خطأ .. على الرغم من انه يمكن ان تكون نتيجه صحيحه مثال :

<code>

var

x,y,z:integer;

begin

x:=2;

z:=x+y;

end.

</Code>

لاحظ ان المتغير Y لم تعطى له قيمه طوال البرنامج . وهذا خطأ على الرغم من

انه يمكن ان يظهر لدى البعض النتيجه 2 اي ان تحسب قيمه المتغير Y صفر.

ملاحظه يمكن الاستغناء عن التعليمه Program . كما ويمكن الاستغناء عن التعليمه

Var بشرط الا يتواجد متغيرات .

والان سنكمل متابعه البرنامج الاول :

لدينا في السطر الاول التعليمه , Num1:=7;

لنرى الجدول للمتغيرات :

Num1 > 7

Num2 > ?

X > ?

I/O > -

ننفذ التعليمه التاليه : Num2:=5;

لنرى الجدول :

Num1 > 7

Num2 > 5

X > ?

I/O > -

ننفذ التعليمه التاليه : X:=Num1+Num2;

لنرى:

Num1 > 7

Num2 > 5

X > 7+5 > 12

I/O > -

والان لنرى الامر Writeln(X); لقد ذكرت سابقا معناه والان انظروا الى المخرج :

I/O > 12

_

واخر موضوع في درسنا هذا هو توضيح بعض الرموز وعملها :

; - يدل على نهايه الامر , لاحظ كل امر في البرامج التي كتبناها تنتهي بهذا الرمز

, - تستعمل للفصل بين المتغرات .

: - تستعمل للدلاله على انواع المتغيرات نوع المتغيرات هنا هي Integer

:= - تستعمل للتعويض .

. - هي اخر رمز في البرنامج لاحظ ان اخر End. نقطه .

اتمنى ان اكون قد افدتكم بعض الشيء ... لا تنسوا الاسئله لأن مثل هذه المواضيع

يجب ان تكونوا ملميين بها جدا قبل الوصول الى درجه الاحتراف .

وشكرا ...

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#15

تمام ,,,, سؤال صغير ,, انا حملت كومبايلر الfree pascal وبعد ان ادخلت الشفره قمت بحفظها وثم عملت run لكن المشكله ان شاشه الدوس تظهر وتختفي بسرعه كبيره جدا ,, هل لديك حل للمشكله؟؟

#16

انا ويا الاخ توكل على الله ميزة باسكال انها سهله ولغة قويه وصدقوني انها اقوى من فجوال بيسك الي مو عاجبه كيفه بس هذا رايي ^_^

المعذره من شعب البيسك...

وشكرا...

#17

السلام عليكم ورحمة الله وبركاته

أنا طبعا سأكون من المشاركين فى الدورة

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

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

#18
SoNaTa كتب:
تمام ,,,, سؤال صغير ,, انا حملت كومبايلر الfree pascal وبعد ان ادخلت الشفره قمت بحفظها وثم عملت run لكن المشكله ان شاشه الدوس تظهر وتختفي بسرعه كبيره جدا ,, هل لديك حل للمشكله؟؟

أعتقد أنه إذا أضفت Readln في نهاية البرنامج سيتوقف حتى تضغط Enter

Sr. Software Development Engineer
Hulu, LLC
My Blogs

#19
bashmohandes كتب:
أعتقد أنه إذا أضفت Readln في نهاية البرنامج سيتوقف حتى تضغط Enter

كتبتها ضمن الشفره من البدايه لكن ماني عارف المشكله وين عالعموم سأقوم بتنصيب الكومبايلر من جديد

تم تعديل هذه المشاركة بواسطة SoNaTa في 29 أغسطس 2005 في 16:22

#20
اقتباس
انا ويا الاخ توكل على الله ميزة باسكال انها سهله ولغة قويه وصدقوني انها اقوى من فجوال بيسك

ههههههههههههههههههههههههه

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#21
اقتباس
انا ويا الاخ توكل على الله ميزة باسكال انها سهله ولغة قويه وصدقوني انها اقوى من فجوال بيسك

ههههههههههههههههههههههههه

نعم الباسكال لغة سهله وقوية ولكن ليست اقوى من الفيجول بيسك لانها لغة غير مرئية يعنى consol

ولكنها بالطبع اقوى من من البيسك

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

يعنى شباب الفيبى ميعاودوش يضحكو لانهم فى اخر قائمة اللغات القوية

تم تعديل هذه المشاركة بواسطة SOLO.NET في 29 أغسطس 2005 في 17:13

VB.NET and C# Comparison

http://www.harding.edu/fmccown/vbnet_csharp_comparison.html

002.gif

=-=-=-=-=-=-=
ذو العلم يشقى فى النعيم بعلمه .:. واخو الجهالة فى الشقاوة ينعم
=-=-=-=-=-=-=
يا من بدنياه اشتغل . قد غره طول الأمل . فالموت يأتى بغتة . والقبر صندوق العمل
=-=-=-=-=-=-=
ان لم تستطع ان تجد ما تفعله فافعل ما لم تسطع ان تجده

screen_shot_2011-05-19_at_12.44.49_pm.pn

#22

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

إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال

feed.1.gif

#23

اسف على تأخري في الرد ...

لحل المشكله التي تظهر عندك يجب ان تكتب الامر Readln; في نهايه البرنامج .. - قبل ال End.

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

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

محمد وليد - عرب 48 - Admirer4@Gmail.com

مهندس كهرباء والكترونيكا (B.Sc)- متخصص بقنوات الاتصال عن بعد , والدوائر الكهربائيه المعقده VLSI .

محترف برمجه(B.A) في لغه باسكال , سي , ...

#24

قمت بتنصيب الكومبايلر من جديد وتم حل المشكله

#25
اقتباس
لقد قلتها من قبل وسأقولها ثانية , الحكم بيننا البرامج , ليذهب أحدكم الى قسم الفيجوال بيسيك ويضع فكرة برنامج يرى أنه لايمكن للفيجوال بيسيك تصميمها وينتظر النتيجة

الله المستعان يا جوست هل تلمح الى تحدي!!

والله هانت الدلفي في بلاد العرب

أذا فهي الحرب يا ابن مرة :lol: :lol: جوست انا امزح و لا اريد ان يتطور الامر الى حرب فعلية يا جوجو (اتملقك )

عموما الحرب بين انصار اللغات قديم قدم البرمجة

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

اني استطيع بناء اي برنامج ولكن اذا كان الامر كذلك

فانا اسالك الان سؤالا اخي (ليس تحديا وارجو ان لاتعتبر الامر تحديا )

كيف تستطيعون التعامل مع الطوابير والاشجار الثنائية وغيرها من بنى المعطيات رغم عدم وجود مؤشرات في الفيجوال

بيسك ام انكم لاتستخدمون مثل هذه الاشياء

سؤال اخر هل يمكن بناء برنامج بحيث يتمكن هذه البرمانج من العمل تحت اللينوكس

سؤال اخير هل تستطيع بناء برنامج بالاصح كود لمكتبات الDll بدون اللجوء الى ال++C مثلا

/index.ph...=Data+structure

اكرر انا لااقصد اي تحدي

تم تعديل هذه المشاركة بواسطة romanof في 30 أغسطس 2005 في 02:47

أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر

وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري

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

أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري

عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري

فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري

منتديات الرياضيات العربية

هذا الموضوع مغلق.

مواضيع مشابهة