|
أرشيف المنتدى هنا نقل الموضوعات المكررة والروابط التى لا تعمل |
|
أدوات الموضوع | ابحث في الموضوع | انواع عرض الموضوع |
#1
|
|||
|
|||
![]()
ب- أقرأ التعليمات الاتيه ثم أجب عن الاسئله التاليه
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 هى ................................... المشكله حول اختلاف الاجابه فى 3- قيمه المتغير Total = ونرجو من الاخوة الاعضاء المشاركه Dim First as integer =20 , Second as integer=40 Dim Third as integer = First + Second Dim Total as integer If Third <=50Then Total= First + Second+ Third Else First=30 Second=50 Total= First + Second+ Third End If 1-قيمهالمتغيرFirst = 30 2- قيمه المتغيرSecond = 50 3- قيمه المتغيرTotal = 140 Third =20+40 وهو الذى بنى عليه التعبيرالشرطى 30+50+60=140 ولم يحدث تغييرلقيمهThird والاخوة نرجو تجربه جرب هذا البرنامج Dim First AsInteger = 20, Second AsInteger = 40 Dim Third AsInteger = First + Second Dim Total AsInteger If Third <= 50 Then Total = First + Second + Third Else First = 30 Second = 50 Total = First + Second + Third EndIf MsgBox(Total) ونتحاور معا لاجل الوصول الى المعلومه الصحيحه
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#2
|
||||
|
||||
![]()
انا عملتها 140
لكن زملائي يقولون انها هتكون 160 لان third = 30+50 = 80 تبقي total = 80+30+50=160 ممكن حضترتك تتأكد منها علشان انا خايفة منها قوي لانها ممكن تأثر علي مجموعي ياريييييييييييييييييييييييييييييييييييييييييت تعرف نموذج الاجابة يبقي ايه اكرمك الله |
#3
|
|||
|
|||
![]() اقتباس:
|
#4
|
|||
|
|||
![]()
أتفق معك أخى البنان واو
وشكرا جزيلا
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#5
|
|||
|
|||
![]()
الاجابه صحيحه
قيمه المتغيرTotal = 140 Dim First AsInteger = 20, Second AsInteger = 40 Dim Third AsInteger = First + Second Dim Total AsInteger If Third <= 50 Then Total = First + Second + Third Else First = 30 Second = 50 Total = First + Second + Third EndIf MsgBox(Total) قيمه المتغيرTotal = 140
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#6
|
||||
|
||||
![]() اقتباس:
Third = First + Second والثلاث قيم متغيرات وطالما هم كذلك مش مفروض برضه ان احنا بناخد آخر قيمة لهذا المتغير هو بدأ بالقيم 20 و 40 وتغيرت القيم الى 30 و 50 يبقى المفروض ال Total = 160 يا ترى حضرتك جربتها عملي اصل البرنامج مش عندي حالياً ولك اطيب التحيات مني وعليك من الله السلام
__________________
يارب ارفع عنَّا وعن مصر الفتن ما ظهر منها وما بطن واحفظ بلاد المسلمين من كل شر وسوء يا أرحم الراحمين
|
#7
|
|||
|
|||
![]() الإجابة الصحيحة 140
لأنه لم يعطى أمر تخصيص جديد أو قيمة جديده للمتغير third بعد كلمة else أى أن قيمة third الوحيدة هى اللى موجوده فى سطر الإعلان و لم يغيرها بعد ذلك فقط هو غير قيمة المتغير first و second بعد else و بالتطبيق العملى أيضاً أثبت ذلك 140 ملحوظة جميلة أستاذ / tarek elhamy شكراً جزيلاً لك ربنا يكرمك آخر تعديل بواسطة nahla_m ، 30-05-2010 الساعة 05:15 PM |
#8
|
|||
|
|||
![]() اقتباس:
بالتطبيق العملى 140 أخى وزميلى ابو بطة شكرا جزيلاً
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#9
|
|||
|
|||
![]()
القيم
30 50 140
__________________
|
#10
|
|||
|
|||
![]()
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#11
|
||||
|
||||
![]() اقتباس:
اقتباس:
اقتباس:
اقتباس:
بعد ذان الجميع اختلف معكم في الرأي واتمني ان تكونوا علي صواب 1- Dim First AsInteger = 20, Second AsInteger = 40 Dim Third AsInteger = First + Second Dim Total AsInteger If Third <= 50 Then Total = First + Second + Third Else First = 30 Second = 50 Total = First + Second + Third EndIf MsgBox(Total) ناتج التعبيربي الشرطي false كده الكل متفق معايا يعني هنفذ مجموعة الاوامر اللي بعد else Else First = 30 Second = 50 Total = First + Second + Third EndIf MsgBox(Total الكل لسه متفق معايا طيب Total تساوي ايه ؟؟؟؟ First + Second + Third تمام طيب Third موجودة بس اعلنت قبل if انا تساوي Dim Third AsInteger = First + Second صح طيب نجيب Third من الاول اللي بعد Else Third 50+30=80 ونرجعلي علي Total = First + Second + Third 30+50+80= 160 الاجابة الصحية قابل للمناقشة الي يتم الوصول الي الاجابة الصحيحة |
#12
|
|||
|
|||
![]()
أنا بأكد مرة أخرى إن الإجابة الصحيحة Total=140 وبالتجربة العملي تقدروا تتأكدوا
|
#13
|
|||
|
|||
![]()
عزيزى أ/ محمد عبد الحكم
الاجابه صحيحه واذا لم تكون مقتنع جرب هذا البرنامج ورد على وشكرا Dim First AsInteger = 20, Second AsInteger = 40 Dim Third AsInteger = First + Second Dim Total AsInteger If Third <= 50 Then Total = First + Second + Third Else First = 30 Second = 50 Total = First + Second + Third EndIf MsgBox(Total) رقم المشاركة : 49</STRONG> http://www.thanwya.com/vb/showthread...=209684&page=2
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#14
|
||||
|
||||
![]()
الطالب معاه ورقة اسئلة بس مش لاب توب
السؤال ده الاجابة النظري 180 وبعد إذن اي زميل فاضل يشرح ازاي تطلع 140 نظري او عملي انا مش هجرب عملي لان الامتحان نظري الامتحان نظري ممكن شرح نظري من مستر مجدي ومستر طارق و مستر سيف سالم زي السؤال ده السؤال الأول: ب- قيمه المتغير من النوع single تكون( 12345.768 - 12345-12345.76 أ- : اخترالاجابةالصحيحة مما بين الاقواس فيما يلي : 1- عند تخزين القيمه (12345.768) فى متغيرين من النوع integer single ثم استرجاع قيمه كل متغير فان ا- قيمه المتغير من النوع integer تكون ( 12345.768 - 12345 -12345.76 ) نظري مش عملي ممكن شرح نظري مفصل زي ما شرحت بعد اذنكم
|
#15
|
|||
|
|||
![]() اقتباس:
الاجابه صحيحه 140 نظري او عملي ونظرى قم بتتبع الخطوات باستخدام امر التخصيص سوف تحصل على الاجابه وهى 140 وشكرا
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
العلامات المرجعية |
|
|