السبت، 7 مارس 2015

تاريخ الحاسب الآلى أسئلة هامة

https://www.facebook.com/download/preview/369038619933728
نماذج الوزارة

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


https://www.facebook.com/groups/371834209635981/

سؤال وإجابة نموذجية 

ضع علامة " √ " امام العبارة الصحيحة وعلامة " × " امام العبارات 
الخاطئة:-

1الاجراءات sub لا يعود بائ قيمة اما functions تعود بقيمة ( √ )

2- يمكن استخدام الكلمات single او double كأسماء لمتغيرات في
 البرنامج ( × )

3- المعامل and يعطي ناتج نهائي True اذا كان ناتج كافة الشروط
 True ( √ )
4- في الامر Do While…Loop يستمر تكرار تنفيذ الاوامر طالما 
الشرط ناتجه False ( × )
5- تستخدم ( (Select ….case) في حالة وجود اكثر من احتمالين 

للتفرع ( √ ) 





ضع علامة صح أمام العبارة الصحيحة وعلامة خطأ أمام العبارة الخطأ

1- جميع المدخلات التي يتم إدخالها تكون مدخلات حرفية.                                                                                                                                                (صح)

2- المتغيرات من نوع single الحد الأقصى للدقة هو 7 خانات.                                                                                                                                            (صح)

3- عند اختيار اسم المتغير أو الثابت بمكن أن يحتوى الاسمعلي مسافات.                                                                                                                           (خطأ)

4- الصيغة N=N+1 صيغة أمر تخصيص.                                                                                                                                                                        (صح)

5- أمر   IF…..THEN هو أمراختيار مزدوج.                                                                                                                                                                   (خطأ)

6- عملية إعطاء اسم الخلايا التي تحمل قيم ثابتة يطلق عليهاإعلان ثابت.                                                                                                                        (صح)

7-  عند اختيار اسم المتغير أو الثابت يمكن أن يكون الاسم من الكلمات المحجوزة.                                                                                                               (صح) 

8-  اسم المتغير الآتي (spend .money) صحيح.                                                                                                                                                     (خطأ) 

9-  الأمر IF……THEN….ELSE هو أمر اختيار فردي.                                                                                                                                                   (خطأ )  
10-  لإلغاء كل القيم من الأداة List box يتم استخدام طريقة method ونستخدم clear                                                                                                      (صح) 

11-  الثوابت هي قيم لا تتغير أثناء تشغيل البرنامج.                                                                                                                                                 (صح)                       
12-  المتغيرات من نوع long تستخدم لتخزين الأعداد الصحيحة فقط.                                                                                                                           (صح)         
13-  يتيح برنامج vb التحويل من القيمة الحرفية إلي عددية وعكس.                                                                                                                              (صح)         
14-  عند تحويل البيانات الحرفية إلي رقمية نستخدم دالة to string.                                                                                                                              (خطأ)

15-  الأمر if ….then يستخدم إذا كان هناك بديلين.                                                                                                                                                  (خطأ)

16-  المتغيرات من نوع decimal  الحد الأقصى للدقة 29 خانة.    (صح)        
17-  يتم الإعلان عن المتغيرات باستخدام dim .                      (صح)
18-  الخاصية check  تستخدم لتحديد إذا كانيمكن التعامل مع الأداة.    (خطأ)
19-  أسم المتغير الأتي  3frist name صحيح.                                 (خطأ)
20-  يستخدم الأمر dowhile …..loop عندما يكون عدد مرات التكرارمعروفة مسبقا (خطأ)
21-  في الأمر for….next يتم التكرار إذا كان الشرط صحيحا.                          (خطأ)
22-  في الأداة check box  يتم اختيار بديل واحد فقط.                                 (صح)
23-  مع المتغير من النوع date  نستطيع جمع وطرح وجمع الساعات.              (صح)
24-  لا يوجد أولويات لتنفيذ العمليات الحسابية المهم إتمامها.                        (صح)
25-  يستدعي التاريخ والوقت بنظام يسمي current time.                           (خطأ)
26-  المتغيرات من نوع (decimal, single, double) تسمح بتخويل الأعداد التي تحتوي علي كسور ولكن بدرجات دقة متساوية.                                                                          (خطأ)
27-  أسم المتغير Ahmed  صحيح.                                                          (خطأ)
28-  يستخدم الرمز = لربط أكثر من قيمة حرفية في متغير حرفيواحد.              (خطأ)
29-  يتم تحويل أنواع البيانات إلي النوع double بواسطةالتحويل التلقائي.         (خطأ)
30-  في حالة وجود أكثر من أولوية عند تنفيذ العملياتالحسابية يتم الحساب من اليمين إلي اليسار.             
31-  لا يختلف مفهوم = في أمر تخصيص من المعاملات الرياضية.              (خطأ)
32-  يتم تغير الوقت والتاريخ للكائن لنوعية date عن طريقعمليات جمع أوطرح عادية (خطأ)
33-  يتم التحكم في الفترات الزمنية في الفترات الزمنية لنشاطtimer عن طريقالخاصية enable                                                                                                                              (خطأ)
34-   في قاعدة for…..next إذا كانتقيمة العداد أقل من القيمة في end ينتهي التكرار ويذهب البرنامج إلي أول أمر بعد next .                                                                                    (خطأ)
35-  تتم عملية المقارنة في vb بمقارنة الرمز في أقصي اليمينللمتغير الأول بالرمز المناظر للمتغير الثاني     .                                                                                                           (خطأ)   
36-  عند استخدام بعض الأوامر مثلif  الشرطية وقاعدة try/catch يتم تجاهلبعض الخطوات حيث أنهما قد يتسببان في عدم تنفيذ الأوامر بترتب معين.                                                  ((صح))
37-  علامة تعني تساوي.                                                                         (خطأ)

38-    يحب أن يعبر اسم المتغير أو الثابت عن معنيمناسب لاستعماله.                 (صح)

مجموعة أسئلة على أنواع البيانات
1- Dim x as short = 20.4
Dim y as single=10.4
فان x+y= ( 20.8 – 21 – 30.4 )
2- Dim d as string = “16”
Dim y as byte =5.6
فان d+y = ( 21.6 - 22.3 - رسالة خطأ )
3 - اذا كان 13 mod 2 +9/3 =
( 9.5 – 4 – 3.3 )
4- Dim x,y as integer
X=20
Y=y+2*x
X=x+5
فان قيمة y = ( 40 – 15 – 30 )
قيمة x= ( 20 – 15 – 10 )
5- Dim x as short = 21.5
Dim y as short
Dim z as short
Y=x-8
Z=y/4
فان قيمة المتغير y هي ( 13 – 13.5 - 7)
و قيمة z ( 3.25 – 25. – 3 )
6- Dim Arabic as single = 25.5
Dim math as single = 25.5
Dim d as decimal =Arabic+math
فان d = ( 50 – 51 – 52 )
7- Din x as single هذا الامر يعطي خطأ ( منطقي – املائي و نحوي – اثناء التشغيل )

الإجابة 
1=30'4      
  2 رساله خطا     
   3=4  
 4- X20,y40  
5- Y13,z3    
6-  51
7- املائى نحوى
اكمل مكان النقاط مستخدماً الكلمات الاتية لجعل الجملة صحية : 

( الاجراء - المتغيرات - جملة التخصيص - الدوال المعرفة - المؤقت - 

الأخطاء المنطقية )


1- المتغيرات هى اماكن فى ذاكرة الكمبيوتر يخصص لها


       قيمة يمكن لهذه القيمة ان تتغير أثناء تنفيذ البرنامج .


2- الاخطاء المنطقية تؤدى إلى نتائج غير سليمة أثناء تنفيذ

 

                                 البرنامج .


3- جملة التخصيص تعنى تخزين قيمة داخل متغير .



4- المؤقت هى أداة تستخدم لتكرار كود كل فترة زمنية 

                  محددة .


5- الدوال المعرفة هى إحدى مكونات لغة البرمجة يتم 

                         استدعاؤها مباشرة أثناء تنفيذ البرنامج .


6- الاجراء هو مجموعة من الاوامر والتعليمات تحت اسم ما

                   عند استدعاء هذا الاسم يتم تنفيذ هذه الاوامر 



محافظة الغربية



1.    الكود (for m=3 to 15 step3) سيقوم بعرض ................

(الارقام التي تقبل القسمة على 3 – الارقام الفردية – الارقام المتتالية من 3 الى 15 )



2.    التعبير الشرطي Do while y>50 ) ) يظل True طالما انقيمة Y ................

