2017 (Repaired) (Repaired) (PDF)

‫الوحدة الثانية الربجمية باستخدام لغة‬
‫‪QUICK BASIC‬‬

‫الدرس ألاول‪ :‬أساسيات لغة ‪QBASIC‬‬
‫أوالً خصائص لغة ‪:QBASIC‬‬

‫ مت بناء لغة ‪ QBASIC‬لتكون وس يةل تعلميية‪.‬‬‫ تعترب لغة ‪ QB‬لغة تفاعلية ألهنا تسمح ابلإتصال املبارش بني املس تخدم وهجاز احلاسوب أأثناء اإعداد الربانمج إواس تخدامه‪.‬‬‫ تعترب لغة ‪ QB‬من أأكرث اللغات العالية املس توى شعبية إواس تخدام ًا‪ ،‬وذكل بسبب بساطهتا وسهوةل تعلمها مجليع ا ألعامر‬‫وخمتلف املس توايت‪.‬‬
‫ثانياً مجموعات رموز لغة ‪:QB‬‬

‫‪ )1‬احلروف‪ :‬ويه حروف اللغة الإجنلزيية من ‪ ،A To Z‬ول أأمهية لكون احلروف كبرية أأو صغرية‪.‬‬
‫‪ )2‬ا ألرقام ‪ :‬ويه ا ألرقام ‪.1234567821‬‬
‫‪ )8‬الرموز اخلاصة‪ :‬يه لك رمز ليس من حروف اللغة الإجنلزيية وأأرقاهما‪ ،‬مثل‪? / ^ \ * + - ( ) % # “ < > = ; : , :‬‬
‫ثالثاً الثوابت‪:‬‬

‫ الثوابت‪ :‬يه قمي اثبتة ل تتغري أأثناء تنفيذ الربانمج‪.‬‬‫ تقسم الثوابت اإىل‪:‬‬‫‪ )1‬الثوابت العددية ‪ :‬يه ا ألعداد احلقيقية سواء أأاكنت حصيحة أأم غري حصيحة‪ ،‬مثل‪221 / 3.14 / - 178 /6 :‬‬
‫‪ )2‬الثوابت الرمزية‪ :‬يه مجموعة من احلروف وا ألرقام والرموز اخلاصة ( إابس تثناء اإشارة الإقتباس املزدوجة ")‪ ،‬يمت وضعها بني‬
‫اإشاريت اإقتباس مزدوجتيني ( " " )‪ ،‬مثل‪“ ALNABULSI” / “ ACMILAN” / “100” / :‬‬
‫“ * ‪“A1B2C3” / “ 10 $” / “ QBASIC” / “LED99” / “ * -‬‬
‫رابعأ المتغيرات‪:‬‬

‫ املتغريات‪ :‬يه أأسامء متثل مواقع يف اذلاكرة ذات قمي قابةل للتغري يف أأثناء تنفيذ الربانمج‪.‬‬‫ تقسم املتغريات اإىل‪:‬‬‫‪ )1‬املتغريات العددية‪ :‬يه متغريات تس تخدم لتخزين القمي العددية ( ثوابت عددية‪ /‬متغريات عددية‪/‬تعابري حسابية (عددية))‪،‬‬
‫مثل‪X / LENGTH / A / Z / COUNT / WIDE / NOOR / N9 / M77 :‬‬
‫‪ )2‬املتغريات الرمزية‪ :‬يه متغريات تس تخدم لتخزين القمي الرمزية ( ثوابت رمزية ‪ /‬متغريات رمزية )‪ ،‬تمتزي بأأهنا تنهتي ابإشارة‬
‫ادلولر ‪ ،$‬مثل‪.A$ / XZ $/ ADDRESS $/ JORDAN$:‬‬

‫‪8150718070‬‬

‫عامر سعود النابلسي‬

‫‪8108230001‬‬

‫‪1‬‬

