شبكة ومنتديات زهرة الجزيرة
مرحبا بك أيها الزائر الكريم!
إذا كنت زائرا فقط نتمني أن تصبح من أفراد عائلتنا_,إذا كنت فردا منا فنرجو منك إستمرارك معنا!!

منديات زهرة الجزيرة


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

شاطر | 
 

 تعلم لغة باسكال حتي الأحتراف.....روووووووووووعة

اذهب الى الأسفل 
كاتب الموضوعرسالة
مصطفي عباس
المصمم
المصمم
avatar

ذكر

عدد المساهمات : 66
السٌّمعَة : 0
تاريخ التسجيل : 03/09/2010
العمر : 24
الموقع : بيتنا دوت كوم!!!!!!!!!!!!
العمل/الترفيه : مراقب مالي
المزاج : بااااااااااااااااااااااااااااااااااااااااااااااااااااااااااارد

مُساهمةموضوع: تعلم لغة باسكال حتي الأحتراف.....روووووووووووعة   الأربعاء 13 يوليو 2011, 6:33 pm


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

يتكون حاسب باسكال الميكانيكي من مجموعه متتالية من الإطارات ( الأقراص ) كل واحد منها مرقمة من الصفر إلى التسعة ، هذه الإطارات مرتبه بحيث تقرأ الأرقام المسجلة عليها من اليسار إلى اليمين ويتم إدارتها يدويا عن طريق الذراع ، فعندما يتم أحد هذه الأقراص دورته من الصفر إلى التسع فإن نتوء الرقم 9 يدفع الطارة المجاورة له رقما واحدا وعند ذلك أي دورة الطارة الأولى تسعة مواقع متتالية ( دوره كاملة ) فإنها تدفع الطارة التالية لها من اليسار موقعا واحدا وهكذا حتى يتم تسجيل العدد .

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

يتكون حاسب باسكال الميكانيكي من مجموعه متتالية من الإطارات ( الأقراص ) كل واحد منها مرقمة من الصفر إلى التسعة ، هذه الإطارات مرتبه بحيث تقرأ الأرقام المسجلة عليها من اليسار إلى اليمين ويتم إدارتها يدويا عن طريق الذراع ، فعندما يتم أحد هذه الأقراص دورته من الصفر إلى التسع فإن نتوء الرقم 9 يدفع الطارة المجاورة له رقما واحدا وعند ذلك أي دورة الطارة الأولى تسعة مواقع متتالية ( دوره كاملة ) فإنها تدفع الطارة التالية لها من اليسار موقعا واحدا وهكذا حتى يتم تسجيل العدد .

وبهذه الطريقة استطاع والد باسكال إجراء عمليات الجمع والطرح أما عمليات الضرب والقسمة فتتم بتكرار عمليات الجمع والطرح مرات متعددة .
الرجوع الى أعلى الصفحة اذهب الى الأسفل
بت البلد
عضو زهراوي مشارك
عضو زهراوي مشارك
avatar

ذكر

عدد المساهمات : 107
السٌّمعَة : 0
تاريخ التسجيل : 25/11/2010

مُساهمةموضوع: رد: تعلم لغة باسكال حتي الأحتراف.....روووووووووووعة   الأربعاء 13 يوليو 2011, 6:44 pm

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

ذكر

عدد المساهمات : 66
السٌّمعَة : 0
تاريخ التسجيل : 03/09/2010
العمر : 24
الموقع : بيتنا دوت كوم!!!!!!!!!!!!
العمل/الترفيه : مراقب مالي
المزاج : بااااااااااااااااااااااااااااااااااااااااااااااااااااااااااارد

مُساهمةموضوع: أنواع الثوابت والمتغيرات في لغة باسكال....   الأربعاء 13 يوليو 2011, 6:57 pm


ما هي المتغيرات؟


المتغيرات عباره عن اسماء تخزّن في ذاكرة الحاسوب . هذا الاسم يستخدم لتخزين المعلومات في الذاكره .

يمكننا استخدام انواع مختلفه من المعلومات في المتغيرات , مثلاً الارقام و السلال و غيره .

استخدام المتغيرات :


يجب دائماً ان نعلن عن المتغيرات قبل استخدامها . نستخدم الكلمه الاساسيه var لعمل ذلك . دائماً يجب اختيار نوع البيانات للمتغير . وهذه هي انواع المتغيرات المختلفه .

Byte :
من 0 إلى 255

Word :
من 0 إلى 65535

ShortInt :
من -128 إلى 127

Integer :
من -32768 إلى 32767

LongInt :
من -4228250000 إلى 4228249000

Real :
قيم النّقطة المتغيّرة

Char :
حرفاً واحداً

String :
فوق 255 حرف

Boolean :
true او false