( اقل من 50 – اكبر من 50– تساوي 50 )



3.    الكلمة المحجوزة VBCRLF تستخدم في ................
انشاء سطر جديد– تنظيم قراءة الكود – الربط بين النصوص )

4.    القيمة  الراجعة للدالة Area كما هو موضحفي اعلان الدالة
Function Area (by val radiusAs single ) As single
تكون ................ ( Integer – Single – radius )

5.    ناتج الكود (Label1.text=isnumeric(10)) هو ................ ( False – True – عشرة )


6.    يتم وضع الكود الخاص بمعالجةالخطأ بعد ................ ( Catch – try – End try )

محافظةالقاهرة                                                                      

أكمل العبارات الآتية مستخدماً الكلمات المعطاة :

And  -  OR  -  Sub   -   Do While   -   Now ( )   -   Show           
    -    Select case   -   " "                 التساوي الحسابي   -   &   -    #  # 
 

1- تستخد م علامتي  ........................ #  #  ..............     في كتابة تاريخ أو وقت .

2- المعامل   ...... And...     يتطلب أن يكون الشرطان ناتجهما  ( True )   لكي يكون الناتج النهائي  ( True )

3- علامة التخصيص (= ) لا يقصد بها  . التساوي الحسابي   ..  في جملة التخصيص

4- تستخدم جملة...... Select case   ..    في حالة وجود أكثر من احتمالين للتفرع .

5- الدالة  ....... Now ( ).......   ناتجها هو تاريخ ووقت جهاز الكمبيوتر .

6- الإجراء ........ Sub......   لا يعود بأي قيمة  

أختر الرقم المناسب للعبارات الآتية :

  ( 1 )                     Dim A,B,C as Integer  
     B = TextBox1.text
     C = TextBox2.text                      ( 2 )
     For  A = 1 To B step C
     TextBox3.Text = TextBox3.Text & A& VbcrLf               ( 3 )
      Next

( ب ) أختر ناتج  تنفيذ كل من الأكواد التالية  :


         (        ) Overflow                        Dim R as Integer = 1
           (        )  2                                      Do While  R < = 1  
         (        )  0                                          R  =  R -  2
                                                              Loop
                                                             MsgBox ( R )

 


(      ) M X N = 90                        Dim M , N as Integer         
(      ) 1 X 9 = 9                             M = 10         
(      ) 1 X 9 = M X N                    N = 9         
                                                              M = M – N
                                                              Msgbox ( M & "X" &N&"="&M*N)

         (     )  True                                   Dim A asbyte  = 20
         (     )  False                                  If A mod 3 =0 Then
         (      ) 20                                           Label1 . Text = " True "
                                                              Else
                                                             Label1.Text = " False "
                                                             End if
محافظة كفرالشيخ

اختر الاجابة الصحيحةمما بين الأقواس
1- بعد تنفيذ الصيغة الحسابية2+3*4 يكون الناتج                      ( 9- 20- 14  )
2- فى جملة Do while …..Loop يستمر تنفيذ الكود ( أوامرالتكرار) طالما الشرط
                                   ( True – Nothing- False )
3- تستخدم مجموعة أوامر Try/ Catch ..................
       ( لاكتشاف الاخطاء والتعامل معها – لتكرار أمر عدد من المرات –لتكرار أمر مرة واحدة )
4- الكلماتالآتيـة يمكن استخدامها كأسـماء لمتغـيرات عـدا الكلمـة ( Total – As – Age )
                                                                                    (النقطة رقم 4 منهج قديم فى نماذج الوزارة  )
5- اى من الصيغ التالية صحيح كأمر تخصيص
Number = 10  -  Y+3 = Number     –    3= Number   )

بعد تنفيذ الكود التالى فى العمود ( ب ) أكملمكان النقط فى العمود ( أ )

( أ )

( ب )

   بعـد تنفيـذ هذه التعليمـات، أكمـل مكـان النقـط:

  1- قيمة المتغير  C  تسـاوي ....11....

  2-  قيمة المتغير  N تسـاوي .....11....

  3- ناتج الشرط  N > C  يسـاوي True

4- قيمة المتغير   Kتسـاوي:7 



Dim N , K , C  As Integer                     
C = 10                                    
 For  N = 1  To  10  Step  5           
 K = K + N                             
Next                                       
If  N > C Then                        
C = C + 1                           
End If                                        
الحل :                                        0