‫ هناك مجموعة من القواعد الواجب مراعاهتا عند كتابة أأسامء املتغريات‪:‬‬‫‪ )1‬أأن يبد أأ اإمس املتغري حبرف‪.‬‬
‫كل كلمات ‪ QB‬املحجوزة تصبح متغيرات رمزية بإضافة إشارة‬
‫‪ )2‬أأن ل حيتوي اإمس املتغري عىل الرموز اخلاصة والفراغ‪.‬‬
‫الدوالر ‪ ،$‬ماعدا ‪.INPUT‬‬
‫‪ )8‬أأن ينهتي اإمس لك متغري رمزي ابإشارة ادلولر‪.‬‬
‫‪ )7‬أأن ل يكون اإمس املتغري من لكامت ‪ QB‬احملجوزة‪.‬‬
‫‪ )6‬أأن ل يتجاوز عدد خاانت اإمس أأي متغري عددي عن ‪ 71‬خانة و‪ 71‬خانة للمتغري الرمزي حبيث ختصص اخلانة ‪ 71‬لإشارة ادلولر ‪.$‬‬

‫مثال‪ :‬بني حصة أأسامء املتغريات ا ألتية‪:‬‬
‫املتغير‬

‫نوع‬
‫املتغير‬

‫مقبول‪ /‬غير‬
‫مقبول‬

‫سبب عدم القبول‬

‫التصحيح‬

‫‪AB$3‬‬
‫‪ALI‬‬
‫‪$X‬‬
‫‪R*S$‬‬
‫‪3STAR‬‬
‫‪KBS‬‬
‫‪LET$‬‬
‫‪SCHOOLS$‬‬
‫‪M56$‬‬
‫”‪“G‬‬
‫‪INPUT$‬‬
‫‪NABLUS_PAL‬‬
‫‪GOOGLE‬‬
‫‪A+B‬‬

‫خامساً التعابير الحسابية‪:‬‬

‫ التعبري احلسايب‪:‬هواثبت أأو متغري عددي أأو مزجي من الثوابت واملتغريات العددية اليت جيمع بيهنا معامالت حسابية‪ ،‬مثل‪-+‬‬‫ التعبري احلسايب البس يط‪ :‬هو التعبري احلسايب اذلي حيتوي عىل معامل حسايب واحد مثل ‪.A+B‬‬‫ التعبري احلسايب املركب‪:‬هو التعبري احلسايب اذلي حيتوي عىل أأكرث من معامل حسايب أأو حبتوي عىل ا ألقواس ‪.‬‬‫‪ -‬اإن انجت التعابري احلسابية يف لغة ‪QBASIC‬عبارة عن اثبت عددي‪.‬‬

‫‪8150718070‬‬

‫عامر سعود النابلسي‬

‫‪8108230001‬‬

‫‪2‬‬

‫العملية‬

‫الرياضيات‬

‫البيسك‬

‫مثال‬

‫الجمع‬

‫‪A+B‬‬

‫‪A+B‬‬

‫‪5+2=7‬‬

‫الطرح‬

‫‪A–B‬‬

‫‪A–B‬‬

‫‪10 – 3 = 7‬‬

‫‪A*B‬‬

‫‪20 * 5 = 100‬‬

‫‪20 / 7‬‬

‫‪5 / 2 = 2.5‬‬

‫القسمة بناتج صحيح‬

‫‪-‬‬

‫‪20 \ 7‬‬

‫‪5\2 =2‬‬

‫باقي القسمة‬

‫‪-‬‬

‫‪D MOD 5‬‬

‫‪5 MOD 2 = 1‬‬

‫ألاسس‬

‫‪A^2‬‬

‫‪5^2 = 25‬‬

‫الجذر التربيعي‬

‫الجذر التكعيبي‬

