اهلا وسهلا بك فى بوابة الثانوية العامة ... سجل الان

العودة   بوابة الثانوية العامة المصرية > القسم الإدارى > أرشيف المنتدي

أرشيف المنتدي هنا نقل الموضوعات المكررة والروابط التى لا تعمل

مشاهدة نتائج الإستطلاع: هل تريد البرنامج المقرر Visual Basic 2008 express
نعم أريدة وأحتاجة 74 86.05%
لا شكراً غير مهم 12 13.95%
المصوتون: 86. أنت لم تصوت في هذا الإستطلاع

 
 
أدوات الموضوع ابحث في الموضوع انواع عرض الموضوع
  #751  
قديم 16-05-2013, 12:14 PM
hany2014 hany2014 غير متواجد حالياً
عضو مشارك
 
تاريخ التسجيل: Jan 2013
المشاركات: 149
معدل تقييم المستوى: 12
hany2014 is on a distinguished road
افتراضي

هل يمكن استدعاء الاجراء قبل الاعلان عنه كما فى صفحة 85
  #752  
قديم 16-05-2013, 12:27 PM
الصورة الرمزية hassanalhawy
hassanalhawy hassanalhawy غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Sep 2010
المشاركات: 1,515
معدل تقييم المستوى: 15
hassanalhawy is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة hany2014 مشاهدة المشاركة
هل يمكن استدعاء الاجراء قبل الاعلان عنه كما فى صفحة 85
نعم يمكن . ولكن فى أول الأمر سوف ينبهك البرنامج إلى وجود خطأ من عدم وجود الإجراء الذى تم استدعاءه ، وبعد الإعلان عنه يزول هذا الخطأ
__________________
يخطئ من يظن أن للذئاب ديناً
  #753  
قديم 16-05-2013, 12:48 PM
نسر مصر نسر مصر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2008
المشاركات: 91
معدل تقييم المستوى: 16
نسر مصر is on a distinguished road
New سؤال جميل للجميع

اقرأالتعليمات التالية ثم أكمل العبارات التالية :
Dim x,Sum as integer
For X= 2 to 6 step 2
sum = sum+ x
If x < 4 Then
X= X+2
End If
Next

1- قيمة المتغير Sum تساوى ..........
2- قيمة المتغير X تساوى ........
3- قيمة التعبير X<4 فى المرة الثانية للتكرار تكون ..........
حاول تحل السؤال وهرفع الاجابة بعد تجميع اجابات الاخريين لتوضيحه
  #754  
قديم 16-05-2013, 12:57 PM
نسر مصر نسر مصر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2008
المشاركات: 91
معدل تقييم المستوى: 16
نسر مصر is on a distinguished road
New السؤال الثانى للجميع ( حاول المشاركة )

اقرأ التعليمات التالية ثم أكمل العبارات التالية
Dim X as integer = 2 ,Sum as integer
6=>Do While x
Sum =Sum + x
X=X+2
If Sum = 6 then Exit Do
Loop
Sum = Sum / 2

1- قيمة المتغير x تساوى ...........
2- قيمة المتغير Sum تساوى ...............
3- قيمة التعبير Sum = 6 فى المرة الثانية للتكرار تكون ..........
  #755  
قديم 16-05-2013, 01:12 PM
الصورة الرمزية hassanalhawy
hassanalhawy hassanalhawy غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Sep 2010
المشاركات: 1,515
معدل تقييم المستوى: 15
hassanalhawy is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة نسر مصر مشاهدة المشاركة
اقرأالتعليمات التالية ثم أكمل العبارات التالية :
Dim x,Sum as integer
For X= 2 to 6 step 2
sum = sum+ x
If x < 4 Then
X= X+2
End If
Next

1- قيمة المتغير Sum تساوى 8
2- قيمة المتغير X تساوى 8
3- قيمة التعبير X<4 فى المرة الثانية للتكرار تكون False
حاول تحل السؤال وهرفع الاجابة بعد تجميع اجابات الاخريين لتوضيحه
X.........Sum
========
0..............0 ............
Dim x,Sum as integer
0..............2 ............ For X= 2 to 6 step 2
2..............2 ............ sum = sum+ x
2..............2 ............ If x < 4 Then ناتج الشرط True
2..............4 ............X= X+2
2..............6 ............ For X= 2 to 6 step 2
8..............6 ............ sum = sum+ x
8..............6 ............ If x < 4 Then ناتج الشرط False
8..............8 ............ For X= 2 to 6 step 2
ثم يتم الخروج من الحلقة التكرارية وتنفيذ ما يلى Next
ملحوظة : يتم زيادة قيمة متغير الحلقة بعد الوصول للأمر For وليس Next
__________________
يخطئ من يظن أن للذئاب ديناً
  #756  
