|
#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 = 30 2- قيمه المتغير Second = 50 3- قيمه المتغير Total = 140 Third =20+40 وهو الذى بنى عليه التعبير الشرطى 30+50+60=140 ولم يحدث تغيير لقيمهThird 4- اذا كان التعبير Third <=50 هى False أتمنى ان تكون واضحه وشكرا
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
#2
|
||||
|
||||
![]() اقتباس:
30+50+80=180 3- قيمه المتغير Total = 180
|
#3
|
|||
|
|||
![]() اقتباس:
عزيزى أ/ محمد عبد الحكم الاجابه صحيحه واذا لم تكون مقتنع جرب هذا البرنامج ورد على وشكرا 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)
__________________
لاإله إلا أنت سُبحــانك أني كُنت من الظالمين سـبـّحـَان الـلـهّ وبـِحـَمـّده*عـَدَدّ خـَلـّقـِه وَزِنـَةِ عـَرّشـِه *وَرِضـاَ نـَفـّسِه*وَمـِدَآدّ كَـَلـِمـَآتـِه |
![]() |
العلامات المرجعية |
|
|