Deprecated: Assigning the return value of new by reference is deprecated in /www/wwwroot/shabab.ps/public_html/vb/showthread.php on line 639

Deprecated: Assigning the return value of new by reference is deprecated in /www/wwwroot/shabab.ps/public_html/vb/showthread.php on line 1041

Deprecated: Assigning the return value of new by reference is deprecated in /www/wwwroot/shabab.ps/public_html/vb/showthread.php on line 1046

Deprecated: Assigning the return value of new by reference is deprecated in /www/wwwroot/shabab.ps/public_html/vb/showthread.php on line 1518

Deprecated: Assigning the return value of new by reference is deprecated in /www/wwwroot/shabab.ps/public_html/vb/showthread.php on line 1523
دروس لغة الباسكال Pascal ... - منتديات شباب فلسطين
نحن مع غزة


الإهداءات

العودة   منتديات شباب فلسطين > محطات تقنية > مُتعلقات التقنية

 
 
أدوات الموضوع انواع عرض الموضوع
Prev المشاركة السابقة   المشاركة التالية Next
قديم 11-29-2005, 06:45 AM   #7
محمود
..{ مديــــــر عــــام }..
 
الصورة الرمزية محمود
عيد فطر سعيد ,,

قوة السمعة: 50 محمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond reputeمحمود has a reputation beyond repute

افتراضي مشاركة: دروس لغة الباسكال Pascal ...

تابع ::

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

أولا : تنفيذ الدالة 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)
  اقتباس المشاركة
 


الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1)
 

تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة

الانتقال السريع

المواضيع المتشابهه
الموضوع كاتب الموضوع المنتدى مشاركات آخر مشاركة
دروس فوتوشوب صوت+صورة المجموعه الاول احمد سعد! ريــشــة فنــآن 6 01-23-2006 11:41 AM
تعلم اساسيات Pascal بسهولة A s h i q o h a مُتعلقات التقنية 2 12-14-2005 06:04 PM
دروس في الفوتشوب والتعديل والتحمي Abu Shadi ريــشــة فنــآن 9 11-20-2005 11:52 AM
دروس امنية للمجاهدين فى الأعتقال والتحقيق ابومهدي الــوآحــة الـعــآمّــة 4 10-27-2005 12:07 PM
دروس امنية للمجاهدين فى الأعتقال والتحقيق ابومهدي الــوآحــة الـعــآمّــة 2 10-17-2005 12:12 PM


الساعة الآن 05:58 PM.