عرض مشاركة واحدة
قديم 02-08-2010, 03:20 PM   #8
متميزه
مراقبة عامة
 
الصورة الرمزية متميزه
افتراضي مشاركة: ساعدوني في حلو ل بعض الاسئلة

ابدأ بالترتيب


البرنامج اعطيته قيم لتخزن في المتغيرات A,B,C
A=4
B=6
C=10
بعدين اعطي قيم آخرى لتخزن في المتغير .. اذن تمسح القيمه القديمه وتخزن القيمه الجديده
A=B
A=C
راح يبقى بالبرنامج أخر قيمة تخزنت في المتغيرات A,B,C

عند طباعة Print للقيم A,B,C

ستكون النتيجة
10 7 10

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


الخطأ بالبرنامج حين اسندت قيمة عدديه في K=100 والمتغير k معرف على انه متغير نصي String

في التوضيح بالون الازرق اخطا حين ذكر ان المتغيرK ثابت حرفي بل هو متغير حرفي بدليل انه استخدم لتعريف Dim
------------------------

الخطأ في الصيغه

Dim X As Single
As تستخدم لربط اسم المتغير بنوعه اثناء تعريف المتغير

والصيغهDim Var As Type


Const B = 50
لتخزين القيمة 50 في الثابت B

وصيغة تعريف ثابت Const Const1 = Value

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


حلقات التكرار
المتغيرM يأخذ القيمة الاوليه للعد 10
الى القيمة النهائية للعد 50


بمقدار زيادة لدورة التكرار 20
ويطلب طباعة لقيمة المتغير M
Next انتهاء حلقة التكرار ... حتى لايستمر التكرار لكل اسطر البرنامج

فايكون سير البرنامج
المتغير يأخذ القيمة الاوليه للعد M=10
طباعة المتغيرM
10
انتهاء الحلقة
ليبدأ من جديد


المتغير يأخذ القيمة التالية باضافة مقدار الزياده M=10+20
طباعة المتغيرM
30
انتهاء الحلقة
ليبدأ من جديد


المتغير يأخذ القيمة التاليه للعد M=30+20
طباعة المتغيرM
50
انتهاء الحلقة
50 القيمة النهائيه للعد فايتوقف التكرار


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



كما ذكرنا في اول برنامج عند طلب طباعة متغير تتم الطباعة لأخر قيمة تخزنت فيه
المتغير A اخذ قيمة 10
بعد ذلك اخذ قيمة 8
عند طباعة قيمة المتغير A تكون النتيجة 8


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


عرف مصفوفه اسمها A وعدد عناصرها 3 ونوعها عدد صحيح

اعطى قيم المصفوفه الاول الثاني الثالث
10 8 4

طلب طباعة العنصر الاول والثالث

فكانت النتيجة 10 4


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


اعطى قيم المصفوفة وعددها 5

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

لكن مع حلقة التكرار نحتاج لتعريف متغير عددي يأخذ رقم العنصر

تبدأ الحلقة بـ صفر وتنتهي بـ عدد العناصر -1
For M = 0 TO 4


B (X تاخذ القيم B(0 , B(0+2 , B(2+2
B(0 , B(2 , B(4
القيمة النهائية للعد القيمة الاوليه للعد


ويتم التعويض عن كل من B(0 , B(2 , B(4
بقيم المصفوفه المخزنه سابقا


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

التعديل

انظر لنتيجة الاولى لانها القيمة الاوليه للعد السعوديه =B(2 قيم العد الاوليه 2
الاخيره لانها القيمة النهائية للعد الاردنيه = B(4 قيمة العد النهائية 4
النتائج الباقية لانها تساعدك في معرفة قيمة الزيادة المغربية = B(3 قيمة الزيادة 1 لان 2+1 = 3 القيمة الاوليه+ قيمة الزيادة
اما المتكرر (المملكة) فهو ثابت =B(0
التوقيع :
يارب لك الحمد حتى ترضى ولك الحمد إذا رضيت ولك الحمد بعد الرضا

التعديل الأخير تم بواسطة متميزه ; 02-08-2010 الساعة 05:13 PM
  رد مع اقتباس