‫‪X ^ 0.5‬‬
‫)‪X ^ (1/2‬‬
‫)‪SQR ( X‬‬
‫)‪Y ^ (1/3‬‬

‫‪100 ^ (1/2) = 10‬‬

‫‪125 ^ ( 1/3) = 5‬‬

‫الجذر للقوة ‪N‬‬

‫)‪A ^ ( 1/N‬‬

‫‪64 ^ (1/4) = 2‬‬

‫القيمة املطلقة‬

‫) ‪ABS ( 7 – 100‬‬

‫‪ABS ( -8 ) = 8‬‬

‫أكبر عدد صحيح‬

‫)‪INT ( 5.7‬‬

‫‪INT ( 6.9 ) = 6‬‬

‫أقرب عدد صحيح‬

‫‪-‬‬

‫) ‪CINT ( X‬‬

‫‪CINT ( 4.9 ) = 5‬‬

‫الجزء الصحيح‬

‫‪-‬‬

‫) ‪FIX ( A‬‬

‫‪FIX ( 4.9 ) = 4‬‬

‫الضرب‬

‫‪A x B A.B‬‬

‫القسمة بناتج حقيقي‬

‫‪AB‬‬

‫‪20 ÷7‬‬

‫أوالً كتابة التعابير الحسابية بلغة ‪:QUICK BASIC‬‬

‫ مالحظات هامة عن التحويل اإىل لغة ‪:QB‬‬‫‪ .1‬اذا اكن هناك أأقواس تنقل كام يه‪.‬‬
‫‪ .2‬يف معلية القسمة جيب وضع أأقواس عىل البسط واملقام اذا احتوى عىل أأكرث من معلية‪.‬‬
‫‪ .8‬اذا احتوى ا ألس عىل أأكرث من معلية جيب وضع ا ألقواس‪.‬‬
‫‪ .7‬يف اجلذور يوضع ما بداخل اجلذر داخل أأقواس‪.‬‬
‫مثــــال‪ :‬حول لك من التعابري احلسابية الآتية اإىل لغة ‪:QB‬‬

‫‪8150718070‬‬

‫عامر سعود النابلسي‬

‫‪8108230001‬‬

‫‪3‬‬

‫ثانياً إيجاد ناتج تعبير حسابي بلغة ‪:QUICK BASIC‬‬

‫ قواعد ا ألولوايت املتبعة عند اإجياد انجت تعبري حسايب بلغة ‪:QB‬‬‫‪ )2‬ا ألسس‬
‫‪ )1‬ا ألقواس‬
‫‪ )6‬ابيق القسمة (‪)MOD‬‬
‫‪ )7‬القسمة بناجت حصيح‪.‬‬
‫‪ )4‬اذا تساوت ا ألولوايت نبدأأ من اليسار اإىل الميني‪.‬‬

‫‪ )8‬الرضب والقسمة بناجت حقيق ‪.‬‬
‫‪ )5‬امجلع والطرح‪.‬‬

‫‪ ‬عند حساب عمليتا باقي القسمة ‪ MOD‬والقسمة بناتج صحيح \ يجب مراعاة قواعد التقريب (‪)CINT‬قبل الحل‪:‬‬
‫‪1.1‬‬
‫‪1.2‬‬
‫‪1.3‬‬
‫‪1.4‬‬

‫‪___ . 5‬‬
‫اذا كان الصحيح زوجي ‪4.5 = 4‬‬
‫اذا كان الصحيح فردي ‪5.5 = 6‬‬

‫‪2.6‬‬
‫‪2.7‬‬
‫‪2.8‬‬
‫‪2.9‬‬

‫‪1‬‬

‫يتم التقريب للعدد الزوجي ألاقرب‬

‫‪3‬‬

‫‪ ‬باقي القسمة ‪:MOD‬‬
‫‪ )1‬اذا كان العدد ألاول أقل من ‪ )2‬اذا كان العدد ألاول أكبر أو يساوي‬
‫العدد الثاني‪:‬‬
‫العدد الثاني‪:‬‬
‫نقوم بطرح أكبر مضاعف للعدد‬
‫يكون الجواب العدد ألاول‪.‬‬
‫ألاول‪ ،‬أقل من أو يساوي العدد الثاني‬
‫‪5 MOD 6 = 5‬‬
‫من العدد الثاني‪.‬‬
‫‪6 MOD 10 = 6‬‬
‫‪16 MOD 7 = 2‬‬
‫‪29 MOD 5 = 4‬‬
‫‪33 MOD 10 = 3‬‬
‫‪33 MOD 3 = 0‬‬
‫‪26.5 MOD 8.51 = 8‬‬

‫‪8150718070‬‬

‫عامر سعود النابلسي‬