في هذا المثال سوف نتعرف على طريقة الاعلان عن متغير من نوع intger اسمه i :



program Variables;

var
i: Integer;

begin
end.


لإعطاء قيمه للمتغير يتم استخدام عامل الاسناد :=



program Variables;

var
i: Integer;

begin
i := 5;
end.



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



program Variables;

var
i, j: Integer;
s: String;

begin
end.


اذا كنت تريد ادراج سلسله في متغير يجب استخدام علامة الاقتباس الفرديه ' , النوع Boolean فقط يمكن اسناد قيمتين له و هم True و False :



program Variables;

var
i: Integer;
s: String;
b: Boolean;

begin
i := -3;
s := 'Hello';
b := True;
end.


الحسابات مع المتغيرات :


يمكن استخدام المتغيرات في العمليات الحسابيه . على سبيل المثال يمكن أن تسند القيمة بمتغيّر ثمّ تضيف الرقم 1 له . العمليات الحسابيه التي يمكن استخدامها :

+ : اضافه (زائد)
- : طرح
* : ضرب
/ : قسمه
div : قسمة عدد صحيح
mod : باقي قسمة العدد الصحيح

المثال التالي يقوم ببعض العمليات الحسابيه :


program Variables;

var
Num1, Num2, Ans: Integer;

begin
Ans := 1 + 1;
Num1 := 5;
Ans := Num1 + 3;
Num2 := 2;
Ans := Num1 - Num2;
Ans := Ans * Num1;
end.


يستخدم النوع Strings في تخزين السلاسل مثل الحروف والارقام المختلفه و غيره , و يمكنك استخدام العمليات الحسابيه مع هذا النوع من المتغيرات حيث لا يتم جمع الرقمين المخزنين على صيغة String بمعنى جمع , مثلاً اذا قمت بإضافة السلسله التي قيمتها 1 إلى السلسله التي قيمتها 1 سوف يكون الناتج 11 و ليس 2 .


program Variables;

var
s: String;

begin
s := '1' + '1';
end.


يمكنك قراءة محتوى المتغيرات بإستخدام Readln و ReadKey . الامر الثاني و هو ReadKey من الوحده crt و هي تقرأ حرف واحد فقط . سوف ترى ان طريقة عمل ReadKey مختلفه عن Readln .


program Variables;

uses
crt;

var
i: Integer;
s: String;
c: Char;

begin
Readln(i);
Readln(s);
c := ReadKey;
end.

طباعة المتغيرات على الشاشه طريقه سهله . اذا كنت تريد طباعة المتغيرات على الشاشه يمكنك استخدام الامر Writeln :


program Variables;

var
i: Integer;
s: String;
begin
i := 24;
s := 'Hello';
Writeln(i);
Writeln(s,' world');
end.


الثوابت :


الثوابت لا تختلف عن المتغيرات إلا انه قيمتها لا يمكن ان تتغير أي قيمه ثابته . يمكن اسناد القيمه إلى الثابت عند الاعلان عن الثابت . const هي الكلمه الاساسيه للاعلان عن الثوابت .


const
pi: Real = 3.14;

var
c, d: Real;

begin
d := 5;
c := pi * d;
end.

منــتـديـــــات زهــــــــــــــــرة الجـــــــــــزيرة Montadiat Zahrt Al-jazeera

*****التوقــــــــــيــــــــــع*****
منتديات زهرة الجزيرة......
نلتقي لنرتقي...ونبني ما نحب.....لمنتدي أفضل
الرجوع الى أعلى الصفحة اذهب الى الأسفل
مصطفي عباس
المصمم
المصمم
avatar

ذكر

عدد المساهمات : 66
السٌّمعَة : 0
تاريخ التسجيل : 03/09/2010
العمر : 24
الموقع : بيتنا دوت كوم!!!!!!!!!!!!
العمل/الترفيه : مراقب مالي
المزاج : بااااااااااااااااااااااااااااااااااااااااااااااااااااااااااارد

مُساهمةموضوع: رد: تعلم لغة باسكال حتي الأحتراف.....روووووووووووعة   الأربعاء 13 يوليو 2011, 6:59 pm

تسلمي يا ستو.......ربنا يحفظك أنتي كمان

منــتـديـــــات زهــــــــــــــــرة الجـــــــــــزيرة Montadiat Zahrt Al-jazeera

*****التوقــــــــــيــــــــــع*****
منتديات زهرة الجزيرة......
نلتقي لنرتقي...ونبني ما نحب.....لمنتدي أفضل
الرجوع الى أعلى الصفحة اذهب الى الأسفل
 
تعلم لغة باسكال حتي الأحتراف.....روووووووووووعة
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
شبكة ومنتديات زهرة الجزيرة :: $%*ركن البرمجه$%* :: قسم البرامج-
انتقل الى: