طلبات الأعضاء للعام الدراسي 2012-2013

[السيد شعبان]

بنسبة للسؤال الثالث في الفصل الثاني تم تعديل النهايات لتصبح 65 بدل من 64 و 75 بدل من 74 وهكذا فتصبح اجابة مقبول صحيحة في حالة 64.4
في الفصل الثاني بداخل الكتاب نجد أن If ...then .....Elseif تستخدم في حالة وجود أكثر من تعبير شرطي وفي الكتاب أيضا أن جملة Select Case تعمل مثل جملة If ...then .....elseif
أم المعاملات المنطقية فتستخدم للربط بين التعبيرات الشرطية لتكوين الشروط المركبة

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة السيد شعبان

بنسبة للسؤال الثالث في الفصل الثاني تم تعديل النهايات لتصبح 65 بدل من 64 و 75 بدل من 74 وهكذا فتصبح اجابة مقبول صحيحة في حالة 64.4
في الفصل الثاني بداخل الكتاب نجد أن if ...then .....elseif تستخدم في حالة وجود أكثر من تعبير شرطي وفي الكتاب أيضا أن جملة select case تعمل مثل جملة if ...then .....elseif
أم المعاملات المنطقية فتستخدم للربط بين التعبيرات الشرطية لتكوين الشروط المركبة

جزاكم الله خيراً كلام سليم تماماً

[اياد ادهم]

لو سمحتم حد يشرح السؤال السادس
عند كتابة الكود يحتاج المبرمج لوضع تعليق معين لا يتم تنفيذه لا بد ان يسبقه :
1- علامة ! او 2- Rem
ما معني هذا ولا يوجد له شرح بالكتاب

[asdzaza]

1– حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :

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
ارجو توضيح كيفيه الحصول على المتفير K

[hassanalhawy]

المشاركة الأصلية كتبت بواسطة اياد ادهم

لو سمحتم حد يشرح السؤال السادس
عند كتابة الكود يحتاج المبرمج لوضع تعليق معين لا يتم تنفيذه لا بد ان يسبقه :
1- علامة ! او 2- rem
ما معني هذا ولا يوجد له شرح بالكتاب

الشرح موجود بالكتاب ص 14 بالفصل الأول

[hassanalhawy]

طلب زميل حل التدريب رقم 1 فى التدريبات العملية على الفصل الثانى ص 50 الخاص بعناصر الكيمياء فى مادة العلوم .
وقد طلب كتابة الكود بالستخدام جملة Select Case وتم تلبية طلبه ولكن كان الكود طويلاٍ بعض الشئ
وقد وجدت كود بسيط لحل هذه المشكلة وذلك باستخدام أكثر من متغير مع جملة Select Case
كما يلى :

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim o As Boolean = Me.RadioButton1.Checked
        Dim na As Boolean = Me.RadioButton2.Checked
        Dim mg As Boolean = Me.RadioButton3.Checked
        Dim al As Boolean = Me.RadioButton4.Checked
        Select Case True
            Case o = True
                Me.Label4.Text = "O"
                Me.Label5.Text = "8"
                Me.Label6.Text = "16"
            Case na = True
                Me.Label4.Text = "Na"
                Me.Label5.Text = "11"
                Me.Label6.Text = "23"
            Case mg = True
                Me.Label4.Text = "Mg"
                Me.Label5.Text = "12"
                Me.Label6.Text = "24"
            Case al = True
                Me.Label4.Text = "Al"
                Me.Label5.Text = "13"
                Me.Label6.Text = "27"
            Case Else
                MsgBox("يرجى اختيار أحد العناصر")
        End Select

    End Sub
End Class

[المهدي مصطفى السعيد]

شكرا جزيلا للأستاذ / السيد شعبان .....
شكرا جزيلا للأستاذ / أحمد قرني .....
شكرا جزيلا للأستاذ / حسن الحاوي ..... جزيتم عنا كل خير ولكن في تمرين التقديرات الأستاذ سيد شعبان قال نغير النهايات لتصبح 85 بدلا من 84 وهكذا 75 بدلا من 74 و65 بدلا من 64 ما رايك لو غيرنا النهايات لتصبح 84.9 و75.9 و64.9 حتى لا يتم تكرار قيمة معينة مثل 65 مثلا التي اصبحت بداية التقدير جيد ونفس القيمة نهاية للتقدير مقبول ...صحيح انه سيختاره جيد وذلك لأنها ستقابله اولا في الشروط ...أشكركم جميعا وشكر خاص للاستاذ / حسن الحاوي على حل مثال عناصر العلوم باستخدام Select case ...

[asdzazax]

محتاج ملخص للمنهج

[asdzazax]

محتاج ملخص للمنهج

[hassanalhawy]

الكتاب المدرسى هو أفضل ملخص
هوا فيه ملخص زى الكتاب

[سلمىاحمد]

كيف احل السؤال الثالث فى الاختبار الاول بالكتاب المالسؤال الثالث : أجب عما يلى :
1 – حدد قيمة كل متغير بعد تنفيذ الكود Code التالى
درسىDim N, K, C As IntegerC = 10
For N = 1 To 10 Step 5
K = K + N
Next
IF N >= C Then
C = C + 1
End

[bosyramy]

1– حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :

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
ارجو توضيح كيفيه الحصول على المتفير K


لايجاد قيمة K لابد من معرفة عدد مرات التكرار اولا من N

11 , 6 , 1 N
7 , 1 K

عدد مرات التكرار 2
اذن 11 = N
7 = K
1 +C =C
11 =C

[bosyramy]

1– حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :

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
ارجو توضيح كيفيه الحصول على المتفير K


لايجاد قيمة K لابد من معرفة عدد مرات التكرار اولا من N

11 , 6 , 1 N
7 , 1 K

عدد مرات التكرار 2
اذن 11 = N
7 = K
1 +C =C
11 =C

[hassanalhawy]

المشاركة الأصلية كتبت بواسطة سلمىاحمد

كيف احل السؤال الثالث فى الاختبار الاول بالكتاب المالسؤال الثالث : أجب عما يلى :
1 – حدد قيمة كل متغير بعد تنفيذ الكود code التالى
درسىdim n, k, c as integerc = 10
for n = 1 to 10 step 5
k = k + n
next
if n >= c then
c = c + 1
end

.....C.....k.....N
.....0.....0.....10
-------------------
.....1.....1.....10
.....6.....7.....10
....11....7.....10
....11....7.....11

[hassanalhawy]

المشاركة الأصلية كتبت بواسطة asdzaza

1– حدد قيمة كل متغير بعد تنفيذ الكود Code التالى :

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
ارجو توضيح كيفيه الحصول على المتفير K

.....C.....k.....N
_____________
.....0.....0.....0
.....0.....0.....10
-------------------
.....1.....1.....10
.....6.....7.....10
....11....7.....10
_____________
....11....7.....11