احصائيات سريعة
البحث

اكثر المحتويات زيارة
الدوال في الاكسل (6,207 مشاهده)
ربط قاعدة بيانات أكسس (MS Access) مع برنامج الفيجوال بيسك بطريقة(ODBC) (4,033 مشاهده)
الدرس الثالث : بعض تطبيقات الدوال في اكسل (3,002 مشاهده)
تعريف الاستعلام وطريقة عرضه في آكسس، أنواع الاستعلامات، نافذة تحديد الاستعلام! (2,323 مشاهده)
الدرس الثاني: بعض الحيل لتسهيل برنامج اكسل (2,249 مشاهده)
شرح طريقة استعمال الأوتلوك مع بريد الهوتميل (2,080 مشاهده)
تغيير لغة واجهة التطبيق من عربي الى انجليزي وبالعكس لـ Windows-based applications (2,051 مشاهده)
أنواع العلاقات وطريقة الربط بين الجداول. (1,872 مشاهده)
مقدمة عامة حول الاكسل وحيل خاصة بالاكسل (1,705 مشاهده)
أنشئ قاعدة بياناتك التي ستستند إليها في تعلم طريقة ربط الجداول والاستعلامات. (1,672 مشاهده)
الدرس الأول : عمل شريحة في البوربوينت (1,533 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس . (1,446 مشاهده)
كيفية حل مشاكل الانترنت اكسبلور Internet Explorer (1,402 مشاهده)
دروس في الأوفيس الأكسس - Access0- (1,387 مشاهده)
اضافه صوت ونص لخلفيه في باور بوينت (1,310 مشاهده)
شرح طريقة التجميع Grouping في برنامج الاكسل (1,283 مشاهده)
التعرف على مكونات الكمبيوتر (1,246 مشاهده)
برنامج Windows Movie Maker لتكوين أفلام (1,225 مشاهده)
درس تعريب المجلة (1,209 مشاهده)
مقدمة في ربط قواعد البيانات داخل بيئة الـ .NET باستخدام الـ VB.NET (1,180 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (1,148 مشاهده)
كيف تجعل برنامجك أكثر تألقا وجمالا باستخدام أداة Active Skin (1,137 مشاهده)
ما هو المات لاب MATLAB؟ (1,089 مشاهده)
مقدمة عن لغة البيسك (1,064 مشاهده)
الفيجوال بيسك - مقدمة (1,039 مشاهده)
جديد مواد
التحويل التلقائي للحروف ل- ل- ه إلى اسم الجلالة0---- (743 مشاهده)
النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0---النسبة المئوية لا تظهر بالخط العربي & الشدة وألف المد في لفظ الجلالة0--- (440 مشاهده)
ضبط خيارات اللغة فى الـ Microsoft Word0--- (487 مشاهده)
استخدام لوحة المفاتيح في الـ Word0---- (649 مشاهده)
إضافة كلمة سر إلي ملفات الورد دون استخدام برامج0--- (672 مشاهده)
دمج المراسلات0-- (361 مشاهده)
وضع صورة كخلفية للنص0-- (486 مشاهده)
السماح للمستخدمين بتعديل أجزاء من ملف وورد محمي (Word2003)0--- (341 مشاهده)
كتابة الأرقام الكسرية ورموز المعادلات0-- (567 مشاهده)
درس كامل عن الدمج السهل من لوحة المفاتيح ف0-ي برنامج الـ Word (378 مشاهده)
دورة الأكسس: الدرس السادس : منوعات في أكسيس .0--- (1,148 مشاهده)
دورة الأكسيس : الدرس الرابع : العلاقات0---- (640 مشاهده)
أساسيات في Access0--0 (437 مشاهده)
تصميم تقرير لطباعة البيانات0---- (476 مشاهده)
تصميم نموذج استعراض البيانات‏0--تصميم نموذج استعراض البيانات‏0-- (457 مشاهده)
تصميم نموذج إدخال‎ ‎البيانات0--- (533 مشاهده)
إنشاء قوائم خاصة باستخدام الماكرو(1)0-- (411 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (2)0-- (359 مشاهده)
خطوات إنشاء الماكرو في تذييل النموذج (1)0- (314 مشاهده)
استعلامات SQL في Access - تعديل الجداول وإضافة الحقول0- (428 مشاهده)
استعلامات SQL في Access - تحديث البيانات الجدولية0-- (397 مشاهده)
الاستعلامات الإجرائية -4 (استعلام الحذف)0--- (209 مشاهده)
الاستعلامات الإجرائية -2 (استعلام الإلحاق)0--- (289 مشاهده)
تصميم تقرير لطباعة الإجمالي0--- (307 مشاهده)
استعلامات التحديد Select Query مع أمثله (1)0--- (411 مشاهده)
روابط ذات صلة
قريبا ان شاء الله
كلمات البحث
ابحث ايضا عن
الثوابت في البرنامج-

الدرس الرابع : الثوابت في البرنامج




لقد تعرفنا على طريقة تعريف متغيرات بالبرنامج لحفظ البيانات فيها حسب نوعها وذلك داخل التعريف 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;

الثوابت في البرنامج-

أضف هذه المادة في موقعك:
مواد مشابهة:
عبارة CASE في باسكال- عبارة CASE في باسكال-
عبارة CASE في باسكال-
(مرات المشاهدة: 34 مرات)
الدرس التاسع- الدرس التاسع-
الدرس التاسع-
(مرات المشاهدة: 46 مرات)
الدرس الثامن- الدرس الثامن-
الدرس الثامن-
(مرات المشاهدة: 43 مرات)
يمكننا تمييز نوعين من أنواع البيانات :- يمكننا تمييز نوعين من أنواع البيانات :-
يمكننا تمييز نوعين من أنواع البيانات :-
(مرات المشاهدة: 32 مرات)
س و جـ :: ما هى أقسام لغات البرمجة المختلفة ؟ س و جـ :: ما هى أقسام لغات البرمجة المختلفة ؟
س و جـ :: ما هى أقسام لغات البرمجة المختلفة ؟
(مرات المشاهدة: 186 مرات)
تعلم برمجة Pascal  - اتخاذ القرار- تعلم برمجة Pascal - اتخاذ القرار-
تعلم برمجة Pascal - اتخاذ القرار-
(مرات المشاهدة: 32 مرات)
تعلم برمجة Pascal - الملفات النصيه- تعلم برمجة Pascal - الملفات النصيه-
تعلم برمجة Pascal - الملفات النصيه-
(مرات المشاهدة: 36 مرات)
س و جـ :: 15- الآن .. كيف ابدأ ..؟؟ س و جـ :: 15- الآن .. كيف ابدأ ..؟؟
س و جـ :: 15- الآن .. كيف ابدأ ..؟؟
(مرات المشاهدة: 112 مرات)
س و جــ :: 13- هل لابد لى من معرفة لغات البرمجة السابقة ؟؟ س و جــ :: 13- هل لابد لى من معرفة لغات البرمجة السابقة ؟؟
س و جــ :: 13- هل لابد لى من معرفة لغات البرمجة السابقة ؟؟
(مرات المشاهدة: 63 مرات)
 أنواع البيانات في الباسكال- أنواع البيانات في الباسكال-
أنواع البيانات في الباسكال-
(مرات المشاهدة: 160 مرات)
منتديات مدرسة المشاغبين - افلام مقاطع يوتيوب - بروكسي proxy - ماسنجر مسنجر - العاب فلاش - اغاني اناشيد - مسجات رسائل sms - جوال موبايل بلوتوث - صور جديدة سنوات الضياع
جميع الحقوق محفوظة :Copyright © All rights reserved