‫يكون ناتج ال ـ ‪ MOD‬سالب اذا كان‬
‫العدد ألاول سالب‪.‬‬
‫‪-21 MOD 4 = -1‬‬
‫‪20 MOD -6 = 2‬‬
‫‪-13 MOD -5 = -3‬‬
‫عند ايجاد باقي القسمة على صفر‬
‫تظهر رسالة الخطأ ‪DIVISON BY‬‬
‫‪.ZERO‬‬
‫‪0 MOD 5 = DIVISION BY ZERO‬‬
‫‪15 MOD 0= DIVISION BY ZERO‬‬

‫‪8108230001‬‬

‫‪4‬‬

‫‪ ‬القسمة بناتج صحيح \‪:‬‬
‫‪ )2‬اذا كان العدد ألاول أكبر أو يساوي‬
‫عند ايجاد ناتج القسمة الصحيحة‬
‫‪ )1‬اذا كان العدد ألاول أقل من‬
‫على صفر تظهر رسالة‬
‫العدد الثاني‪:‬‬
‫العدد الثاني‪:‬‬
‫الخطأ ‪.DIVISON BY ZERO‬‬
‫كم عدد ثاني في العدد ألاول‪.‬‬
‫يكون الجواب ‪.0‬‬
‫‪0 \ 5 = DIVISION BY ZERO‬‬
‫‪16 \ 7 = 2‬‬
‫‪5\6=0‬‬
‫‪15 \ 0= DIVISION BY ZERO‬‬
‫‪29 \ 5 = 4‬‬
‫‪6 MOD 10 = 0‬‬
‫‪33 \ 10 = 3‬‬
‫‪33 \ 3 = 11‬‬
‫‪26.5 \ 8.51 = 2‬‬

‫مثــــال‪ :‬ما انجت التعابري احلسابية الآتية اإىل لغة ‪:QB‬‬
‫‪C=4 , B=3, H=4 , K=6 A=2 Q=2 , W=5 , B=6‬‬
‫‪33‬‬

‫)‪2*K+3*(H+3‬‬

‫‪33‬‬

‫‪K*H-(K-H)+H^2‬‬

‫‪36‬‬

‫‪(2*W-Q^2)^2‬‬

‫‪36‬‬

‫)‪B*C^2- A+ (B-1‬‬

‫‪3‬‬

‫)‪35.5 MOD ( 20.1\3.4 + 5‬‬

‫‪23‬‬

‫‪3*5\2+4^2‬‬

‫‪(-1) ^2 = 1‬‬
‫‪8150718070‬‬

‫‪-1 ^2 = -1‬‬
‫عامر سعود النابلسي‬

‫‪16 ^ (1/2) = 4‬‬

‫‪16 ^ 1/2 = 8‬‬

‫‪8108230001‬‬

‫‪5‬‬

‫سادساً التعابير المنطقية‪:‬‬

‫ التعبري املنطق البس يط‪ :‬هو مجةل خبرية تكون قميهتا اما صوااب (‪) True‬‬‫أأو خطأأ (‪ )False‬ويس تخدم معليات املقارنة ( مثل = > < )‪.‬‬
‫ التعبري املنطق املركب‪ :‬هو التعبري اذلي حيتوي عىل معامالت املقارنة‬‫وواحد عىل ا ألقل من املعامالت املنطقية مثل ( ‪.) AND – OR‬‬
‫‪ -‬معليات املقارنة يف لغة ‪:QBASIC‬‬

‫العملية‬

‫الوصف‬

‫الحساب‬

‫‪QBasic‬‬

‫=‬

‫يساوي‬

‫‪A=B‬‬

‫‪A=B‬‬

‫<‬

‫أقل من‬

‫‪A<B‬‬

‫‪A<B‬‬

‫>‬

‫أكبر من‬

‫‪A>B‬‬

‫‪A>B‬‬

‫=<‬

‫أقل من أو يساوي‬

‫‪A≤B‬‬

‫‪A <= B‬‬

‫=>‬

‫أكبر من أو يساوي‬

‫‪A≥B‬‬

‫‪A >= B‬‬

‫><‬

‫ال يساوي‬

‫‪A≠B‬‬

‫‪A <> B‬‬

‫أوالً كتابة التعابير المنطقية بلغة ‪:QUICK BASIC‬‬

‫مثال‪ :‬اكتب العبارات ا ألتية بلغة ‪:QUICK BASIC‬‬
‫ الراتب ‪ S‬أأقل أأو يساوي التاكليف ‪.M‬‬‫ معر الطالب أأمحد (‪ )A‬أأكرب من معر الطالب خادل (‪.)K‬‬‫ املعدل )‪ (A‬ل يقل عن ‪ 46‬وعالمة اللغة العربية )‪ (AS‬أأكرب من أأويساوي ‪. 31‬‬‫ الوزن ‪ W‬ل يزيد عن ابيق قسمة ‪A‬عىل ‪ B‬و الكتةل ‪ K‬ل تساوي القمية املطلقة للعدد ‪.Q‬‬‫ثانياً الجداول المنطقية ‪ /‬جدوال الصواب والخطأ‪:‬‬

‫املعامل املنطق ‪ :‬هو عبارة عن معامالت تس تخدم للربط بني تعبريين بس يطني لتكوين مجةل خربية مركبة‪.‬‬
‫املعامالت املنطقية املس تخدمة يف لغة ‪:QBASIC‬‬
‫أأ) املعامل ‪ : AND‬يعط انجتا صائبا اذا اكن لك من التعبريين املنطقيني البس يطني صوااب‪ ،‬ويعط انجت ًا خاطئ ًا اذا اكن ً‬
‫لك‬
‫من التعبريين املنطقيني البس يطيني أأو أأحدهام خاطئاً‪.‬‬
‫ب) املعامل ‪ : OR‬يعط انجتا صائبا اذا اكن أأي من التعبرييني املنطقني البس يطني أأو لكهام صائبا ويعط انجتا خاطئا اذا‬
‫اكن لك التعبريين املنطقيني البس يطني خاطئ ًا‪.‬‬
‫‪A OR B‬‬

