أسئلة شاملة

تاريخ التسجيل : 26/10/2009 العمر : 40

24. أجب بنعم أو لا

أ. المعالة الآتية x = 5 * 5 + 7 تساوي 60

ب.الثابت الرمزي عبارة نص معين بين علامات إقتباس

ج. المتغير العددي عبارة عن كلمة أو حرف ينتهي بعلامة $

د. المتغير الرمزي عبارة عن كلمة أو حرف لا ينتهي بعلامة $

ه. المعالة الآتية x = 5 *( 5 + 7) تساوي 60

و. المقدار الجبري X يساوي في بيسك X^1/2

ز. حيز العمل في برنامج بيسك هو الخط العلوي الذي يحتوي على مجموعة من اللوائح

ح. حيز النتائج : المكان الُخصص لظهور نتائج تنفيذ الأوامر المباشرة

ط . لائحة ملف (Edit) : لتحرير النص المكتوب.

ي. لائحة تنفيذ (Run): لتنفيذ البرنامج

ك. التعبير الحسابي هو ثابت أو مُتغير أو مزيج من الثوابت والمُتغيرات
تعبير مُعقد التي يجمع بينها معاملات حسابية.

25. ما نتا ئج كل ممايلي
• 30 / 5 * 3 + 6 / 2
• ((3^2/3+2/1)+2+3)*2
• ((2+3^1*3+1)/3*2+3)*(2+2^2/2)
• 5 + 4 / 3 + 7
• ( 5 + 4 )/ 3 + 7
• 5 + 4 / (3 + 7)
• (5 + 4) / (3 + 7)

26. إذا كانت X = 2 , Y= 3 , B = 1 فما قيمة المعادلات الاتية

• (X*X^3 + Y* (9+X-7)
• (X+Y+3)/((7-3*B)^(1/2)+B^5+1)/(Y^2+X^3 - 13))
• 1/2*(X ^ Y +Y ^ X)
• 1/2^(X^2 + Y^3+5)

27. أي التعابير المنطقية التالية غير صحيحة
A = 5 D = 10
التعبير
A^2 -15 = D
A + D > D
A > B
B > A
A >= B
A <> B

28. حول من بيسك الى جبري
• M = (x^2+y^3)^2+((2-3*A)/B)^1/2
• (x^2+y^3)^2+((2-3*A)/B))^(1/2)

29. تتبع تسلسل الحل في كل ممايلي .
• Y =((3^3/3+2/1)+2+3)*4
• X=((2+3^1*3+1)/3*2+3)*(2+2^2/2)

30. بين الخطأ فيما يلي
• Let a = "name"
• Let a = b+2
• Let A$ = “man”
• Let A$ = B$ + “s”
31. بين الخطأ فيما يلي

• PRINT a = b + 3
• PRINT b+2
• PRINT “man”
• PRINT A$
• PRINT

32. أكتب برنامج لحساب كل ممايلي
• حساب مساحة مربع
• حساب مساحة مثلث
• حساب مساحة مستطيل
• حساب مساحة دائرة
• حساب محيط مريع
• حساب محيط مستطيل
• حساب محيط دائرة

32. أكتب برنامج لحساب المضروب للعدد 5

33. أكتب برنامج لحساب المضروب للعدد n

34. أكتب برنامج لحساب المجموع الأرقام من (1 - 10)

35. أكتب برنامج يقوم بتحليل القيمة المدخلة اليه فإذا كانت عدد زوجي يطبع كلمة (EVEN)
وإذا كان عدد فردي يطبع (ODD) .
36. أكتب برنامج يقوم بحساب الراتب السنوي لشخص ما فإذا كان أقل من 5 الاف دينار يدفع ضريبة10% وإذا كان يساوي 5 الاف أو أكثر يدفع ضريبة15 %

37. أكتب برنامج يقوم بقراءة علامة (GRADE)لطالب ثم يكتب الجمل الآتية
إذا كانت العلامة <= 80 أطبع EXCELLENT إذا كانت العلامة > 80 أطبع GOOD
إذا كانت اقل من 50 أطبع FAIL