K

العداد N

عدد مرات التكرار

1

7

1

6

1

2

                                                             C               قيمة الشرط      K                        N
                                                            11                True                    7                 11

أكمل الجمل التالية بالكلمات المناسبة

                                        
                                               Tick – Text Box- Or – Procedure – Sub – And   )


1-    المعامل Or يعطى ناتج نهائى True اذا كان احد الشروط True

2-    يتم استقبال مدخلات مستخدم البرنامج من خلال العديد من الادوات منها Text Box

3-    Procedureمجموعة من الاوامر والتعليمات تحت اسم معين عند استدعاءهذا الاسم يتم تنفيذ هذه الأوامروالتعليمات

4- نلجأ للاعلان عن Sub فى حالة  إذا ما كان لدينا كود Code  سيتكرر كتابته في أكثر من موضع داخل التصنيف   Class

5- Tick هو الحدث الافتراضى لاداة المؤقت ويعنى مرور الفترة الزمنية المحددة فى الخاصية Interval 

  مجموعة أسئلة اكمل من عدد من المحافظات  على الفصل الأول 

1- تستخدم   فى الإعلان عن الثوابت .................... Const   (دمياط)

2- يستخدم المتغير من النوع ..........................  Data لتخزين بيانات على شكل تاريخ ووقت  (البحيرة)

3- من قواعد تسمية المتغيرات أو الثوابت فى البرنامج ، يجب أن تبدأ ب   حرف  أو  (،)    (كفر الشيخ )


اختر الاجابة الصحيحة مما بين القوسي 

1- تنتهى جملة If ..............Then......................Else  بأمر           (المنوفية)
   
                                                                                 ( End If - End Then - End Else )
  
2-  الأمر ..................... بستخدم فى حالة ما إذا كان هناك بديلين   (أ ، ب)
        
                ( If ..............Then......................Else  -     Then - If-     Boolean)     

3- إذا كانت قيمة  (  60= X  )   وقيمة (45=Y)   فان ناتج الشرط (X>=y)     يكون 

                             ( Ture   -   False   -   Null)            

أوجد ناتج كل عملية حسابية


أسئلة وإجوبة نموذجية
على العمليات الحسابية الآتية من مجموعة من المحافظات على مستوى الجمهورية
خطوات الحل كالآتى
نبدء بالأسس ثم فك الاقواس ثم القسمة
محافظة الاسماعيلية
5/(23+2) + 3 ^ 2 يصبح الحل
25/5 + 8 = 13
............................................................................................
محافظة بنى سويف
2+4+3 * 2^3
7 + 2 * 9
7 + 18 = 25
............................................................................................
محافظة قنا
(2+4 ) * 2^3
6 * 9 = 54
............................................................................................
محافظة الدقهلية
3 * 4 + 3 = 15
............................................................................................
محافظة الغربية
7 /3 * (2^3+2)
3/7 * 7 = 3
............................................................................................
محافظة أسوان

2 ^ 2 * 5 + 4 * 3
4 * 5 + 12 = 32
............................................................................................
محافظة الاسكندرية
2 ^ 2 * 5 + 4 * 3
4 * 5 + 12 = 32
............................................................................................
محافظة بورسعيد

5 + 2 * 6
5 + 12 = 17
............................................................................................
محافظة كفر الشيخ
6 * 2 + 5
12 + 5 = 17
............................................................................................
محافظة قنا
5 + 2 ^ 4
5 + 16 = 21

مسائل هامة على قاعدة For................Next
   
                                       Do While Loop

1)
dim I , Sum as integer

for i=1 to 7 step 3

sum=sum+1

next

mag box (sum)
mag box( I)
ما قيمة I & sum & no of loop ??
الحل هو 

sum=1+1=2 التكرار الثانى 

sum=2+1=3 التكرار الثالث

    sum=3       I =10
2)
حدد قيم المتغيراتz, y


dim z,y as integer 

y=0

for z=2 to 6 step 2

mag box z


y=y+z

next z

mag box y
الحل   
                             كود لطباعة مجموع الاعداد الزوجية من 2 الى 6 
                                                                       y= 2+ 4+6 = 12
                                                                                      z= 8
