بوابة الثانوية العامة المصرية

بوابة الثانوية العامة المصرية (https://www.thanwya.com/vb/index.php)
-   أرشيف المنتدى (https://www.thanwya.com/vb/forumdisplay.php?f=513)
-   -   انت تسأل وجميع الاساتذة تجيب (https://www.thanwya.com/vb/showthread.php?t=305990)

سيف سالم 09-04-2011 06:44 PM

انت تسأل وجميع الاساتذة تجيب
 
اي سؤال يمكن
وضعه هنا
وان شاء الله تجد الاجابة

روزبان 09-04-2011 07:11 PM

s=s+5 صحيحة كمعادلة رياضية ولكنها غير صحيحة كأمر تخصيص ( )

ناروتو الشبح 09-04-2011 07:26 PM

الذى واقف عليه هو حد يفهمنى

الامر For ... Next ، برجاء المشاركة

بالتفصيل مش عارف احل مسأله واحده

esraa ashraf 2013 09-04-2011 08:12 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة روزبان (المشاركة 3310139)
s=s+5 صحيحة كمعادلة رياضية ولكنها غير صحيحة كأمر تخصيص ( )


الاجابة خطأ
لان s=s+5 فعلا امر تخصيص
انما لو معادله رياضيه هتبقى كدة


s+5 =s

أحـمد قرنى 09-04-2011 08:42 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة ناروتو الشبح (المشاركة 3310189)
الذى واقف عليه هو حد يفهمنى

اقتباس:

المشاركة الأصلية كتبت بواسطة ناروتو الشبح (المشاركة 3310189)

الامر For ... Next ، برجاء المشاركة

بالتفصيل مش عارف احل مسأله واحده




شرح الامر For … Next

المفهوم
يستخدم فى معرفة عدد مرات التكرار مسبقاً

الشكل العام
For Counter = Start To End Step Increament

Counter : متغير عددى يتحكم فى عدد مرات تنفيذ الاوامر
Start : القيمة الابتدائية للعداد .
End : القيمة النهائية للعداد .
Step Increament : معدل الزيادة
كلمة step اختيارية فى حالة عدم استعمالها فان العداد يويد تلقائياً بمقدار 1 .
يجب أن تكون القيمة الابتدائية أقل من او تساوى القيمة النهائية للعداد حتى يستمر التكرار .
بينما عندما تكون القيمة الابتدائية اكبر من القيمة النهائية يتوقف التكرار .

الامثلة
هناك العديد من انواع الامثلة على الامر For … Next .

النوع الاول
غير قيم العداد I بالترتيب الاتى :
( 2 ، 4 ، 6 ، 8 ، 10 )
الحل
نلاحظ فى المثال السابق ان القيمة الابتدائية للعداد هى 2 والقيمة النهائية هى 10 ومعدل الزيادة 2 .
فيكون الامر كاتالى
For I = 2 to 10 Step2

مثال آخر
غير قيم العداد I بالترتيب الاتى :
( 11 ، 8 ، 5 ، 2 )
الحل
نلاحظ ان القيمة الابتدائية للعداد هى 11 والقيمة النهائية للعداد هى 2 والعداد ينقص بمقدار 3
فيكون الامر كالتالى :
For I = 11 to 2 Step -3

مثال آخر
غير قيم العداد I بالترتيب الاتى :
( 1 ، 2 ، 3 ، 4 ، 5 ، 6 )
الحل
نلاحظ ان القيمة الابتدائية للعداد هى 1 والقيمة النهائية للعداد هى 6 والعداد يزيد بمقدار 1
فيكون الامر كالتالى :
For I = 1 to 6 Step 1
ويمكن كتابة الامر كالتالى
For I = 1 to 6
نلاحظ عدم كتابة كلمة step وذلك لان العداد يزيد بمقدار 1 ، وكما ذكرنا سابقاً ان عدم ذكر كلمة step تجعل العداد يزيد تلقائياً بمقدار 1 .

النوع الثانى من الامثلة
فى الامر التالى اذكر عدد مرات التكرار
For I = 2 to 8 step2
عدد مرات التكرار 4 مرات
وذلك لأن العداد يكرر كالتالى 2 ثم يزداد بمقدار 2 فتكون القيم كالتالى
2 ، 4 ، 6 ، 8

مثال آخر
For I = 1 to 12 step4
وضح عدد مرات التكرار

الحل
عدد مرات التكرار ثلاث مرات
وذلك لان العداد يكرر كالتالى القيمة الابتدائية 1 ثم يزيد العداد بمقدار4
فتكون القيم كالتالى
1 ، 5 ، 9
نلاحظ عدم وصول العداد للقيمة 12 وذلك لان العداد يزيد بمقدار 4 فالمستحيل أن يصل لها بل سيصل الى القيمة 13 ولن يتم احتسابها داخل مرات التكرار لانها اكبر من القيمة النهائية


أحـمد قرنى 09-04-2011 08:43 PM

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

سيف سالم 09-04-2011 10:34 PM

للاسف لأ
ولكن كثير من الاساتذة الافاضل

ناروتو الشبح 10-04-2011 05:42 AM

ممممممششششششششكككككووووووورررررررر

والله ما فهمته الا منك

كثير يا استاذ أحـمد قرنى


اتمنى التكمله مع وجود اسئلة من الامتحانات السابقه

ناروتو الشبح 10-04-2011 06:30 AM

ومن فضلك اشرح لى المسأله


x = 4

for i =0 to 7 step 3

x = x * 2

next


يتوقف التكرار عندما تكون قيمة المتغير i هى ................


هذا السوال من عملك ومممشششششششكوووورررررر


مره اخر

رحابالله 10-04-2011 08:27 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة ناروتو الشبح (المشاركة 3311490)
ومن فضلك اشرح لى المسأله


x = 4

for i =0 to 7 step 3

x = x * 2

next


يتوقف التكرار عندما تكون قيمة المتغير i هى ................


هذا السوال من عملك ومممشششششششكوووورررررر


مره اخر

يتوقف التكرار عندما تكون قيمة i هي 6 حيث ان قيم
i = ( 0 , 3 ,6 )

روزبان 10-04-2011 11:11 AM

لوسمحت عايزة اجابة لسؤالى السابق

أحـمد قرنى 10-04-2011 11:12 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة ناروتو الشبح (المشاركة 3311490)
ومن فضلك اشرح لى المسأله


x = 4

for i =0 to 7 step 3

x = x * 2

next


يتوقف التكرار عندما تكون قيمة المتغير i هى ................


هذا السوال من عملك ومممشششششششكوووورررررر


مره اخر

يتوقف التكرار عندما تكون قيمة المتغير i = 9

الشرح
القيمة الابتدائية للمتغير i =0 نجد انها تكون اقل من القيمة النهائية 7 لذلك يتم التكرار .
- نقوم بتكرار الامر x = x * 2 .
- بالتعويض عن قيمة x بالقيمة 4 نجد ان قيمة المتغير x = 8 .
- عندما يصل البرنامج لكلمة next يعود مرة اخرى لزيادة العداد وتقييم الشرط .

نقوم بزيادة العداد بمقدار 3 فتصبح قيمة i=3 نجد انها اقل من القيمة النهائية 7 لذلك يتم التكرار .
- نقوم بتكرار الامر x = x * 2 .
- بالتعويض عن قيمة x بالقيمة الاخيرة 8 نجد ان قيمة المتغير x = 16 .
- عندما يصل البرنامج لكلمة next يعود مرة اخرى لزيادة العداد وتقييم الشرط .

نقوم بزيادة العداد بمقدار 3 فتصبح قيمة i=6 نجد انها اقل من القيمة النهائية 7 لذلك يتم التكرار .
- نقوم بتكرار الامر x = x * 2 .
- بالتعويض عن قيمة x بالقيمة الاخيرة 16 نجد ان قيمة المتغير x = 32 .
- عندما يصل البرنامج لكلمة next يعود مرة اخرى لزيادة العداد وتقييم الشرط .


نقوم بزيادة العداد بمقدار 3 فتصبح قيمة i=9 نجد انها اكبر من القيمة النهائية 7 لذلك يتوقف البرنامج عن التكرار.


مما سبق ذكر
قيم المتغير i هى 0 , 3 , 6 , 9
قيم المتغير x هى 8 , 16 , 32

ويتوقف التكرار عندما تكون قيمة المتغير i = 9 لانها اكبر من القيمة النهائية

أحـمد قرنى 10-04-2011 11:16 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة روزبان (المشاركة 3310139)
s=s+5 صحيحة كمعادلة رياضية ولكنها غير صحيحة كأمر تخصيص ( )

إجابة غير صحيحة
لانها صحيحة كأمر تخصيص لوجود اسم المتغير على اليسار والقيمة على اليمين

وغير صحيحة كمعادلة رياضية لوجود متغيرين من نوع واحد s فى المسألة ، ولو غير المتعير s كالتالى s = y + 5 فى هذه الحالة تصلح كمعادلة رياضية وكأمر تخصيص .

ناروتو الشبح 10-04-2011 12:01 PM

سؤال ارجو الجابه


1- عند تخزين القيمه (12345.768) فى متغيرين من النوع integer , single ثم استرجاع قيمه كل متغير فان


singleب- قيمه المتغير من النوع تكون( 12345.768 - 12345-12345.76 )

مع الشرح ؟؟؟؟؟؟؟؟؟؟؟؟


ومشكور على الشرح الجميل

ناروتو الشبح 10-04-2011 12:30 PM

والسؤال الاهم هو

( ب ) أقرأ التعليمات الاتيه ثم أجب عن الاسئله التاليه
Dim First as integer =20 , Second as integer=40
Dim Third as integer = First + Second
Dim Total as integer
If Third <=50 Then
Total= First + Second+ Third
Else
First=30
Second=50
Total= First + Second+ Third
End If
1- قيمة المتغير First = .........
2- قيمة المتغير Second = .........
3- قيمة المتغير Total = .........
4- قيمة التعبير Third <= 50 هى ........
ممممششششكوووررر لك كثيرا

وارجوا ان تعمل موضوع فيه الاسأله والشرح
انا على نفسى مش فاهم الا منك



أحـمد قرنى 10-04-2011 12:39 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة ناروتو الشبح (المشاركة 3311897)
سؤال ارجو الجابه


1- عند تخزين القيمه (12345.768) فى متغيرين من النوع integer , single ثم استرجاع قيمه كل متغير فان


singleب- قيمه المتغير من النوع تكون( 12345.768 - 12345-12345.76 )

مع الشرح ؟؟؟؟؟؟؟؟؟؟؟؟


ومشكور على الشرح الجميل

المتغير single متغير عددى خاص بتخزين الاعداد الكسرية بدقة 7 خانات ( 7 أرقام )
فالاجابة الصحيحة هى 12345.76 حضرتك قم بعد الارقام ستجدهم سبعة أرقام

بينما المتغير integer متغير عددى صحيح لا يخزن إلا الاعداد الصحيحة فقط
فسيقوم بتخزين الرقم 12345

أحـمد قرنى 10-04-2011 12:49 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة ناروتو الشبح (المشاركة 3311950)
والسؤال الاهم هو

( ب ) أقرأ التعليمات الاتيه ثم أجب عن الاسئله التاليه


Dim First as integer =20 , Second as integer=40





Dim Third as integer = First + Second





Dim Total as integer





If Third <=50 Then





Total= First + Second+ Third





Else





First=30





Second=50





Total= First + Second+ Third





End If



1- قيمة المتغير First = .........
2- قيمة المتغير Second = .........
3- قيمة المتغير Total = .........
4- قيمة التعبير Third <= 50 هى ........
ممممششششكوووررر لك كثيرا

وارجوا ان تعمل موضوع فيه الاسأله والشرح
انا على نفسى مش فاهم الا منك


حضرتك فى هذا النوع من الامثلة يجب معرفة ناتج الشرط الذى يلى كلمة if وهو Third <=50 فإذا كانت قيمة الشرط صحيحة ( true ) يتم تنفيذ الاوامر التى تلى كلمة then .
بينما إذا كانت قيمة الشرط false غير صحيحة يتم تنفيذ الاوامر التى تلى كلمة else .

نرجع نقيم الشرط Third <=50
طبعاً قيمة third هى Dim Third as integer = First + Second
بالتعويص فى المعادلة عن قيمة first = 40 وعن قيمة second = 20
نجد ان قيمة third = 60
يعنى الشرط Third <=50 قيمته غير صحيحة ) false (فيتم تنفيذ الاوامر التى تلى كلمة else

وبالتالى انظر الى قيم المتغيرات المطلوبة بعد كلمة else
1- قيمة المتغير First =30
2- قيمة المتغير Second = 50
3- قيمة المتغير Total =140
Total= First + Second+ Third
بالتعويض عن قيمة first = 30 وقيمة second = 50 وقيمة third = 60
4- قيمة التعبير Third <= 50 هىfalse كما ذكرنا سابقاً

ابو محمد 2 10-04-2011 03:59 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة أحـمد قرنى (المشاركة 3311969)
المتغير single متغير عددى خاص بتخزين الاعداد الكسرية بدقة 7 خانات ( 7 أرقام )
فالاجابة الصحيحة هى 12345.76 حضرتك قم بعد الارقام ستجدهم سبعة أرقام

بينما المتغير integer متغير عددى صحيح لا يخزن إلا الاعداد الصحيحة فقط
فسيقوم بتخزين الرقم 12345

الاختيارات بها خطأ
حيث مع المتغير single سوف يتم التقريب لتصبح 12345.77
ومع المتغير integer سوف التقريب لتصبح 12346
ولكم جزيل الشكر

أحـمد قرنى 10-04-2011 04:36 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة ابو محمد 2 (المشاركة 3312505)
الاختيارات بها خطأ
حيث مع المتغير single سوف يتم التقريب لتصبح 12345.77
ومع المتغير integer سوف التقريب لتصبح 12346
ولكم جزيل الشكر

الاختيارات صحيحة كما أتت بالامتحان ( امتحان الدقهلية 2010 )

ابو محمد 2 10-04-2011 08:14 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة أحـمد قرنى (المشاركة 3312599)
الاختيارات صحيحة كما أتت بالامتحان ( امتحان الدقهلية 2010 )

بداية أنا لأشكك في إجابتك أخي أحمد قرني
ولكن عند وضع الرقم في 12345.768 المتغيرين singel و integer سوف يقوم البرنامج بالتقريب وهذا الكود يوضح ذلك
Dim a As Integer, b As Single
a = 12345.768
b = 12345.768
(MsgBox (a
(MsgBox(b
ولكم جزيل الشكر

mohamoud mohamed 10-04-2011 09:49 PM

السلام عليكم
النهايه الصغري في الحاسب من كام

redrose37 10-04-2011 10:18 PM

برجاء سرعة إجابة هذا الشؤال:
السؤال السابع الفصل الثالث كتاب الوزارة صفحة 125
صف المخرجات الناتجة من تنفيذ مجموعة الاوامر الآتية

For I= 0 To 7
If ( i mod 2 = 0 ) then
MsgBox( i + 1 )
Elself ( i Mod 3+ 0) Then
MsgBox( i *i)
Elself (i Mod 5= 0) then
msgBox(2 *i - 1 )
Else
MsgBox(i)
Evd If
NEXT

راغب المصري 11-04-2011 12:17 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة redrose37 (المشاركة 3313631)
برجاء سرعة إجابة هذا الشؤال:
السؤال السابع الفصل الثالث كتاب الوزارة صفحة 125
صف المخرجات الناتجة من تنفيذ مجموعة الاوامر الآتية

For I= 0 To 7
If ( i mod 2 = 0 ) then
MsgBox( i + 1 )
Elself ( i Mod 3+ 0) Then
MsgBox( i *i)
Elself (i Mod 5= 0) then
msgBox(2 *i - 1 )
Else
MsgBox(i)
Evd If
NEXT

اولا هنقول i بتساوي كام
i = 0.1.2.3.4.5.6.7
بعد كده هنقول هو امتى باقى قسمة i مع 2 = صفر
في حالة i = 2 . 4 . 6 بعد كده نقول

عند i =2 تظهر رسالة 3 وعند i = 4 تظهر رسالة 5 و عند i = 6 تظهر رسالة 7 ------------------------ i+1
بعد كده هنقول امتى باقى قسمة i مع 3 = صفر
في حالة i = 3 . 6 بعد كده نقول

عند i = 3 تظهر رسالة محتواها 9 وعند i = 6 تظهر رسالة محتواها 36 ------------------ i*i
بعد كده نقول امتى باقى قسمة i على 5 = صفر
في حالة i = 5 بعد كده نقول

عند i = 5 تظهر رسالة محتواها 9 -----------------1-2*5

سيف سالم 11-04-2011 12:52 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة mohamoud mohamed (المشاركة 3313499)
السلام عليكم
النهايه الصغري في الحاسب من كام

10
عشرة درجات

hamada 444x 11-04-2011 07:50 PM

ممكن سؤال انا عندى برنامج فيجوال بيسك 6 لكن مش عارف
اتعامل مع الكود
مثلا
موجود فى التول بوكس العادى button
لكن مكتوب عندى common button
وكل ما اكتب الاكواد الخاصة بالكتاب
يظهر لى رسالة خطأ من الكومبيلر

سيف سالم 11-04-2011 09:49 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة hamada 444x (المشاركة 3315958)
ممكن سؤال انا عندى برنامج فيجوال بيسك 6 لكن مش عارف
اتعامل مع الكود
مثلا
موجود فى التول بوكس العادى button
لكن مكتوب عندى common button
وكل ما اكتب الاكواد الخاصة بالكتاب
يظهر لى رسالة خطأ من الكومبيلر

vb6 ليس هو المقرر
ولكن vbnet2005

mohamoud mohamed 12-04-2011 12:14 AM

جزاك الله خير

خلود فوزى 12-04-2011 10:55 AM

Dim N, K, C As Integer
C= 5

For N = 1 To 4
K = K + N
Next
If N > C Then
C = C + 1
End If

بعد تنفيِذ الكود يكون
1. قيمة المتغير C هى (5 - 6 - 8)
2. قيمة المتغير K هى (0 - 10 - 9)

أحـمد قرنى 12-04-2011 01:13 PM

Dim N, K, C As Integer
C= 5

For N = 1 To 4
K = K + N
Next
If N > C Then
C = C + 1
End If

بعد تنفيِذ الكود يكون
1. قيمة المتغير C هى (5 - 6 - 8)
2. قيمة المتغير K هى (0 - 10 - 9)

edutec169 13-04-2011 04:13 PM

مهم جداً
 
عند تنفيذ امر التخصيص

هل يتم احتساب قيم التعبير علي يمين العلامة في التوقيت
1) بعد تنفيذ التخصيص
2) قبل تنفيذ التخصيص
3) في نفس توقيت التخصيص
4) في توقيت آخر


مع توضيح السبب

راغب المصري 13-04-2011 07:29 PM

الاجابة قبل تنفيذ التخصيص
والسبب انه لابد من تخصيص قيمة للمتغير ولو حتى افتراضية
مثل Dim X as Integer
قيمة X = 0
بعدها ممكن نقول X -= 5

fatma sherif 14-04-2011 12:08 AM

الوقتي أمر التخصيص ( الاحلال ) يستخدم لتخزين البيانات داخل المتغيرات والصيغة العامة للأمر
قيمة = اسم المتغير
وقلنا ان ممكن تكون القيمة التي سوف تخزن داخل المتغير إما أن تكون قيمة مجردة مثال x=4
أو تكون قيمة متغير آخر
مثال : إذا كان y=3 فإن x=y معناها هيقرأ القيمة المخزنة في y وهي 3 ثم يقوم بتخزينها داخل المتغير x يبقى القيمة 3 ناتجة عن قيمة متغير آخر
وقلنا ممكن تكون القيمة المخزنة داخل المتغيرات ناتجة عن عملية حسابية
مثال : إذا كان y=4 وكان x=y+1 هنا القيمة التي ستخزن داخل المتغير x هي هيقرأ القيمة المخزنة في المتغير y اللي هي 3 ثم يجمعها على 1 يكون الناتج 4 ثم بعد ذلك 4 دي تخزن داخل المتغير x
يبقي هنا تم احتساب التعبير الموجود على يمين اليساوي قبل عملية التخصيص
يبقى الاجابة الصحيحة قبل تنفيذ التخصيص
لان معنى التخصيص هو تخزين البيان داخل المتغير

medo10000 15-04-2011 09:43 AM

التعبير الذى يستخدم للاعلان عن ثلاثة متغيرات من النوع integer ومتغيرين من النوع string هى :



Dim N1,N2,N3 As Integer , S1,S2 As String (أ

ب) Dim N1,N2,N3 As Integer
Dim S1,S2 As String

Dim N1 As Integer (ج
Dim N2 As Integer
Dim N3 As Integer
Dim S1 As String
Dim S2 As String

د) كل من أ و ج

ليه الاجابة أ و ج هما مش التلات اجابات صح

سيف سالم 15-04-2011 10:27 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة medo10000 (المشاركة 3325609)
التعبير الذى يستخدم للاعلان عن ثلاثة متغيرات من النوع integer ومتغيرين من النوع string هى :



Dim N1,N2,N3 As Integer , S1,S2 As String (أ

ب) Dim N1,N2,N3 As Integer
Dim S1,S2 As String

Dim N1 As Integer (ج
Dim N2 As Integer
Dim N3 As Integer
Dim S1 As String
Dim S2 As String

د) كل من أ و ج

ليه الاجابة أ و ج هما مش التلات اجابات صح

في هذا السؤال ا و ب و ج صح
بس السؤال مش كدا
بالنسبة لرقم ا

Dim N1,N2,N3 As Integer , Dim S1,S2 As String

وجود كلمتين dim في الامر الواحد خطأ

أحـمد قرنى 15-04-2011 02:09 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة medo10000 (المشاركة 3325609)
التعبير الذى يستخدم للاعلان عن ثلاثة متغيرات من النوع integer ومتغيرين من النوع string هى :



Dim n1,n2,n3 as integer , s1,s2 as string (أ

ب) dim n1,n2,n3 as integer
dim s1,s2 as string

dim n1 as integer (ج
dim n2 as integer
dim n3 as integer
dim s1 as string
dim s2 as string

د) كل من أ و ج

ليه الاجابة أ و ج هما مش التلات اجابات صح

الثلاث إجابات صحيحة كما ذكرت
وتم تعديل الاختيار رقم ( د ) الى جميع ما سبق فى الطبعة الحديثة للكتاب المدرسى

medo10000 16-04-2011 01:53 AM

متشكر جدا وجزاكم الله خيرا

الأستاذة / أم أمل 16-04-2011 03:36 AM

جزاكم الله خبرا

ahmed_aboelkher 17-04-2011 06:41 PM

Dim N, K, C As Integer
C= 5

For N = 1 To 4
K = K + N
Next
If N > C Then
C = C + 1
End If

بعد تنفيِذ الكود يكون
1. قيمة المتغير C هى (5 - 6 - 8)
2. قيمة المتغير K هى (0 - 10 - 9)



ممكن شرح المسئلة ده لان هى مش مفهومه شويه

سيف سالم 17-04-2011 08:23 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة ahmed_aboelkher (المشاركة 3332912)
Dim N, K, C As Integer
C= 5

For N = 1 To 4
K = K + N
Next
If N > C Then
C = C + 1
End If

بعد تنفيِذ الكود يكون
1. قيمة المتغير C هى (5 - 6 - 8)
2. قيمة المتغير K هى (0 - 10 - 9)



ممكن شرح المسئلة ده لان هى مش مفهومه شويه

C= 5
يتم حجز مكان بالذاكرة اسمه c ويوضع به القيمة 5

For N = 1 To 4
يتم حجز مكان بالذاكرة اسمه N ويوضع به القيمة 1
وهذه القيمة لم تصل لبعد نهاية العداد N اللي هي 4 فيتم الانتقال الى الامر التالي
K = K + N

يجمع قيمة K اللي هي صفر على قيمة N اللي هي 1
فيكون المجوع 1 ويوضع في المكان K وتصبح K قيمتها 1

Next
يتم زيادة العداد N بالقيمة 1 لتكون 2
وهذه القيمة لم تصل لبعد نهاية العداد N اللي هي 4 فيتم الانتقال الى الامر التالي
K = K + N

يجمع قيمة K اللي هي 1على قيمة N اللي هي 2
فيكون المجوع 3 ويوضع في المكان K وتصبح K قيمتها 3
وينتقل الي

Next

يتم زيادة العداد N بالقيمة 1 لتكون 3
وهذه القيمة لم تصل لبعد نهاية العداد N اللي هي 4 فيتم الانتقال الى الامر التالي
K = K + N

يجمع قيمة K اللي هي 3على قيمة N اللي هي 3
فيكون المجوع 6 ويوضع في المكان K وتصبح K قيمتها 6
وينتقل الي


Next

يتم زيادة العداد N بالقيمة 1 لتكون 4
وهذه القيمة لم تصل لبعد نهاية العداد N اللي هي 4 فيتم الانتقال الى الامر التالي
K = K + N

يجمع قيمة K اللي هي 6على قيمة N اللي هي 4
فيكون المجوع 10 ويوضع في المكان K وتصبح K قيمتها 10
وينتقل الي



Next

يتم زيادة العداد N بالقيمة 1 لتكون 5
وهذه القيمة تصل لبعد نهاية العداد N اللي هي 4 فيتم الانتقال الى الامر ما بعدNext

If N > C Then
يقارن قيمة N اللي هي 5 بالقيمة C اللي هي 5 فلا تكون اكبر ويكون نتيجة الشرط False فيذهب الى ما بعد

End If

ويتوقف البرنامج

ويكون اخر قيم هي
c=5
N=5
K=10

زياد_عاطف 18-04-2011 08:34 AM

اقتباس:

المشاركة الأصلية كتبت بواسطة ابو محمد 2 (المشاركة 3312505)
الاختيارات بها خطأ
حيث مع المتغير single سوف يتم التقريب لتصبح 12345.77
ومع المتغير integer سوف التقريب لتصبح 12346
ولكم جزيل الشكر

================================================
تمااااااااااااااااااااااااام الاختيارات بها خطأ حيث سيتم التقريب عند فقد أرقام
عاطف مهدى حسان

ابو محمد 2 18-04-2011 09:06 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة زياد_عاطف (المشاركة 3334471)
================================================
تمااااااااااااااااااااااااام الاختيارات بها خطأ حيث سيتم التقريب عند فقد أرقام
عاطف مهدى حسان

جزاك الله خيرا مع خالص وأرق تحياتي

mrk206 19-04-2011 08:35 PM

اقتباس:

المشاركة الأصلية كتبت بواسطة أحـمد قرنى (المشاركة 3317486)
dim n, k, c as integer
c= 5

for n = 1 to 4
k = k + n
next
if n > c then
c = c + 1
end if

بعد تنفيِذ الكود يكون
1. قيمة المتغير c هى (5 - 6 - 8)
2. قيمة المتغير k هى (0 - 10 - 9)


انا اول مرة بصراحة اشوف ان عداد يتحسب مع قيمة متغير ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

كان المفروض واضع السؤال يضع مثلا k=k+1 او اي رقم

ahmed_aboelkher 20-04-2011 08:49 AM

شكرااااااااااااااااااا للاستاذ الفاضل / سيف سالم على المجهود وربنا يجعله دائما فى ميزان حسناتك يارب

magy19810 20-04-2011 09:09 AM

جزاك الله خيرا

احمد 720 20-04-2011 06:35 PM

من المعروف ان لو عندى عملية حسابية لها نفس الاولوية بيكون ترتيب تنفيذها من اليسار الى اليمين
طيب لو اتت مكتوبة بالعربى كالاتى
8*2/4

ممكن الاجابة مع التوضيح

ابو محمد 2 20-04-2011 08:50 PM

من اليمين الى اليسار لانها مكتوبة باللغة العربية و سوف تقرأ من اليمين
ومن اليسار لليمين لو كانت مكتوبة باللغة الانجليزية
سوف يكون الناتج 4 في كلتا الحالتين
ويجب مراعاة أولويات تنفيذ العمليات الحسابية سواء كانت مكتوبة بالعربي أو الانجليزي


bolbola101 22-04-2011 01:11 AM

الف شكر استاذنا سيف على المجهود الرائع بجد سا عدتنى كتييرفى
امر Next.......For وفهمت حل المسائل الخاصه بالجزء ده
بس يا ريت حضرتك تشرح مسأله الكتاب بأسلوب حضرتك الرائع السهل الممتنع
صفحه125 معلش الشرح مش واضح شويه
وجزاك الله خيرا

saharelsafty 22-04-2011 03:29 PM

الرجا توضيح اجابة السؤال الاتى:-
يتم احتساب قيمة التعبير الموجود على يمين علامة"=" فى التوقيت الاتى:
أ- بعد تنفيذ التخصيص
ب- قبل تنفيذ التخصيص
جـ- فى نفس توقيت التخصيص
د- فى توقيت أخر غير التوقيتات المذكورة
اى اختيار اصح أ - أم ب -أم جـ - أم د
الرجا التوضيح ايهم اختار

saharelsafty 22-04-2011 03:43 PM


if(condition)
msgbox("n is divisible by d")
endif


الجملة الاتية يتم تنفيذها فقط فى حالة ان يكون الشرط يساوى:





أ‌- (n mod d) <>0
ب‌- (n \ d) =0
جـ- (n mod d ) = 0
د- (n\ d ) <>0
اى هذه الاجابات اصح

Dr.Noha Sami 22-04-2011 10:28 PM

ممكن اجابة الاسئله دى؟؟
x=1
for m=0to 7 step 3
X=x*2
Next
بعد تنفيذ التعليمات السابقة تكون:
قيمة m هى (6-9-7)
قيمة xهى (18-8-4)
س2\
Dim x, y As Integer
X=10
Y=y+2 *x
X=x+5
س3\الجمل الاتيه غير صحيحه اعد صياغة كل جمله بشكل صحيح:
1-for x =100 to 1000 step-2
y=(4*3 ^2) \(10 mod 3-1) l
3- المتغير من النوع long يستخدم لتخزين الاعداد التى تحتوى على كسور
(ارجو من حضرتك شرح الحل انا عرفه ان الاسئله ممكن تكون سهله بس انا اصلى مش باخد دروس ومفيش مدرسه بتدينا لحد دلوقتى !!! فأنا بجد معتمده على نفسي وعليكو )
وجزاك الله خير


جميع الأوقات بتوقيت GMT +2. الساعة الآن 08:12 AM.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.