38. أكتب برنامج يقوم بقراءة علامة (GRADE)لطالب ثم يكتب الجمل الآتية
إذا كانت العلامة <= 50 أطبع good إذا كانت العلامة > 50 أطبع fail

39. أكتب برنامج لقراءة أسم الطالب و أربع علامات لهذا الطالب فإذا كان معدله أكبر من 70
أطبع GOOD وغير ذلك أطبع FIAL

40. أكتب برنامج لادخال رقم فإذا كان الرقم 1 أطبع Saturday واذاكان الرقم 2 أطبع Sunday واذاكان الرقم 3 أطبع Monday واذاكان الرقم 4 أطبع Tuesday واذاكان الرقم 5 أطبع Wednesday واذاكان الرقم 6 أطبع Thursday واذاكان الرقم 7 أطبع Friday

41. أكتب برنامج لادخال عدد فإذا كان العدد موجب أطبع POSITIVE
وإذا كان العدد سالب أطبع NEGATINE

42. أكتب برنامج لادخال علامة طالب فإذا كان الطالب ناجح يضاف للعلامة 5
ويطبع ADD 5 وإذاكان غير ناجح يضاف للعلامة 10 ويطبع ADD 10

43. أقرأ البرنامج الاتي :
CLS
INPUT N$,A
LET B=A+12
M$="AMMAN"
IF A>5 THEN PRINT A^2
ELSE PRINT B
END
استخرج من البرنامج :
1. متغير عددي 2. متغير رمزي 3. ثايت عددي
4. ثابت رمزي 5. تعبير حسابي 6. تعبير منطقي

44. أكتب برنامج لإدخال رقم فإذا كان الرقم من مضاعفات الرقم 4
أطبع The number is devide وان كان لا يقبل القسمة على
الرقم 4 أطبع The number is not devide

45.أكتب برنامج لإيجا قيمة المنوالية الآتية
1 + 8 + 27 + ………. + n3

46. أكتب برنامج لإيجا قيمة المنوالية الآتية

47.

48. أكتب برنامج يقوم بحساب المتوالية الاتية

49. أكتب برنامج يقوم بحساب المتوالية الاتية

50. أكتب برنامج يقوم بحساب المتوالية الاتية

2 + 2.5 + 2 + 20/24 + ……………. + n + n2 / n!

51. ما ناتج تنفيذ كل مما يلي ؟

1
For x = 1 to 10 step 2
X=x*3
Print x
Next x 2
For y = 1 to 5
Print y
Y= y+1
Next y 3
X=1
Y = X+3
X =X +Y
PRINT X
4
For x = 1 to 10 step 2
Y=x*3
Print Y
Next x 5
FOR Z=1 TO 6
A=Z*4
PRINT A;
NEXT Z 6
FOR Z=1 TO 6
A=Z*4
PRINT A,
NEXT Z

52. أكتب برنامج لطباعة 10 أرقام عشوائية بين (0 - 10) وأن تكون القيم صحيحة

53. أكتب برنامج لقراءة 100 رقم بين (0 - 100) وطباعة المربعات الكاملة
بإستخدام جملة ال FOR و الإقترانات المكتبية .

54. ما مخرجات البرنامج الاتي
CLS
FOR X=1 TO 100
IF SQR(X) = FIX (SQR(X)) THEN PRINT SQR(X)
NEXT X
END

55. أكتب برنامج لقراءة الارقام التي تقبل القسمة
على 4 باستخدام الاقترانات المكتبية من (0 – 100)

56. أكتب برنامج لقراءة عشر أرقام وأطبع جا و جتا و ظل الزاوية باستخدام
الاقترانات المكتبية.

57. أكتب برنامج بإستخام جملة ال FOR لرسم الشكل الاتي
*
**
***
****
*****
58. أكتب برنامج لطباعة الأعداد الزوجية بين (0 – 600) كل ستة أعداد على سطر

59. أكتب برنامج لطباعة الأعداد الفردية بين (1 – 100) كل خمسة أعداد على سطر

60. أكتب برنامج بإستخام جملة ال FOR لرسم الشكل الاتي
**********
**********
**********
**********

61. ما ناتج تنفيذ كل مما يلي ؟