قديم 16-05-2013, 02:05 PM
الصورة الرمزية hassanalhawy
hassanalhawy hassanalhawy غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Sep 2010
المشاركات: 1,515
معدل تقييم المستوى: 15
hassanalhawy is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة نسر مصر مشاهدة المشاركة
اقرأ التعليمات التالية ثم أكمل العبارات التالية
Dim X as integer = 2 ,Sum as integer
6=>Do While x
Sum =Sum + x
X=X+2
If Sum = 6 then Exit Do
Loop
Sum = Sum / 2

1- قيمة المتغير x تساوى 6
2- قيمة المتغير Sum تساوى 3
3- قيمة التعبير Sum = 6 فى المرة الثانية للتكرار تكون True
X.........Sum
========
0..............2 ............
Dim X as integer = 2 ,Sum as integer
0..............2 ............6=>Do While x ناتج الشرط True
2..............2 ............ sum = sum+ x
2..............4 ............X= X+2
2..............4 ............If Sum = 6 Then Exit Do ناتج الشرط False
2..............4 ............6=>Do While x ناتج الشرط True
6..............4 ............ sum = sum+ x
6..............6 ............X= X+2
6..............6 ............
If Sum = 6 Then Exit Do ناتج الشرط True ثم يتم الخروج من الحلقة التكرارية وتنفيذ ما يلى Loop
3..............6 ............ Sum = Sum / 2
__________________
يخطئ من يظن أن للذئاب ديناً
  #757  
قديم 16-05-2013, 02:56 PM
نسر مصر نسر مصر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2008
المشاركات: 91
معدل تقييم المستوى: 16
نسر مصر is on a distinguished road
افتراضي

بارك الله فيك
  #758  
قديم 16-05-2013, 03:29 PM
نسر مصر نسر مصر غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Oct 2008
المشاركات: 91
معدل تقييم المستوى: 16
نسر مصر is on a distinguished road
افتراضي

بارك الله قيك . على ما اعتقد الامور مش عاوزه شرح منى بقى
بس أنا لى تحفظ على جملةيتم زيادة قيمة متغير الحلقة بعد الوصول للأمر For وليس next

لان وظيفة الامر Next زيادة العداد بمقدار خطوة التزايد ثم الرجوع لبداية الحلقة التكرارية والامور تكون واضحة أثناء التحويل بين الأمر For....next والامر Dowhile....loop
  #759  
قديم 16-05-2013, 05:18 PM
الصورة الرمزية hassanalhawy
hassanalhawy hassanalhawy غير متواجد حالياً
مــٌــعلــم
 
تاريخ التسجيل: Sep 2010
المشاركات: 1,515
معدل تقييم المستوى: 15
hassanalhawy is on a distinguished road
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة نسر مصر مشاهدة المشاركة
بارك الله قيك . على ما اعتقد الامور مش عاوزه شرح منى بقى
بس أنا لى تحفظ على جملةيتم زيادة قيمة متغير الحلقة بعد الوصول للأمر for وليس next

لان وظيفة الامر next زيادة العداد بمقدار خطوة التزايد ثم الرجوع لبداية الحلقة التكرارية والامور تكون واضحة أثناء التحويل بين الأمر for....next والامر dowhile....loop
ما تقوله حضرتك يتوافق مع ما هو موجود بالكتاب
ولكن الحقيقة كما هى فى موقع ميكروسوفت هى كما ذكرتها شئ آخر وهناك أكثر من ذلك
__________________
يخطئ من يظن أن للذئاب ديناً
  #760  
قديم 16-05-2013, 06:29 PM
hany2014 hany2014 غير متواجد حالياً
عضو مشارك
 
تاريخ التسجيل: Jan 2013
المشاركات: 149
معدل تقييم المستوى: 12
hany2014 is on a distinguished road
افتراضي