‫‪B‬‬

‫‪A‬‬

‫‪A AND B‬‬

‫‪B‬‬

‫‪A‬‬

‫‪T‬‬
‫‪T‬‬
‫‪T‬‬
‫‪F‬‬

‫‪T‬‬
‫‪F‬‬
‫‪T‬‬
‫‪F‬‬

‫‪T‬‬
‫‪T‬‬
‫‪F‬‬
‫‪F‬‬

‫‪T‬‬
‫‪F‬‬
‫‪F‬‬
‫‪F‬‬

‫‪T‬‬
‫‪F‬‬
‫‪T‬‬
‫‪F‬‬

‫‪T‬‬
‫‪T‬‬
‫‪F‬‬
‫‪F‬‬

‫‪8150718070‬‬

‫عامر سعود النابلسي‬

‫‪8108230001‬‬

‫‪6‬‬

‫مثال‪ :‬أأمكل اجلداول ا ألتية ‪:‬‬

‫‪A OR B‬‬

‫‪A AND B‬‬

‫)‪B OR ( A AND B‬‬

‫‪A AND B‬‬

‫)‪X OR ( X and Y‬‬

‫‪X OR Y‬‬

‫‪B OR A AND B‬‬

‫‪A OR B AND C‬‬

‫‪B‬‬

‫‪A‬‬

‫‪TRUE‬‬

‫‪TRUE‬‬

‫‪FALSE‬‬
‫‪B‬‬

‫‪TRUE‬‬
‫‪A‬‬

‫‪TRUE‬‬

‫‪TRUE‬‬

‫‪FALSE‬‬

‫‪TRUE‬‬

‫‪Y‬‬

‫‪X‬‬

‫‪TRUE‬‬

‫‪TRUE‬‬

‫‪FALSE‬‬

‫‪TRUE‬‬

‫‪C‬‬

‫‪T‬‬

‫‪B‬‬

‫‪A‬‬

‫‪F‬‬

‫‪T‬‬

‫‪T‬‬

‫‪T‬‬

‫‪T‬‬
‫‪F‬‬

‫‪F‬‬

‫‪F‬‬

‫‪F‬‬

‫‪F‬‬

‫‪T‬‬

‫‪F‬‬
‫‪F‬‬

‫‪ -‬عند ايجاد ناتج التعابير المنطقية يجب مراعاة قواعد األولوية األتية‪:‬‬

‫‪ )1‬العمليات احلسابية‪.‬‬