1
For x = 1 to 10 step 2
X=x*3
Print x
Next x 2
For y = 1 to 5
Print y
Y= y+1
Next y 3
X=1
Y = X+3
X =X +Y
PRINT X
4
For x = 1 to 10 step 2
Y=x*3
Print Y
Next x 5
FOR Z=1 TO 6
A=Z*4
PRINT A;
NEXT Z

62. أكتب برنامج لحل المعادلة الاتية :
1 –4 + 9 –36 + 25 –36 + 49 –64 + 81 -100

الحلول

24.
أ. لا ب. نعم ج. لا د. لا ه. نعم

و. لا ز. لا ح. لا ط. لا ي. نعم

ك. نعم
25.
• 21
• 20
• 44
• 13.333
• 10
• 5.4
• 0.9

26.

• 23
• 8
• 8.5
• 8

27.
A > B
A >= B

28.
•

•

29.
• Y =((3^3/3+2/1)+2+3)*5
Y =((27/3+2/1)+2+3)*5
Y =((9+2/1)+2+3)*5
Y =((9+2)+2+3)*5
Y =(9+2+3)*5
Y = 70

• X=((2+3^1*3+1)/3*2+3)*(2+2^2/2)
X=((2+3*3+1)/3*2+3)*(2+2^2/2)
X=((2+9+1)/3*2+3)*(2+2^2/2)
X=((12)/3*2+3)*(2+2^2/2)
X=(4*2+3)*(2+2^2/2)
X=(8+3)*(2+2^2/2)
X=11*(2+2^2/2)
X=11*(2+4/2)
X=11*(2+2)
X=11*(4) = 44

30.
• الخطأ في الجملة Let a = "name"
المتغير العددي لايقبل ثابت رمزي
31.
• الخطأ في الجملة PRINT a = b + 3
لا يجوز وضع معادلة في جملة الطباعة

32.
• مساحة مربع
AREA = R^2
CLS
INPUT ”LENGTY”;R
AREA=R^2
PRINT “AREA”;AREA
END

• مساحة مثلث
AREA = 1/2 * HIGHT * WIDTH
CLS
INPUT “HIGHT=”;L
INPUT ”WIDTH=”;W
AREA=L*W
PRINT “AREA”;AREA
END

• مساحة مستطيل
AREA = LENGTH * WIDTH

CLS
INPUT “LENGTH=”;L
INPUT ”WIDTH=”;W
AREA=L*W
PRINT “AREA”;AREA
END

• مساحة دائرة
AREA = 3.14 * R^2

CLS
INPUT “RADIAL=”;R
AREA=R^2 * 3.14
PRINT “AREA”;AREA
END

• محيط مريع
AREA = 4*R

CLS
INPUT “LENGTH=”;L
AREA=L*4
PRINT “AREA”;AREA
END

• محيط مستطيل

AREA = 2*LENGTH + 2*WIDTH

CLS
INPUT “LENGTH=”;L
INPUT ”WIDTH=”;W
AREA=2*L+2*W
PRINT “AREA”;AREA
END

• حساب محيط دائرة
AREA = 2 * R

CLS
INPUT “REDIAL=”;R
AREA 2*R
PRINT “AREA”;AREA
END

32.
Cls
Fact = 1
For x = 1 to 5
Fact = fact * x
Next x
Print "factorial=";fact

33.
Cls
Input "Enter one number";n
Fact = 1
For x = 1 to n
Fact = fact * x
Next x
Print "factorial=";fact
34.
Cls
sum = 0
For x = 1 to 10
sum = sum + x
Next x
Print "sumation=";sum

35.
CLS
INPUT “Enter a number “ ; n
If n mod 2 = 0 then print”even” else print “odd”
end
طريقة أخرى
CLS
INPUT “Enter a number “; n
If n mod 2 = 1 then print "ODD” else print “EVEN”
End
ملاحظة : الكلمة mod تعني باقي القسمة وهي كلمة محجوزة

36.
CLS
INPUT “Enter monthly salary “ ; salary
Incom = salary * 12
If income < 5000 then tax = income * 0.10 else tax = income * 0.15
Print “YEARLY tax is”; tax
end