حد ممكن يفهمنى حل السؤال الثالث رقم 1 فى نموزج اختبار رقم 1
حدد قيمه كل متغير بعد تنفيذ الكود
1 – حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :
المتغير
القيمة
C
11
K
7
N
11
Dim N, K, C As Integer
C = 10For N = 1 To 10 Step 5 K = K + N
Next
IF N >= C Then
C = C + 1
End IF


  #761  
قديم 16-05-2013, 08:54 PM
محمد أبوطالب محمد أبوطالب غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Jan 2013
المشاركات: 67
معدل تقييم المستوى: 12
محمد أبوطالب is on a distinguished road
Impp من فضلكم ممكن حل هذة المسالة

قيمة m عند انتهاء الحلقة ( for m = 2 to 10 )




ممكن من فضلكم تفهمونى حلها بيجى ازاى
  #762  
قديم 16-05-2013, 09:30 PM
a_awady a_awady غير متواجد حالياً
عضو مجتهد
 
تاريخ التسجيل: Dec 2010
المشاركات: 95
معدل تقييم المستوى: 14
a_awady is on a distinguished road
افتراضي

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

فتكون قيم m هي 2 و 3 و 4 و 5 و 6 و 7 و 8 و 9 و 10 و 11

أي أن القيمة النهائية للمتغير m هي 11 لانه عندها يخرج البرنامج من التكرار و يتوقف التكرار
  #763  
قديم 16-05-2013, 09:46 PM
أحمد هاشم الزيدي أحمد هاشم الزيدي غير متواجد حالياً
معلم حاسب ألى
 
تاريخ التسجيل: Feb 2009
المشاركات: 14,976
معدل تقييم المستوى: 30
أحمد هاشم الزيدي will become famous soon enough
افتراضي

اقتباس:
المشاركة الأصلية كتبت بواسطة a_awady مشاهدة المشاركة
قيمة المتغير m في كل مره تتزايد بمقدار خطوة التزايد و التي لم يتم كتابتها فتصبح بالتالي خطوة التزايد مقدارها 1
و هذا يعني ان في كل مره يتم زيادة قيمة المتغير m بمقدار 1

فتكون قيم m هي 2 و 3 و 4 و 5 و 6 و 7 و 8 و 9 و 10 و 11

أي أن القيمة النهائية للمتغير m هي 11 لانه عندها يخرج البرنامج من التكرار و يتوقف التكرار
بارك الله فيك علي هذا التوضيح
__________________
كفي بالله سندا وكفي به هاديا وحبيبا وكفي به معطيا وكفي بالله عن كل شئ
  #764  
قديم 17-05-2013, 08:06 AM
الصورة الرمزية Smile To Live
Smile To Live Smile To Live غير متواجد حالياً
عضو ممتاز
 
تاريخ التسجيل: Jan 2012
المشاركات: 295
معدل تقييم المستوى: 13
Smile To Live is on a distinguished road
افتراضي الرجاء اجابة هذه الاسئلة ضرووووووورى

صح ام خطأ
يمكن تحويل نوع البيان string الى single تحويلا ضمنيا
كيف نحصل على عدد مرات التكرار مثلا
for n=1 to 10 step 2 هل عدد مرات التكرار هنا 6؟
المتغير الذى يعلن عنه داخل الاجراء يسمى ........
(global variable - local variable - middle variable - لا شىء مما سبق )
الشرط فى Do While .......Loop هو شرط ......
( استمرار التكرار _ نهاية التكرار _التفرع المشروط- التفرع غير المشروط )
ارجو شرح كيفية تحويل الجمل من for .....next الى do while ......loop
وسيلة تستخدم لجعل text box هى المستخدمة حاليا
__________________
ولعل ماتخشاه ليس بكائن .... ولعل ماترجوه سوف يكون
ولعل ماهونت ليس بهين .... ولعل ما شددت يوف يهون
  #765  
قديم 17-05-2013, 09:26 AM
مصر فى قلبى مصر فى قلبى غير متواجد حالياً
عضو جديد
 
تاريخ التسجيل: Feb 2012
المشاركات: 3
معدل تقييم المستوى: 0
مصر فى قلبى is on a distinguished road
افتراضي

شكرا استاذ تامر
 

العلامات المرجعية

الكلمات الدلالية (Tags)
أبوزياد, اتفة الفصل الرابع وورد, شرح الترم الثاني فيديو


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

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

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


جميع الأوقات بتوقيت GMT +2. الساعة الآن 07:21 PM.