(3


1- X = 4.5
 2- For I = 0 To 7 Step 3

3- X = X * 2
4- Next
X =
     I =
الحل هو              I    9        X    36  

كمل البرنامج التالي مستخدما جملة For لطباعة الأعداد 

الفردية من 3 إلى 8 مستخدما جملة Meg box في طباعة 

الأعداد 


Dim N As Integer 

……………………………..…………………………………………………………..وما هي قيمة المتغير ( N ) بعد انتهاء التكرار

الإجابة هى 


For N = 3 to 8 Step 2


(msg box9 (N


Next


قيمة N بعد انتهاء التكرار 9

4)  حول من Do while الي For .... Next

Dim x , Y As Single
x = 8
y = 2
Do while x < 12
x = x + y
y = y + 1
Loop
( Meg Box ( x


الإجابة هى


Y = 2
For x = 8 To 11 Step 5
Y = Y + 1
Next
(Meg Box (x

5)
على قاعدة If
Dim x, y as single

X = 45

Y = 10

If x< 10 then 

Y = 100

End if


Y= x*2+4

فان قيمة x = و y =



x=45 , y=94

سؤال وإجابة نموذجية 

بما تفسر

١_ msgbox .show ("تحيا مصر" ، "مصر")

٢_ list box 1.items.clear ()

3_ TX tn .focus ()

4_ label 1.text=now ()

الإحابة 

سيتم إظهار رسالة بها كلمة تحيا مصر في عنوانها وفي محتواها مصر 

2- إفراغ الأداة list box 1 من محتواها 

3- نقل التركيز للأداه  
 TX tn

4-إظهار الوقت والتاريخ المخزنين في نظام الكمبيوتر الحالي في

 الأداة label 1

سؤال من النماذج هام جداً 



وكانت الإجابة

الكود بيتنفذ سطر سطر ... n,k.c ا   c=10 .. و N=1 و K=0 .. ال k بقت بواحد K=0+1 وبعدين Next نرجع
 ل
 For تانى N كانت بواحد step 5 يبقى N بقت ب 6 ,وال c=10 زى ما هى نروح على الK >> هتبقى 

k=1+6 تبقى 7 ونروحNext نرجع على For ال N =6 نزود 5 بقت N =11 نخرج من الحلقة علشان قيمة 

النهاية اصغر من 1 الى 10 وال N =11 نخرج اخر مقارنة n>=c ال N=11 وال c=10 يبقى True ننفذ جملة 

Then وهى c=c+1 يعنى C=10 +1 يبقى c=11 و n=11 و k=7 لانو خرج من الحلقة او ما n بقت ب 11 اخر 

قيمة لk كانت 7

 سؤال هام من الكتاب المدرسى












سؤال هام  من تدريبات الكتاب المدرسى ومجافظة المنوفية 






تفسير الحل 
البرنامج 




نماذج أسئلة








أسئلة هامة على الفصل الخامس

أسئلة على التعدي الإلكتروني

السؤال الأول : ضع علامة صح امام العبارة الصحيحة وعلامة خطأ أمام العبارة الخطأ.
1. التعّدي الإلكتروني هو عبارة عن سلوك عدواني متعمد, باستخدام الوسائط الإلكترونية للتحرش, أوالمضايقة, أو إحراج, أو تخويف أو تهديد الآخرين. ( )
2. لا توجد صور من التعّدي الإلكتروني داخل المجتمع المصري ( )
3. من أشكال التعدي الإلكتروني التخفي الإلكتروني ( )
4. المتعدّي الإلكتروني يهدف إلى إيقاع ضغوط نفسية على الآخرين باستخدام و سائل متعددة عن طريق وسائط الكترونية ( )
السؤال الثانى : ضع علامة صح ( ) امام العبارات التي تساعدك فى حماية نفسك من التعدي الإلكتروني.
1. لا تشارك أحد بكلمة السر. ( )
2. كلمة السر يمكن إن تكون تاريخ ميلاد أو شي سهل يمكن تذكره. ( )
3. لا تنشر معلومات خاصة على الإنترنت. ( )
4. تخلص من الرسائل الإلكترونية المرسلة من المتعدي إلكترونيـاً. ( )
5. لا ترد على المتعدي إلكترونيـاً، ولا تصدق كل ما يكتبوه على الإنترنت. ( )
6. قم بالإبلاغ عن التعدي الإلكتروني للسلطات المختصة. ( )
السؤال الثالث : اشترك أحد الأشخاص فى أحد مواقع التواصل الإجتماعى . كلما راسل أحد الأعضاء أو حاول إجراء محادثة فورية لا حظ عدم الرد عليه .
يعتبر ما حدث شكل من أشكال ...................... ويسمى ........................
يعتبر ما حدث شكل من أشكال التعدي الإلكتروني ويسمى الاستثناء الإلكتروني (Exclusion)



حل أسئلة وتدريبات الفصل الأول
بالكتاب المدرسى ص 28
السؤال الأول : فى نافذة النموذج الآتية :

 إذا أردنا أن نخزن مدخلات المستخدم فى متغيرات حدد نوع البيان المناسب لكل مدخل من مدخلات                مستخدم البرنامج :
1 – String   نصى   2 – Date   تاريخ ووقت   3 – Boolean  منطقى         4 - String   نصى

السؤال الثانى : فى الكود ( Code ) الآتى :
Private Sub Button1_Click(ByVal sender
        Dim Radius As Single
        Const X As Single = 22 / 7
        Radius = Me.TextBox1.Text
        Me.Label2.Text = X * Radius ^ 2
    End Sub
إستخرج أسماء المتغيرات والثوابت بأنواعها :
أ – المتغير Radius       ونوعه رقمى غير صحيح Single                       وقيمته 0
ب – الثابت X     ونوعه رقمى غير صحيح  Single                      وقيمته 22 / 7
السؤال الثالث :
فى الأكواد الآتية حدد سبب الخطأ :
السبب : لا يجوز تحويل القيمة النصية String "خمسة عشرة درجة" المدخلة فى صندوق النص  TextBox1 إلى نوع بيان رقمى صحيح Byte

السبب : نتيجة إدخال قيمة خارج المدى المسموح به  Overflow Exception  فى صندوق النص TextBox2 والمخصصة للمتغير Computer

السؤال الرابع : حدد ما هو الكود ( Code ) المطلوب كتابته حسب ما تشير إليه الأسهم :
Try
       المحتمل أن يظهر منه خطأ أثناء التشغيل  Code   يتم وضع الكود
   Catch  ex  As  Exception
      الخاص بمعالجة الخطأ إذا وقع   Code   يتم وضع الكود
End Try
        يتم وضع الأكواد المتأكد ألا يظهر بها أخطاء و باقى الأكواد
السؤال الخامس : حدد نوع الخطأ فى الكود ( Code ) الآتى ثم صوبه :
الكود ( Code )
نوع الخطأ
التصويب
Din x As Single
إملائى ونحوى Syntax Errors
Dim x As Single
Const x As Single
إملائى ونحوى Syntax Errors
Const x As Single = 5
السؤال السادس : عند كتابة الكود يحتاج المبرمج لوضع تعليق معين لا يتم تنفيذه  ، لابد أن يسبقه :
1 – الكلمة REM                               أو                                             2 – العلامة  '

فسر الكود المشار إليه بالأرقام على الشكل :
1 – الإعلان عن المتغير UserName من نوع بيان String و المتغير UserBirthDate من نوع بيان Date و المتغير UserGender من نوع بيان Boolean و المتغير UserTelNo من نوع بيان Integer
2 – تم تخصيص قيمة الخاصية Text  للأداة TextBox1  للمتغير UserName  و  تم تخصيص قيمة الخاصية Text  للأداة TextBox2  للمتغير UserBirthDate  و  تم تخصيص قيمة الخاصية CheckState   للأداة CheckBox1  للمتغير UserGender و  تم تخصيص قيمة الخاصية Text  للأداة TextBox3  للمتغير UserTelNo
السؤال الثامن : رتب السطور الآتية وفقاً لأولويات تنفيذ العمليات الحسابية :
الرتبة
العملية
(  3  )
الضرب والقسمة من اليسار إلى اليمين
(  1  )
الأقواس من الداخل إلى الخارج
(  4  )
الجمع والطرح من اليسار إلى اليمين
(  2  )
الأسس
السؤال التاسع : حدد ناتج تنفيذ العمليات الحسابية الآتية :
أ – ( 5 + 3 ) * 2              النتيجة :  16
ب - 5 + 3   * 2               النتيجة :  11
السؤال العاشر : ضع علامة (    ) أمام العبارة الصحيحة ، وعلامة (    ) أمام العبارة الخطأ :
1  )
أحد قواعد تسمية المتغيرات أو الثوابت فى البرنامج أن يبدأ اسم المتغير بحرف أو رقم.
(  )
(  2  )
يتم الإعلان عن المتغيرات باستخدام جملة Dim.
(  )
(  3  )
المتغير من النوع Double  يأخذ القيمة True  أو False.
(  )
(  4  )
المتغيرات من أنواع ( Integer & Long & Double ) تستخدم لتخزين الأعداد الصحيحة فقط.
(  )
(  5  )
يتم استقبال مدخلات المستخدم من خلال العديد من الأدوات منها TextBox.
(  )

  
حل أسئلة وتدريبات الفصل الثانى
بالكتاب المدرسى ص 53
السؤال الأول : ضع علامة ( ) أمام العبارة الصحيحة ، وعلامة (  ) أمام العبارة الخطأ :
(  1  )
عدد اختيارات التفرع الممكنة مع استخدام جملة If … Then … Else هو 2.
(  )
(  2  )
ينفذ الكود الذى يلى Else فى جملة If عندما يكون ناتج التعبير الشرطى True.
(  )
(  3  )
المعامل & هو أحد معاملات المقارنة المنطقية.
(  )
(  4  )
باستخدام معامل المقارنة Or يجب أن يكون كافة نواتج الشروط المستخدمة False لكى يكون الناتج النهائى False.
(  )
(  5  )
تستخدم جملة Select Case  فى حالة اختبار أكثر من تعبير شرطى بجملة شرطية واحدة.
(  )
(  6  )
إذا كانت قيمة المتغير X تساوى 15 والمتغير Y تساوى 350 فإن ناتج التعبير الشرطى

 (X>10 And y<500) هو False.
(  )
(  7  )
استخدام Else  اختيارى فى جملة If.
(  )
(  8  )
المعامل And  يتطلب أن يكون الشرطان ناتجهما True لكى يكون الناتج النهائى True.
(  )
(  9  )
الخاصية التى تشير إلى ترتيب العنصر المحدد بالأداة ListBox هى SelectedIndex.
(  )
( 10 )
تستخدم Select Case فى حالة وجود أكثر من احتمالين للتفرع.
(  )
السؤال الثانى : يستخدم الكود Code التالى لحساب مساحة دائرة نصف قطرها R قم بإعادة كتابة الكود فى العمود الأيسر بحيث يعطى رسالة " غير مسموح " عند ادخال عدد سالب فى مربع النص TexrBox1 الذى خصص قيمته للمتغير R ؟.
الكود قبل التعديل
الكود بعد التعديل




Dim r , area  As Single

Const pi As Single = 22 / 7

r = Me.TextBox1.Text

area  = pi * Radius ^ 2

MsgBox("area of circle =  " & area)
Dim r , area  As Single

Const pi As Single = 22 / 7

r = Me.TextBox1.Text

if r >= 0 Then

   area  = pi * Radius ^ 2

   MsgBox("area of circle =  " & area)

 Else

   MsgBox("غير مسموح")

End If
السؤال الثالث : قم بدراسة الكود Code التالى دراسة جيدة والذى يحدد التقدير المناسب لكل درجة مدخلة فى مربع النص TexrBox1 :
حدد ما يتم عرضه فى أداة العنوان Label2 عند إدخال الدرجات التالية فى مربع النص TextBox1  ؟
الدرجة المدخلة
الناتج
30
ضعيف
84
جيد جداً
64.4
جيد
-33
يرجى إدخال درجة بين صفر و 100
صفر
رسالة خطأ وقت التشغيل Runtime Error

to type 'Single' is not valid "صفر"  Conversion from string.
114.3
يرجى إدخال درجة بين صفر و 100
السؤال الرابع : يستخدم الكود التالى لحل معادلة من الدرجة الأولى ( y=3x+2 ) ويعطى نتائج صحيحة عند إدخال قيم عددية فى مربع النص TextBox ولكن حدث خطأ أثناء التشغيل Runtime Error  عند إدخال قيم حرفية فى مربع النص TextBox ، قم بإعادة كتابة الكود Code بعد حل هذه المشكلة باستخدام جملة If إضافية بحيث يعطى رسالة فى أداة العنوان وهى "يجب إدخال قيمة عددية" ؟
الكود قبل التعديل
الكود بعد التعديل




Dim x , y  As Single

x = Me.TextBox1.Text

y = 3 * x + 2

Label1.Text = y
Dim x , y  As Single

If  Isnumaric( Me.TextBox1.Text )  Then

    x = Me.TextBox1.Text

    y = 3 * x + 2

    Label1.Text = y

 Else

    MsgBox(" يجب إدخال قيمة عددية")

End If

السؤال الخامس : اختر ناتج تنفيذ كل من الأكواد التالية :
م
الكود
الناتج
1
Dim Num As Integer = 10

If Num >= 10 Then

      Me.Label1.Text = "One"

   ElseIf Num = 5 Then

      Me.Label1.Text = "Two"

   Else

      Me.Label1.Text = "Three"

End If
        "One"

        "Two"

        "Three"
2
Dim A As Integer = 15

If A Mod 3 = 0 Then

      Me.Label1.Text = "True"

   Else

      Me.Label1.Text = "False"

End If
        "True"

        "False"

        15
3
Dim strName As String = "Ahmed"

strName = " " & strName

strName = "Youssif" & strName

Label1.Text = strName
        Youssif Ahmed

        Ahmed Youssif

        Ahmed
4
Dim A As Integer = 7

Dim B As Integer = 9

MsgBox( A & "" & B & "=" & "  " & A * B)
        AB= 63

        79=  63

        79= A*B
5
Dim x As Integer = 2 , y As Integer = 3 , z As Integer = 4

If x = y And X <> z  Then

      Label1.Text = "First"

   Elseif x = y Or X <> z  Then

      Label1.Text = "Second"

   Elseif x <> y And X <> z  Then

      Label1.Text = "Third"

   Else

      Label1.Text = "Forth"

End If
        "First"

        "Second"

        "Forth"

  حل أسئلة وتدريبات الفصل الثالث
بالكتاب المدرسى ص 78
السؤال الأول : اختر الإجابة الصحيحة لكل مما يلى :
                   1 – الغرض من استخدام جملة Do While     Loop  هو :
                                    أ – تكرار كود Code حتى يصبح التعبير الشرطى True
                                    ب – تكرار كود Code طالما الشرط True
                                    ج – تكرار كود Code طالما الشرط False

                   2 – فى جملة ( For …. Next )  ما وظيفة الأمر Next ؟
                                    أ – زيادة قيمة متغير الحلقة بقيمة معدل الزيادة
                                    ب – مقارنة قيمة متغير الحلقة بعد الزيادة مع قيمة النهاية
                                    ج – كل ما سبق

                   3 – أفضل حلقة تكرارية تستخدم عند معرفة عدد مرات التكرار مسبقاً هى :
                                    أ – Do While
                                    بFor …. Next
                                    ج –Select   Case

                   4 – بعد تنفيذ الكود Code التالى فإن ما يتم عرضه فى صندوق النص ( txt_display ) هو :
                                    أ – 2
                                    ب246810
                                    ج – 2345678910


                   5 – بعد تنفيذ الكود Code التالى فإن ما يتم عرضه فى أداة العنوان ( lbl_display ) هو :
                                    أ10
                                    ب – 11
                                    ج – 0



                   6 – بعد تنفيذ الكود Code التالى فإن ما يتم عرضه فى أداة العنوان ( lbl_display ) هو :
                                    أ – 5
                                    ب – 10
                                    ج15

السؤال الثانى : ضع علامة (  ) أمام العبارة الصحيحة ، وعلامة (  ) أمام العبارة الخطأ :
(  1  )
الأمر MsgBox "3" & "X" & "3" يعرض صندوق رسالة به 9.
(  )
(  2  )
قيمة (M) بعد انتهاء تنفيذ الحلقة ( For m=3 To 1 Step -1 ) هو 0.
(  )
(  3  )
فى حالة عدم كتابة (Step) مع جملة ( For … Next ) فهذا يعنى أن قيمة الزيادة 0 افتراضياً.
(  )
(  4  )
فى حالة تحديد القيمة 2500 للخاصية ( Interval ) للأداة ( Timer ) فهذا يعنى 2.5 ثانية.
(  )
(  5  )
يمكن الخروج من الحلقة التكرارية ( Do While ) بناءً على تعبير شرطى.
(  )

السؤال الثالث: ما هى قيمة المتغير (r) بعد تنفيذ كل كود Code مما يلى :
    Dim r As Single = 0.5

    Do While r > 1      

       r = r + 0.5      

    Loop                

    MsgBox(r)           
(   0.5   –   1   –   1.5   )
    Dim r As Integer = 1

    Do While r <= 1    

       r = r – 2       

    Loop               

    MsgBox(r)          
(   Overflow   –   2   –   0   )
    Dim r, sum As Integer 

    For r = 5 To 10 Step -1

       Sum = Sum + r      

    Next                  

    MsgBox(r)             
(   10   –   5   –   0   )

  حل أسئلة وتدريبات الفصل الرابع
بالكتاب المدرسى ص 97
السؤال الأول : ضع علامة (  ) أمام العبارة الصحيحة ، وعلامة (  ) أمام العبارة الخطأ :
(  1  )
يعلن الإجراء Procedure  مرة واحدة ويستدعى أى عدد من المرات.
(  )
(  2  )
الدوال المعرفة Predefined  يلزم الإعلان عنه أولاً.
(  )
(  3  )
القيمة الراجعة للدالة Area( ) هى Single  كما هو موضح فى إعلانها :

Function Area(ByVal radius As Single) As Integer.
(  )
(  4  )
وسائط Parameters  الإجراء Procedure من خلالها تستقبل قيم من خارج الإجراء Procedure.
(  )
(  5  )
تستخدم الإجراءات Sub فى طرفى جملة التخصيص أما الدوال Functions لا يجوز استخدامها فى أى جملة تخصيص.
(  )
(  6  )
الإجراء Sub لا يعود بأى قيمة أما الدالة Function تعود بقيمة.
(  )
(  7  )
يشترط عند الإعلان عن الإجراءات Procedures أن تستخدم وسيط واحد على الأقل Parameter 
(  )
(  8  )
وسيط الإجراء Procedure إما أن يكون قيمة مجردة أو متغير Variable أو ثابت Constant أو دالة Function
(  )
السؤال الثانى : اكتب أمام كل عبارة بالعمود (  ب ) الرقم المناسب من العمود ( أ ) :
م
أ  )
م
( ب )
(  1  )
الإجراء Sub
2
تستخدم فى الطرف الأيمن من جملة التخصيص ولا يخصص لها أى قيمة.
(  2  )
الدالة Function
4
تستخدم فى الطرف الأيمن من جملة التخصيص و يخصص لها قيمة عند الإعلان فقط.
(  3  )
المتغيرات Variables
1
لا يستخدم فى جملة التخصيص نهائياً.
(  4  )
الثوابت Constants
3
تستخدم فى طرفى جملة التخصيص.
السؤال الثالث : استخرج من الكود Code  الآتى :
Sub ShowOddOrEven(ByVal Start As Integer)
     Dim i As Integer
     Me.Label1.Text = ""
     For i = Start To 10 Step 2
          Me.Label1.Text = Me.Label1.Text & " " & i
     Next
End Sub
1 – اسم الإجراءShowOddOrEven
2 – وسائط هذا الإجراء وأنواعها : Start                   من نوع بيان Data Type عددى صحيح Integer
السؤال الرابع : استخرج من الكود Code  الآتى :
Function Area(ByVal radius As Single) As Single
    Const x As Single = 22 / 7
    Dim res As Single
    res = x * radius ^ 2
    Return res
End Function

1 – اسم الإجراء :                             هى الدالة Area
2 – وسائط هذا الإجراء : radius                    
3 – القيمة الراجعة :                   res
4 – نوع البيان الخاص بـ :
                   أ – الدالة :                                من نوع بيان Data Type عددى غير صحيح Single
                   ب – وسيط الدالة :     من نوع بيان Data Type عددى غير صحيح Single
                   ج – القيمة الراجعة : من نوع بيان Data Type عددى غير صحيح Single والذى يجب أن يوافق                                            نوع بيان الدالة
السؤال الخامس : استخرج من الكود Code  الآتى :
Public Class Form5
  Function Sum(ByVal First As Single, ByVal Second As Single) As Single
     Dim total As Single
     total = First + Second
     Return total
  End Function
End Class
1 – اسم الإجراء :                             هى الدالة Sum
2 – وسائط هذا الإجراءFirst            و          Second
3 – القيمة الراجعة :                   total        
4 – اسم التصنيف :                    Form5
5 – نوع البيان الخاص بـ :
                   أ – الدالة :                                من نوع بيان Data Type عددى غير صحيح Single
                   ب – وسائط الدالة :    من نوع بيان Data Type عددى غير صحيح Single
                   ج – القيمة الراجعة : من نوع بيان Data Type عددى غير صحيح Single والذى يجب أن يوافق                                            نوع بيان الدالة  Sum


السؤال السادس : أكتب أى من الآتى إجراء Sub أو دالة Function  :
                   أ
Sub ShowOddOrEven(ByVal Start As Integer , ByVal LastValue As Integer)
     Dim i As Integer
     Me.Label1.Text = ""
     For i = Start To LastValue Step 2
       Me.Label1.Text = Me.Label1.Text & " " & i
     Next
End Sub
                   ShowOddOrEven إجراء Procedure من النوع Sub
                   ب
Function Area(ByVal radius As Single) As Single
    Const x As Single = 22 / 7
    Dim res As Single
    res = x * radius ^ 2
    Return res
End Function
                   Area إجراء Procedure من النوع الدالة Function
                   ج
Me.Label1.Text = IsNumeric("five")
                   IsNumeric دالة معرفة Predefined Function
                   د
MessageBox.Show(Factorial(5))
                   Show دالة معرفة Predefined Function من التصنيف MessageBox
                   Factorial إجراء Procedure من النوع الدالة Function


حل نماذج إختبارات
الكتاب المدرسى ص 101
نموذج اختبار ( 1 )
السؤال الأول : ضع علامة (  ) أمام العبارة الصحيحة ، وعلامة (  ) أمام العبارة الخطأ :
(  1  )
عدد اختيارات التفرع الممكنة مع استخدام جملة If … Then …. Else  هو 2.
(  )
(  2  )
المعامل & هو أحد معاملات المقارنة المنطقية.
(  )
(  3  )
إذا كانت قيمة المتغير X = 5 وقيمة المتغير Y = 7 فإن ناتج التعبير الشرطى

X >= 5 And Y <= 7   هو False.
(  )
(  4  )
استدعاء الإجراءات Procedures يكون لمرة واحدة فقط.
(  )
(  5  )
تستخدم Dim للإعلان عن المتغيرات Variables.
(  )
السؤال الثانى : اختر الإجابة الصحيحة :
1 – فى حالة تحديد القيمة 3500 للخاصية Interval للأداة Timer فهذا يعنى :
                   أ – 3.5 دقيقة                                         ب3.5 ثانية                                ج – 35 ثانية
2 – أى من جمل Select  التالية ناتجها True فى حالة قيمة المتغير يساوى 8 :
                   أ – Case Is < 8                     ب – Case 1 To 6.8                   جCase Is >= 4
3 – عند معرفة عدد مرات التكرار لكود معين مسبقاً فإن أفضل جملة تكرار هى :
                   أ – Do While … Loop         ب – If … End If                      جFor …Next
4 – ما القيمة المعروضة فى أداة العنوان lblOut عند تنفيذ الكود Code التالى :
Dim i As Integer
For i = 2 To 10 Step 2
   Me.lblOut.Text = Me.lblOut.Text & i & ","
Next
                   أ – 2                                                  ب – 2,3,4,5,6,7,8,9,10                         ج2,4,6,8,10
5 – يتم تخصيص قيم للثوابت Constants :
                   أ – عند الإعلان عن الثوابت فقط.
                   ب – أثناء سير تنفيذ تعليمات البرنامج فقط.
                   ج – عند الإعلان عن الثوابت وكذلك أثناء سير تنفيذ تعليمات البرنامج.
السؤال الثالث : أجب عما يلى :
1 – حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :
المتغير
القيمة
C
11
K
7
N
11
Dim N, K, C As Integer
C = 10
For N = 1 To 10 Step 5
   K = K + N
Next  
IF N >= C Then
    C = C + 1
End IF
2 -  رتب السطور الآتية وفقاً لأولويات تنفيذ العمليات الحسابية :
الرتبة
العملية
(  3  )
الضرب والقسمة من اليسار إلى اليمين
(  1  )
الأقواس من الداخل إلى الخارج
(  4  )
الجمع والطرح من اليسار إلى اليمين
(  2  )
الأسس


3 – فى الكود  Code الآتى :








فسر الكود Code المشار إليه بالأرقام على الشكل :
1 -               أ - الإعلان عن المتغير Total من نوع بيان عددى غير صحيح Decimal
                   ب - الإعلان عن المتغير FirstNumber من نوع بيان عددى غير صحيح Decimal
ج - الإعلان عن المتغير SecondNumber من نوع بيان عددى غير صحيح Decimal
2 -               أ – تخصيص القيمة 10 للمتغير FirstNumber
                   ب - تخصيص القيمة 20 للمتغير SecondNumber
ج – جمع قيمة المتغير FirstNumber و قيمة المتغير SecondNumber  و تخصيص ناتج الجمع ( التعبير          الحسابى ) للمتغير Total
نموذج اختبار ( 2 )
السؤال الأول : ضع علامة (  ) أمام العبارة الصحيحة ، وعلامة (  ) أمام العبارة الخطأ :
(  1  )
تستخدام جملة If … Then …. ElseIf  فى حالة اختبار أكثر من تعبير شرطى.
(  )
(  2  )
المتغيرات من أنواع ( Integer & Long & Double ) تستخدم لتخزين الأعداد الصحيحة فقط.
(  )
(  3  )
باستخدام معامل المقارنة Or يجب أن يكون كافة نواتج الشروط المستخدمة False لكى يكون الناتج النهائى False.
(  )
(  4  )
تستخدم جملة Select Case فى حالة احتبار أكثر من تعبير شرطى بجملة شرطية واحدة.
(  )
(  5  )
المتغيرمن نوع  Double يأخذ القيمة True  أو False.
(  )
السؤال الثانى : اختر الإجابة الصحيحة :
1 – بفرض وجود دالة باسم AddSum( ) أى من التعبيرات الآتية غير صحيح عند استدعائها :
                   أ –X = Y + AddSum( )       بAddSum( ) = X + Y                     ج – X = AddSum( )
2 – لإنهاء حلقة تكرارية عند تحقق الشرط A = 2 تكتب بدايتها بالشكل التالى :
                   أ – Do While(a = 2)             ب – Do While(a < 2) Or (a >= 2)       جDo While(a < > 2)
3 – حدد الخطأ فى الحلقة التكرارية التالية :
Dim j As Byte
For j = 1 To 500 Step 3
   Me.ListBox1.Items.Add(j)
Loop
     أ – يجب استخدام جملة Do While بدلاً من For … Next ب – الحلقة غير منتهية             ج – خطأ فى نوع متغير الحلقة
4 – يتوقف التكرار فى جملة For M = 10 To 1 Step -2   عندما تصبح قيمة المتغير M:
                   أ – أكبر من قيمة النهاية                           ب – أصغر من قيمة النهاية                     ج – أصغر من أو تساوى قيمة النهاية
5 – حدد ناتج تنفيذ العملية الحسابية 2 – ( 7 + 2 ) * 2  :
                   أ –   -16                                ب –   14                                  ج –   5





السؤال الثالث : أجب عما يلى :
1 – أعد كتابة الكود التالى باستخدام جملة Select Case :
Dim x As Integer

x = Me.TextBox1.Text



If x = 0  Then

   Me.Label1.Text = "القيمة تساوى صفر"

End If



If x > 0  Then

   Me.Label1.Text = " القيمة أكبر من الصفر"

End If



If x < 0  Then

   Me.Label1.Text = "القيمة أصغر من الصفر"

End If


Dim x As Integer

x = Me.TextBox1.Text

Select Case x

   Case 0

     Me.Label1.Text = "القيمة تساوى صفر"





   Case Is > 0

     Me.Label1.Text = " القيمة أكبر من الصفر"





   Case Is < 0

     Me.Label1.Text = "القيمة أصغر من الصفر"

End Select
2 – اكتب أمام كل عبارة بالعمود ( ب ) الرقم المناسب من العمود ( أ ) :
م
أ  )
م
( ب )
(  1  )
الإجراء Sub
2
تستخدم فى الطرف الأيمن من جملة التخصيص ولا يخصص لها أى قيمة
(  2  )
الدالة Function
4
تستخدم فى الطرف الأيمن من جملة التخصيص و يخصص لها قيمة عند الإعلان عنها فقط
(  3  )
المتغيرات Variables
1
لا يستخدم فى جملة التخصيص نهائياً
(  4  )
الثوابت Constants
3
تستخدم فى طرفى جملة التخصيص
3 - حدد نوع الخطأ فى الكود ( Code ) الآتى ثم صوبه :
الكود ( Code )
نوع الخطأ
التصويب
Dim x As Sangle
إملائى ونحوى Syntax Errors
Dim x As Single
Const x As Integer

x = 10
إملائى ونحوى Syntax Errors
Const x As Integer = 10

نموذج اختبار ( 3 )


السؤال الأول : ضع علامة (  ) أمام العبارة الصحيحة ، وعلامة (  ) أمام العبارة الخطأ :
(  1  )
الخاصية SelectedIndex تشير إلى ترتيب العنصر المحدد بالأداة ListBox.
(  )
(  2  )
تستخدم Select  Case فى حالة وجود أكثر من احتمالين للتفرع.
(  )
(  3  )
الجملة If A > B And b > C Then ناتجها True فى حالة A=3 , B=5 , C=2.
(  )
(  4  )
ناتج الدالة IsNumeric  دائماً يكون True أو False.
(  )
(  5  )
المتغيرات من أنواع  (Integer & Long) تستخدم لتخزين الأعداد الصحيحة فقط.
(  )




السؤال الثانى : اختر الإجابة الصحيحة :
     أولاً : اختر الإجابة الصحيحة :
1 – الهدف من الكود Code التالى هو :
Dim N As Integer
Dim S As Integer
For N = 1 To 100
    S = S + N
Next
Me.Label1.Text = S
                   أ –  عرض الأعداد من 1 إلى 100
ب – عرض مجموع الأعداد من 1 إلى 100                      
ج – عرض حاصل ضرب الأعداد من 1 إلى 100
2 – ما القيمة المعروضة فى أداة العنوان Label1 عند تنفيذ الكود التالى :
Dim intNum As Integer = 10
intNum =  intNum + 2
intNum =  intNum Mod 3
Me.Label1.Text = intNum

                   أ – 3                                                  ب0                                       ج – 4
3 –  لإنهاء حلقة تكرارية عند تحقق الشرط A < > 2  تكتب بدايتها بالشكل التالى :
                   أDo While(a = 2)             ب – Do While(a < 2) Or (a >= 2)       ج – Do While(a < > 2)
  
      ثانياً : أى من الآتى إجراء Sub أو دالة Function :
                   أ -
Function Concatenating(ByVal fn As String, ByVal ln As String) As String
    Dim FulName As String
    FulName = fn + " " + ln
    Return FulName
End Function
                   Concatenating هى دالة Function
        ب
Sub ShowResult( )
    MessageBox.Show(2 * (7 + 2) – 2)
End Sub
                   ShowResult هى إجراء Sub
                   Show دالة معرفة Predefined Function من التصنيف MessageBox


السؤال الثالث : أجب عما يلى :
1 – حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :
                   بفرض أن y = 2   ,    k = 1    ,    j = 1    ,    z = 0    ,     x = 0     
If x < y Then
المتغير
القيمة
x
1
y
1
z
2
        z = k + j
        x = x + 1
        y = y – 1
   Else
        z = k – y
        x = x + 2
        y = y – 2
End If
2 – استخرج من الكود Code الآتى :
Function calc(ByVal fn As Single, ByVal sn As Single) As Single
    Dim res As Single
    res = fn + sn
    Return res
End Function
1 – اسم الإجراء :                             هى الدالة calc
2 – وسائط هذا الإجراءfn        و         sn
3 – القيمة الراجعة :                   res     
4 – نوع البيان الخاص بـ :
                   أ – الدالة :                                من نوع بيان Data Type عددى غير صحيح Single
                   ب – وسائط الدالة :    من نوع بيان Data Type عددى غير صحيح Single
                   ج – القيمة الراجعة : من نوع بيان Data Type عددى غير صحيح Single والذى يجب أن يوافق                                            نوع بيان الدالة  calc
3 – فى الأكواد الآتية حدد سبب الخطأ :




السبب :
                   لا يجوز تحويل القيمة النصية String "خمسة عشرة درجة" المدخلة فى صندوق النص  TextBox1 إلى نوع بيان رقمى صحيح Byte





السبب :
                   أن نتيجة إدخال قيمة خارج المدى المسموح به  Overflow Exception  فى صندوق النص TextBox2 والمخصصة للمتغير Computer



تمنياتى من إعداد/ هناء أحمد ................ معلم حاسب آلى