37.
Cls
Input “Enter your grade"; grade
If grade > = 80 then print “Excellent”
If grade < 80 print “good”
If grade < 50 then print “fail”
End

38.
Cls
Input “Enter your grade"; grade
If grade >= 50 then
Print “good”
Else
Print “fail”
End if
End

39.
Cls
Input "Enter your name:"; nam$
Input "Enter Grade1:"; n1
Input "Enter Grade2:"; n2
Input "Enter Grade3:"; n3
Avg = (n1+n2+n3)/3
If avg > 70 then print "GOOD" ELSE PRINT "FIAL"
END

40.
Cls
Input x
If x=1 then print "Saturday"
If x=2 then print "Sunday"
If x=3 then print "Monday"
If x=4 then print "Tuesday"
If x=5 then print "Thursday"
If x=6 then print "Wednesday"
If x=7 then print "Friday"
End

41.
Input x
If x>0 then print "positive" else print "negative"
end

42.
Input x
If x>=50 then
X=x+5
Print "ADD 5"
Else
X=x+10
Print "ADD 10"
End if
end

43.
1. متغير عددي A 2. متغير رمزي m$ 3. ثايت عددي 12
4. ثابت رمزي amman 5. تعبير حسابيA+12 6. تعبير منطقي A>5

44.
INPUT X
IF X MOD 4 =0 THEN
PRINT " The number is devide"
ELSE
PRINT " The number is not devide "
End if
End

45.
CLS
INPUT "Enter one number:";n
Sum 0
For y = 1 to n
Sum = sum + n ^ 3
Next y
Print "Summation = ";sum

46.
CLS
SUM=0
FOR Y=1 TO 38
SUM = SUM +(1/(Y+1))
NEXT Y
PRINT "SUMMATION=";SUM
END

47.
CLS
SUM=0
FOR Y=1 TO 9
SUM = SUM +(1/Y^2)
NEXT Y
PRINT "SUMMATION=";SUM

48.
CLS
SUM=0
FOR Y=1 TO 50
SUM = SUM +(Y+7)^3
NEXT Y
PRINT "SUMMATION=";SUM

49.
CLS
SUM=0
FOR Y=5 TO 50
SUM = SUM +(Y^3+7)^(1/2)
NEXT Y
PRINT "SUMMATION=";SUM

50.
Cls
Sum = 0
Input N
FOR Q = 1 TO N
FACT = 1
FOR W =1 TO Q
FACT = FACT * W
NEXT Q
SUM = SUM + (Q + Q^2)/FACT
NEXT Q
PRINT "SUMMATION = "; SUM
END

51.
1

3
15 2

1
3
5 3

5

4

3
9
15
21
27 5

4 8 12 16 20 24
6

4 8 12 16 20 24

52.
Cls
For x = 1 to 10
Y = rnd(x) * 10
Print fix (y)
Next x
End

53.
CLS
FOR X=1 TO 100
IF SQR(X) = FIX (SQR(X)) THEN PRINT X
NEXT X
END

54.
1
2
3
4
5
6
7
8
9
10
55.
CLS
FOR X=1 TO 100
IF (X/4) = INT (X/4) THEN PRINT X
NEXT X
END

56.
CLS
FOR X=1 TO 10
INPUT a
PRINT SIN(A*3.14/180)
PRINT COS(A*3.14/180)
PRINT TAN(A*3.14/180)
NEXT X
END

ملاحظة : الزاوية تُعطى بالتقير الدائري ؟

57.
A$ = "*"
FOR X = 1 TO 5
PRINT A$
A$ = A$ + "* "
NEXT X
58.
CLS
FOR A =2 TO 600 STEP 2
PRINT A;
IF A MOD 12 = 0 THEN PRINT
NEXT A
END
59.
CLS
FOR A = 1 TO 100 STEP 2
PRINT A;
IF A MOD 5 = 4 THEN PRINT
NEXT A

60.
CLS
FOR X = 1 TO 4
PRINT "**********"
NEXT X
END
61.
1
3
15
2
1
3
5 3
5

4
3
9
15
21
27 5
24 20 16 12 8 4

62.
Cls
Sum = 0
M = 1
For r=1 to 10
Sum = sum + r^2 * m
m = -m
Next r
Print sum