‫‪ )2‬معليات املقارنة‪.‬‬

‫‪ )8‬املعامل املنطق ‪.AND‬‬
‫مثــــال‪ :‬ما انجت التعابري املنطقية الآتية اإىل لغة ‪:QB‬‬

‫‪ )7‬املعامل املنطق ‪.OR‬‬

‫‪A=2 , B=3 , C=4 Q=3 , W=5 , K=2‬‬
‫‪T‬‬

‫‪A<W AND K<>(A-K) OR (C*A)=0‬‬

‫‪T‬‬

‫‪(A>B AND B>C) OR C>A OR B<A‬‬

‫‪A=10 , B=7 , C=2 , D=5‬‬
‫‪T‬‬

‫‪9>7 OR 2+5<7‬‬

‫‪8150718070‬‬

‫‪F‬‬

‫عامر سعود النابلسي‬

‫)‪B<C AND (D<>A-C OR A>-D*3‬‬

‫‪8108230001‬‬

‫‪7‬‬

‫سؤال‪ :‬اكتب مثاالً واحداً صحيحا ً لكل مما يأتي‪:‬‬

‫اثبت رمزي‪:‬‬
‫تعبري حسايب بس يط‪:‬‬

‫ متغري عددي‪- :‬‬‫ معامل منطق ‪- :‬‬‫‪ -‬تعبري حسايب مركب‪:‬‬

‫ اثبت عددي‪- :‬‬‫‪ -‬تعبري منطق بس يط‪:‬‬

‫متغري رمزي‪:‬‬
‫‪ -‬تعبري منطق مركب‪:‬‬

‫سؤال‪ :‬اكتب التعابير اآلتية بلغة ‪:QB‬‬

‫سؤال‪ :‬ما ناتج التعابير اآلتية‪ ،‬حيث أن‪:‬‬

‫‪A=4 Z=3 B=2 Y=2‬‬

‫‪-3‬‬

‫‪(A+5) MOD B-A*B^2+A^2/B+9\2‬‬

‫‪5‬‬

‫‪20+4+4/2/2 -4^2 -2/2 *4‬‬

‫‪8150718070‬‬

‫عامر سعود النابلسي‬

‫‪890‬‬

‫‪3‬‬

‫‪X=5‬‬

‫)‪10* (3 * X ^ 2 +7 * Y‬‬

‫‪27 MOD (2^2+4) – 104 MOD 2‬‬

‫‪8108230001‬‬

‫‪8‬‬

‫سؤال‪ :‬ما قيمة ‪ N‬في كل من الحاالت اآلتية‪:‬‬
‫‪C=3‬‬
‫‪17‬‬

‫‪B=2‬‬

‫)‪N= (A+B*5) + (C*A^2/B) / (C+5‬‬

‫‪X=4‬‬
‫‪11‬‬

‫‪C=2‬‬

‫‪159‬‬

‫سؤال‪ :‬ما ناتج التعابير المنطقية اآلتية‪ ،‬علما ً أن‪:‬‬

‫‪(4+7<2*7 OR 4*2>7) AND 15>=7+4 T‬‬

‫‪B=4‬‬

‫‪3) X=2‬‬

‫‪N= ((X+C) * (B+ ( 2^2)^2))-6/C‬‬

‫‪A=10‬‬

‫‪C=2‬‬

‫)‪B<C AND (D<>A-C OR A>-D*C‬‬

‫‪8150718070‬‬

‫‪2) A=2‬‬

‫‪N= ((X+14*C) / (2*X^2)) + X/C + A^3‬‬

‫‪C=6‬‬

‫‪F‬‬

‫‪1) A=4‬‬

‫‪T‬‬

‫‪F‬‬

‫عامر سعود النابلسي‬

‫‪D=5‬‬

‫‪B=7‬‬

‫‪A<D OR D<>B AND D-C>1‬‬

‫‪2+2^3>=9 AND 2<>5\2 OR 7MOD2=3‬‬

‫‪8108230001‬‬

‫‪9‬‬