أحـمد قرنى
07-05-2014, 12:00 AM
لو سمحتم
t=12 y=3 m=2.2
for x = 1 to t stepy
m=m*2
قيمة x = 1 , 4 , 7 , 10 , 13
قيمة m = 4 , 8 , 16 , 32
t=12 y=3 m=2.2
for x = 1 to t stepy
m=m*2
قيمة x = 1 , 4 , 7 , 10 , 13
قيمة m = 4 , 8 , 16 , 32
مشاهدة النسخة كاملة : طلبات السادة الأعضاء للعام الدراسي 2015-2016 الصفحات :
1
[2]
أحـمد قرنى 07-05-2014, 12:00 AM لو سمحتم t=12 y=3 m=2.2 for x = 1 to t stepy m=m*2 قيمة x = 1 , 4 , 7 , 10 , 13 قيمة m = 4 , 8 , 16 , 32 أحـمد قرنى 07-05-2014, 12:01 AM Try/catch تستخدم اثناء التشغيل ولا اثناء التشغيل والتصميم أثناء تشغيل البرنامج أحـمد قرنى 07-05-2014, 12:05 AM يتم الاعلان عنه واعطائه قيمة اثناء الاعلان فقط...... * لحساب معادلة من الدرجة الاولى dim ........, y as single if ............. Textbox.text then y = .................. ....=3*x+2 label.text = y ............ من فضلك ادخل قيمة رقمية end if 1- الثوابت 2- dim x, y as single if isnumeric (Textbox.text ) then y = textbox . text y=3*x+2 label.text = y ( " من فضلك ادخل قيمة رقمية " ) msgbox ( ) textbox . focus "" = textbox . text end if أحـمد قرنى 07-05-2014, 12:15 AM شكرا مستر حسن بعد اذنك فى سؤال فى مذكرة الزياد 1- طباعة قيمة المتغير m x n=4 باستخدام msgbox مش فاهم ارجو التوضيح والحل . بس هنا مفيش قيمة للمتغير m . N عشان نعوض بيهم فمن الممكن انها تكون كدة msgbox ( " m" & "x" & " n " & " = " & 2 * 2 ) وممكن كدة msgbox ( " m" & "x" & " n " & " = " & 4 * 1 ) 2-اختبار قيمة المتغير salary هل هى عددية ام لا في صندوق رسالة هل هذا هو الحل msgbox isnumeric ( salary وبالتالى يكون الناتج t او f ارجو الرد فعلا حل حضرتك سليم طبعا ده بعد اذن استاذنا والاخ الفاضل استاذ حسن محمد غرباوى 07-05-2014, 01:49 PM قيمة x = 1 , 4 , 7 , 10 , 13 قيمة m = 4 , 8 , 16 , 32 اخى الفاضل احمد قرنى فى جملة For next السابقة فى حالة ذكر رسالة قبل Next اى داخل التكرار ناخذ قيمة العداد داخل التكرار x = 1,4,7,10 وفى حالة ذكر رسالة بعد Next ناخذ القيمة 13 فقط طيب وفى حالة عدم ذكر اى رسالة لا قبل ولا بعد next نأخذ قيمة العداد مش المفروض القيمة اللى توقف عندها العداد وهى 13 وليست 1,4,7,10,3 ارجو التوضيح أحـمد قرنى 07-05-2014, 03:39 PM اخى الفاضل احمد قرنى فى جملة for next السابقة فى حالة ذكر رسالة قبل next اى داخل التكرار ناخذ قيمة العداد داخل التكرار x = 1,4,7,10 وفى حالة ذكر رسالة بعد next ناخذ القيمة 13 فقط طيب وفى حالة عدم ذكر اى رسالة لا قبل ولا بعد next نأخذ قيمة العداد مش المفروض القيمة اللى توقف عندها العداد وهى 13 وليست 1,4,7,10,3 ارجو التوضيح لو قال قيمة العداد يبقى 13 وهى القيمة الاخيرة كما ذكرت لكن لو قال قيم العداد يبقى هنقول كل القيم 1 , 4 , 7 ,10 ,13 elmasry abdo 07-05-2014, 03:53 PM السلام عليكم لو سمحت انا محتاج مراجعة احياء اولي ثانوي طبقا للمحذوف لعام2014 ويارييت كمان اي فيديو يخص المادة ضروري ضروري ضروري ارجوكم عشان امتحاناتي يوم السبت الموافق 10/5/2014 mohamed aoo 07-05-2014, 04:16 PM ممكن استاذ يتكرم ويجاوبلي ع السؤال ده ضروري http://im83.gulfup.com/QXzsB5.bmp hassanalhawy 07-05-2014, 10:02 PM Very Good * hythamhhh 08-05-2014, 01:24 AM ممكن شرح الاكواد دى ضرورى يا استاذ حسن او يا استاذ احمد لحلها للطلبه ضرورى dim x as single = textbox1 . Text dim y as single = tetxbox2 . Text (label4 . Text = sum ( x , y أبو مريم2008 08-05-2014, 12:51 PM ممكن شرح الاكواد دى ضرورى يا استاذ حسن او يا استاذ احمد لحلها للطلبه ضرورى dim x as single = textbox1 . Text dim y as single = tetxbox2 . Text (label4 . Text = sum ( x , y dim x as single = textbox1 . Text الاعلان عن المتغير X من النوع Single وتخصيص له قيمة الخاصية Text للأداه TextBox1 dim y as single = tetxbox2 . Text الاعلان عن المتغير Y من النوع Single وتخصيص له قيمة الخاصية Text للأداه TextBox2 ومعناهم ببساطه الاعلان عن المتغير وتخصيص له القيمة التى سوف يدخلها المستخدم داخل الأداة TextBox (label4 . Text = sum ( x , y ملغى hassanalhawy 08-05-2014, 12:57 PM يقوم هذا الكود بالآتي : 1) استقبال الدرجة المدخلة بواسطة المستخدم في صندوق النص TextBox1 وتخزينها في المتغير X في الذاكرة . 2) استقبال الدرجة المدخلة بواسطة المستخدم في صندوق النص TextBox2 وتخزينها في المتغير Y في الذاكرة . 3) إستخدام الدرجتان X و Y كـ Agrument فى الدالة Sum ، وتخصيص قيمة ناتج هذه الدالة للخاصية Text للأداة Label4 ملحوظة الدالة Sum فى هذا التدريب غير معروف عملها ، لأن هذا السؤال واضح أنه مقتطع من سؤال كبير omarmoh 26-05-2014, 06:31 PM أرجو من السادة الافاضل توضيح هذه المعلومة هل الحاسب الآلى بالنسبة للصف الثالث الاعدادى العام القادم سيضاف للمجموع ام لا ارجو الافادة محمد01111 12-09-2014, 11:33 AM ممكن دفتر تحضبر للصف الثالث الاعدادي ولكم الشكر essambesso 28-09-2014, 11:30 AM سلام عليكم ورحمة الله وبركاته ياريت يا جماعة حد ينزلنا مزكرة الشروق الترم الثانى كان معانا في الترم الاول بجد مزكرة محترمة [/] mahmoud_nasr1986 04-02-2015, 03:44 PM ممكن اذا سمحتوا عاوز مذكرة للترم التانى لغات ضروررررررى mena zakzouk 07-02-2015, 10:14 PM نرجو رفع لمتحانات الترم الثاني 2014 ورد لو سمحتم بيدومجدى 15-02-2015, 03:10 PM 1- تستخم جملة التخصيص لحجز مكان للمتغير بالذاكرة ( x ) 2- يمكن استخدام الثابت فى طرفى جملة التخصيص ( x ) انا عارف ان التخصيص يقصد به تخزين القيم فى المتغيرات وان حجز مكان للمتغير عن طريق الاعلان عن المتغيرات بس انا عايز اتاكد الاجابة دى صح ام لا محمد اشرف 17-02-2015, 07:16 PM دفتر تحضر الحاسب الالي الترم الثاني للصف الثالث الاعدادي Mr.Ali Mohamed Ali 21-02-2015, 05:26 AM 1- تستخم جملة التخصيص لحجز مكان للمتغير بالذاكرة ( x ) 2- يمكن استخدام الثابت فى طرفى جملة التخصيص ( x ) انا عارف ان التخصيص يقصد به تخزين القيم فى المتغيرات وان حجز مكان للمتغير عن طريق الاعلان عن المتغيرات بس انا عايز اتاكد الاجابة دى صح ام لا 1- خطأ ..... والصواب "لتخصيص قيمة للمتغير " الإعلان عن المتغير هو الذي يحجز مكان بالذاكرة . 2- خطأ أيضاً ..... فقيمة الثابت تخصص له في سطر الإعلان ولمرة واحدة إلا إذا كنت تقصد تخصيص قيمة لثابت بثابت آخر const x as integer=f.. وهذا موضوع آخر... المتغير هو الذي من الممكن أن يأتي في طرفي جملة التخصيص . Mr.Ali Mohamed Ali 21-02-2015, 05:37 AM نرجو رفع لمتحانات الترم الثاني 2014 ورد لو سمحتم أخي الفاضل هناك موضوع كامل مثبت بنفس العنوان للأستاذ الفاضل / أحمد قرني ..... بيدومجدى 21-02-2015, 07:12 PM جزاك الله كل خير mahmoud golden 27-02-2015, 05:42 PM ارجو من السادة الزملاء رفع امتحانات حتى عام 2014 بصيغة ورد او pdf سلمىاحمد 01-03-2015, 09:21 PM ممكن حد يفهمنى اجابه السؤال ده If x<y then z=k+J x=x+1 y=y-1 Else z=k-y x=x+2 y=y-2 end If osamaosama11 07-03-2015, 03:42 PM السلام عليكم ورحمة الله وبركاته ارد تحضير الفصل الدراسي الثاني للصف الثالث الاعدادي pdf لو ممكن ويا ريت فى اسرع وقت ممكن وجزاكم الله خيرا بيدومجدى 09-03-2015, 04:43 PM اذكر ناتج الكود التالى: 1-Label.text= isnumeric ( " ahmed" ) 2-Label.text= isnumeric ( " 200") 3-Label.text= isnumeric (200) اذكر ناتج الكود التالى: Dim s as integer = 100 Label.text= isnumeric ( s ) Label.text = ……… mahmoudbeso 16-03-2015, 12:56 AM سؤال خاص بالصف الثالث الاعدادي ... الفصل الثاني ( التفرع ) من اسئلة كتاب الوزارة صح ام خطأ ؟ تستخدم جملة select case في حالة اختبار اكثر من تعبير شرطي بجملة شرطيه واحدة (......) ** في رايي انها خطأ ** كتاب الوزارة منزل الاجابه صح ** كتاب الفائز منزل الاجابه خطأ ارجو التوضيح من الاساتذه الزملاء بيدومجدى 17-03-2015, 07:24 AM لمشاركة الأصلية كتبت بواسطة mohammadsalama رجو الرد سريعا حل التدريب التالى ب- قم بقراءة الاكواد التالية ثم اجب dim a , b , c a s integer b = 10 c = b / 2 for a = 6 to 3 step-3 b = b – 1 c = c + 1 next msg box ( a ) msg box ( b ) msg box ( c ) قيمة المتغير a هى .......... ، وقيمة المتغير b هى .......... ، وقيمة المتغير c هى ............. . كم عدد مرات التكرار مع الشرح لو سمحت ماهر عمرو 1 17-03-2015, 12:17 PM نريد اختبارات ميد ترم ثانى فى الحاسب للصفوف الثلاث الاعدادية venna 18-03-2015, 08:54 PM السلام عليكم اسمحولى ارد على الاسئلة اللى عارفاها اولا بخصوص سؤال الاستاذة سلمى احمد السؤال دا فى قيم مبدأئية لللمتغيرات موجودة ف التعديل وعلى اساسها هنشتغل والقيم دى هى y = 1 , k = 1 , j = 3 , z =10 , x =2 ومن هنا هنلاقى ان الشرط متحققش لان x ليست اصغر من y فيتم تنفيذ مابعد else venna 18-03-2015, 09:03 PM بخصوص سؤال الاستاذ محمود عن جملة select case انا من رايى انها صحيحة زى مالكتاب المدرسى بيقول لسبب بسيط الجملة الشرطية الواحدة هى التى تبدأ ب IF وتنتهى ب END IF ايا كانت حالاتها تختبر تعبير شرطى واحد او اكثر من تعبير شرطى كما فى ELSE IF وكذلك select case جملة شرطية واحدة تنتهى ب end select ويمكنها اختبار اى عدد من التعبيرات الشرطية فى نفس الجملة انا بشبهها زى ماتكون بتفتح قوس وتقفله دا يعتر جملة شرط احدة ولو فتحت القوس تانى يعنى انت بتبدا جملة جديدة والله اعلم:D venna 18-03-2015, 09:17 PM بخصوص سؤال الاستاذ بيدو مجدى مبدائيا كدا عدد مرات التكرار مرتين فقط وهى 6 و 3 وعند الصفر هيخرج من التكرار اذا قيمة المتغير aهى 0 ومع كل مرة تكرار يتغير كل من b , c المرة الاولى يكون كالتالى b=10-1 المرة الثانية b=9-1 اما المتغير c المرة الاولى c=5+1 حيث ان قيمة ال c الاولية هى 10/2 المرة الثانية c=6+1 عند الخروج من الحلقة التكرارية يكون معنا اخر نواتج للثلاث متغيرات وهى a=0 , b=8 , c=7 بيدومجدى 19-03-2015, 07:47 AM Dim r As Integer = 1 Do While r <= 1 r = r - 2 Loop MsgBox(r) ارجو التوضيح والشرح لماذا قيمة R Overflow بيدومجدى 21-03-2015, 09:48 AM شكرا جزيلا بيدومجدى 21-03-2015, 09:51 AM dim r as integer = 1 do while r <= 1 r = r - 2 loop msgbox(r) ارجو التوضيح والشرح لماذا قيمة r overflow ياريت اى حد من السادة الاساتذة جزاه الله كل خير يقوم بالتوضيح venna 21-03-2015, 01:02 PM السلام عليكم الحلقة التكررية لاتنتهى لان قيمة المتغير سوف تظل دائما اقل من الواحد فى المرة الاولى سوف يد خل التكرار ويكون الناتج r=1-2 -1 وطبعا -1 اصغر من 1 فيدخل مرة اخرى ويكون الناتج بالسالب ايضا -3 وهكذا وبالتالى سوف يظل البرنامج فى تدفق لانهائى ولا يخرج من التكرار وهذا المصطلح يطلق عليه overflow بيدومجدى 21-03-2015, 01:10 PM اشكرك شكرا جزيلا ضياء فودة 04-04-2015, 12:55 PM لو سمحتو عايز امتحانات المحافظات 2014 كاملة بعد اذنكم 29 محافظة بيدومجدى 15-04-2015, 03:12 PM استخرج من الكود التالى امتحان المنوفية 2013 Function calc(ByVal fn As Single, ByVal sn As Single) As Decimal Dim Total As Single Total = fn + sn Return Total End Function اسم الإجراء وسائط هذا الاجراء القيمة الراجعة نوع البيان الخاص بـ الدالة وسيط الدالة القيمة الراجعة calc fn sn total Decimal single Single هو فى شرح الكتاب بيقول AS DataType نوع البيان الخاص بالقيمة الراجعة ليه هنا الاجابة الخاصة بنوع بيان القيمة الراجعة هو Single وليس Decimal ارجو التوضيح bolbola101 26-04-2015, 07:13 PM ممكن حد من الأساتذه الكرام يشرح لى الكود ده Dim r As single=0.5 Do While r>1 r= r+0.5 يعنى انا اصلا مش فاهمه Do while ازاى احل التكرار بتاعها دى مسأله كتاب الوزاره و عاوزين قيمه r وفيه كود تانى مع انى بعف احل مسأل ال for ... next بس دى مش فهماها For r=5 To 10 step-1 sum= sum+r عاوزين قيمه r والحل بتاعها 5 ارجو الشرح ولكم منى جزيل الشكر رزق درديري 02-05-2015, 12:05 PM ممكن حد من الأساتذه الكرام يشرح لى الكود ده Dim r As single=0.5 Do While r>1 r= r+0.5 يعنى انا اصلا مش فاهمه Do while ازاى احل التكرار بتاعها دى مسأله كتاب الوزاره و عاوزين قيمه r وفيه كود تانى مع انى بعف احل مسأل ال for ... next بس دى مش فهماها For r=5 To 10 step-1 sum= sum+r عاوزين قيمه r والحل بتاعها 5 ارجو الشرح ولكم منى جزيل الشكر الكود الأول : اعلن عن متغير اسمه R ونوع بيانه single وخصص له قيمة عند الاعلان 0.5 في السطر الثاني استخدم Do While وبعدها تعبير شرطي لو كان قيمة هذا التعبير الشرطي True يتم تنفيذ السطر r= r+0.5 ولكن R ليست اكبر من 1 إذن التعبير الشرطي قيمته false وتظل قيمة R هي 0.5 الكود الثاني قيمة المتغير العداد R تبدأ ب 5 وهي اقل من النهاية 10 وحيث ان قيمة الزيادة بالسالب فلن يتم تنفيذ التكرار لأن لو زودنا -1 علي قيمة البدايةلن نصل الي النهاية 10 تظل اول قيمة 5 داخل العداد R دون تنفيذ عملية الجمع بيدومجدى 05-05-2015, 07:31 AM ممكن اسئلة اكواد استدعاء دوال اجراءات الاحداث مثل ..................... و ................ و .................. ضع علامة صح ا وخطأ doubleالنوع يستخدم في تخصيص القيم الغير صحيحة فقط mahmoud golden 30-01-2016, 10:11 PM مذكرة امتحانات 2015 محافظات وامتحان شامل لكل فصل ولكم جزيل الشكر eng_adonia 02-02-2016, 08:15 PM نسخة الزياد ترم ثانى 2015 لو موجودة تترفع لأن الرابط الموجود بالموقع لا يعمل على عصمت 07-02-2016, 05:20 PM من فضلكم محتاج تحضير حاسب الى 3 اعدادى ترم ثانى وجزاكم الله خيراً نوراجمال 10-02-2016, 08:40 PM دفتر تحضر الحاسب الالي الترم الثاني للصف الثالث الاعدادي البرنس ميدو 2012 13-02-2016, 06:28 PM مذكرة حاسب الى ترم 2 الصف 3 ع رمضان باشا 15-02-2016, 06:31 AM الرجاء شرح كيفية الحصول على قيم المتغيرات المختلفة التى تأتى فى المسائل البرمجية فى الامتحانات بيدومجدى 22-02-2016, 07:09 PM صح ام خطأ لتخزين أرقام التليفونات نستخدم متغير من النوع Integer فيبي لويز لمعي 24-02-2016, 08:06 AM لو سمحت عايزة امتحانات المحافظات للصف الثالث الاعدادي لغات للترم الثاني ولكم جزيل الشكر بيدومجدى 25-02-2016, 01:29 PM عند عمل برنامج لقسمة عددين وادخال القيمة صفر للمقسوم عليه . مانوع الخطأ احمد مطلوب 07-03-2016, 03:29 PM ارجو من حضراتكم تحضير الصف الثالث الاعدادي ترم تاني2015 /2016 م بيدومجدى 08-03-2016, 07:53 PM عند عمل برنامج لقسمة عددين وادخال القيمة صفر للمقسوم عليه . مانوع الخطأ مكن لو سمحتم حد يرد على السؤال لان طالب سالنى السؤال ده وعايز الاجابة تبقى صح مائة فى المائة علشان صورتنا قدام الطلبة norsam 08-03-2016, 09:38 PM من فضلكم اريد برنامج فيجول للصف الثالث البرنامج نفسه مش الشرح وشكرا بيدومجدى 15-03-2016, 10:03 PM س : كود البرمجة المستخدم فى تفرعه جملة Select Case من السهل تحويله إلى كود مستخدم فى تفرعه جملة If Then ElseIf ( ) س : كود البرمجة المستخدم فى تفرعه جملة If Then ElseIf من السهل تحويله إلى كود مستخدم فى تفرعه جملةSelect Case ( ) على عصمت 25-03-2016, 01:43 PM خطأ لانه لايدخل ضمن العمليات الحسابية ولكن تستخدم النوع string حازم المحمدى 07-04-2016, 10:36 AM مكن لو سمحتم حد يرد على السؤال لان طالب سالنى السؤال ده وعايز الاجابة تبقى صح مائة فى المائة علشان صورتنا قدام الطلبة نوع الخطأ منطقى و هذا لأنه عند القسمة على أى عدد غير الصفر يكون هناك ناتج سواء كان الناتج موجب أو سالب أما فى حالة وجود الصفر ( كمقسوم عليه ) فلن يكون هناك ناتج و ستكون النتيجة غير معروف مثال ذلك الكود التالى : Dim A As integer A = (5+2) / (2-2) + 1 أخى الفضل الأخطاء المنطقية تحدث فى التخصيص كما هو موجود فى الكود السابق تسمى عند بعض المبرمجين بالأخطاء الخبيثة و ذلك لأنها تعطى ناتج غير المطلوب أو المتوقع و ذلك دون أن يعرف البرنامج بوجودها و لذلك يجب مراجعة الكود و الأفضل أن تدخل قيم معروف نتائجها و تقارن الناتج المعروف مسبقا بالناتج الذى خرج من البرنامج لتعرف وجود أخطاء أو عد وجود أخطاء منطقية حازم المحمدى 07-04-2016, 10:44 AM كنت أريد مناقشة هذه النقطه مع باقى الزملاء فى الكود التالى Dim A As integer For A = 1 To 3 Step 0 Label1.text = A Next Label2.Text = A ما القيمة المعروضه فى أداة العنوان Label1 و أداة العنوان Label2 و كم عدد مرات التكرار حازم المحمدى 07-04-2016, 11:10 AM طلب أخر و أتمنى أن لا يكون طلب رخم ياريت كل معلم يبعت إمتحان محافظته سواء كان مصورة بالتليفون أو كاتبة و ذلك لتجميع الإمتحانات كلها للمحافظات الــ 29 دون ترك أى محافظة و بذلك نكون قد جمعنا كل الإمتحانات لكل المحافظات و تكون مشكور لو بعثت إمتحانات الصف الأول و الثانى لقريتك أو مدينتك أنا فكرت فى هذه الفكرة لسبب أننى أريد أن أجمع أكبر عدد من الإمتحانات تقريبا 80 إمتحان للصف الثالث و كمان 120 إمتحان على الأقل للصف الأول و الثانى و عندما يقوم الطالب بحلهم يكون قد وصل للمستوى المطلوب ملحوظة : معظم الكتب الخارجية تقوم بتكرار 90 % من الإمتحانات مع تغيير اسم الإمتحان (المحافظة ) و هذا يسمى غش مما جعل الكثير من المعلمين يطلبون من الطلاب عدم شراء كتب خارجية و الإكتفاء بأسئلة الإمتحان السابقة لقريتهم طالب متميز + معلم متمكن + عدم حل إمتحانات = درجة سيئة طالب متوسط + معلم متمكن + حل إمتحانات = الدرجة النهائية |