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

[hassanalhawy]

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

السلام عليكم ورحمة الله وبركاتة
برجاء توضيح في الفصل الرابع معني الدالة ( Factorial ) وما معني تعود بقيمة ؟ وما معني return ؟
أتمني أن يشرح لي أحد الأساتذة هذة الأكواد و التدريبات مشكوراً
أخوكم في الله
سمير صبري

الدالة Factorialهو اسم للدالة قد يكون أى اسم آخر معبر عن وظيقتها أو مضمونها قد يكون مثلاً Mdroup . ومضروب العدد 5 مثلاً هو 5*4*3*2*1

  
Public Class Form1
  
  Function Factorial(ByVal Number As Integer) As Integer
  
    Dim i As Integer
  
    Dim res As Integer = 1
  
    For i = 1 To Number
  
        res = res * i
  
    Next
  
    Return res
  
  End Function
  
  Private Sub Button1_Click(ByVal ...
  
    MessageBox.Show(Factorial(8))
  
  End Sub
  
End Class

1 الإعلان عن الدالة Factorialمن النوع العددى Integer وتستقبل قيمة ( معامل أو وسيط ) واحدة هى Number.
2 الإعلان عن معامل ( وسيط ) واحد للدالة Factorialهو Numberمن النوع العددى Integer.
3 الإعلان عن المتغيرi كعداد لعملية التكرار من النوع العددى Integer.
4الإعلان عن المتغير res لتخزين ناتج حساب مضروب العدد من النوع العددى Integer الذى يوافق نوع بيان الدالة Sum ، وهو يمثل القيمة الراجعة ( العائدة ) من الدالة Factorialعند استدعائها.
5 تم إظهار القيمة الراجعة ( العائدة ) من الدالة Factorialفى صندوق رسالة MessageBox بعد استدعاء الدالة ، وذلك بعد استقبال القيمة 8 كـ Argument للدالة Factorial.
6تم استخدام الدالة المعرفة Show( ) المعلنة داخل التصنيف MessageBox والتى من خلالها يمكن إظهار صندوق رسالة MessageBox يتحدد محتوياته حسب الوسائط المعطاه للدالة Show( ).
7 يمكن كتابة الأمر For i = 1 To Number بهذه الطريقة وستؤدى لنفس النتائج For i = Number To 1 step -1 .

[samermym]

أشكرك أستاذ حسان الحاوي أستاذي العزيز علي ردك وشرحك
أرجو أن يتسع صدرك لي
ما معني return ؟ القيمة الراجعة لماذا وأين استخدمها
أخوك
سمير صبري

[hassanalhawy]

القيمة الراجعة res فى التمرين السابق تمثل ناتج الدالة Factorial
وهذه الدالة تعود بالقيمة res بسبب الأمر return
حيث نستطيع عند استدعاء الدالة Factorial فى أى إجراء آخر استخدام هذه القيمة الراجعة res أو هذا الناتج فى أى إجراء آخر وذلك بوضع الدالة Factorial فى الطرف الأيمن من أمر التخصيص أو بوضعها فى أى خاصية أخرى أو دالة أخرى أو وسيلة أو متغير
مثل Label1.Text=Factorial(8)
أو MessageBox.Show(Factorial(8))
أو ListBox1.Items.Add(Factorial(8))

[samermym]

أشكرك أستاذ حسن علي ردك و اهتمامك
بارك الله لك
أخوك سمير صبري

[يحيى عاشور أحمد]

ياريت حد يضيف تحضير الفصل الدراسي الثاني للصف الثالث الإعدادي ويكون تحضير معتمد

[aazz_200561]

C = 10
For N = 1 To 10 Step 5
K = K + N
Next
IF N >= C Then
C = C + 1
End IF

أنا فاهم قيمة c,k لكن مشفاهم n=11 أزاى المفروض تساوى 13 والتى هى نهاية التكرار فلى العداد ارجو شرح المثال بالتفصيل ولكن سريعا جدا من فضلكم

[hassanelbash]

اذا ذكرت قيمة العداد بعد الحلقة التكرارية فأنها تأخذ القيمة الأعلى من End
و هنا العداد N بعد Next أى بعد نهاية الحلقة فكانت القيم داخل الحلقة ( 1 , 6 )
و قيمته بعد Next ستكون بزيادة 5 و هى (11)
و بالتالى فى الشرط (N > = C) ستكون N تساوى 11 و C تساوى 10 فيكون قيمة الشرط (True)
و سيتم تنفيذ ما بعد (Then) أى (C= C + 1) و ستكون c تساوى 11
و هذا المثال الوحيد الذى تم فيه ذكر العداد بعد Next

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

في البداية عند For ثيمة العداد تساوي واحد فيبدأ التكرار حتى نصل إلي Next فنويد قية N بمقدار 5 فتصبح 6 ونقارن هل هي أكبر من قيمة النهاية فالاجابة خطأ فيتم تنفيذ التكرار مرة أخرى حتي نصل إلي Next فنويد N بمقدار 5 فتصبح 11 ونقارن هل هي أكبر من قيمة النهاية فالاجابة صحيحة فينتهي التكرار ويبدأ بتنفيذ الاوامر التي تلي Next وبذلك تصبح n تساوي 11

[yassminramy]

لا ن 11 اكبر من قيمة نهايه العداد وهى 10 وايضا عدد مرات التكرار 2 فقط
وبالتوفبق

[أحـمد قرنى]

علمنا ان الدالة Isnumeric من الدوال المعرفة والتى لها ناتج True او False حسب محتوى مربع الكتابة سواء اذا كان عددى ام حرفى
واذا كان عددى تاخذ الدالة القيمة True غير ذلك تأخذ القيمة False

ولكن بتنفيذى لهذ الكود
Dim a As Boolean
MsgBox(IsNumeric(a))
أعطى ناتج True مع العلم ان المتغير a ليس له ناتج عددى بل ناتجه منطقى فما تفسير ذلك

وجزاكم الله خيراً

[tmrmsr]

تحية طيبة لحضرتك
أما بعد
Dim a As Boolean
((MsgBox(IsNumeric(a

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

عند استخدام الدالة IsNumeric الوسيط a وتستقبله على شكل Object ( عددي - حرفي - ...الخ)
تستخدمه الدالة في أسطر الكود الخاصة بها وهي مخفية عنا وفقا لقاعدة التغليف
وذلك لتقييمة هل هو قيمة رقمية أم لا

وبناء عليه تم اعتبار a كقيمة رقمية

مثال
عند عمل تحويل للقيمة True ل Integer تأخذ القيمة -1
عند عمل تحويل للقيمة false ل Integer تأخذ القيمة 0
وهذا لا يعني أن الدالة IsNumeric تقوم بهذا النوع من التحويل

Parameters:
Expression: Required. Object expression.

Return Values:
Returns a Boolean value indicating whether an expression can be evaluated as a number.

وشكرا

[زياد_عاطف]

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

تحية طيبة لحضرتك
أما بعد
Dim a As Boolean
((MsgBox(IsNumeric(a

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

عند استخدام الدالة IsNumeric الوسيط a وتستقبله على شكل Object ( عددي - حرفي - ...الخ)
تستخدمه الدالة في أسطر الكود الخاصة بها وهي مخفية عنا وفقا لقاعدة التغليف
وذلك لتقييمة هل هو قيمة رقمية أم لا

وبناء عليه تم اعتبار a كقيمة رقمية

مثال
عند عمل تحويل للقيمة True ل Integer تأخذ القيمة -1
عند عمل تحويل للقيمة false ل Integer تأخذ القيمة 0
وهذا لا يعني أن الدالة IsNumeric تقوم بهذا النوع من التحويل

Parameters:
Expression: Required. Object expression.

Return Values:
Returns a Boolean value indicating whether an expression can be evaluated as a number.

وشكرا

==============================
أستاذنا العزيز شكرا لحضرتك لكن لى تعليق و هو خاص بالعبارة

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

و الأدق هو من وجهة نظرى
حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية False

Dim x as Boolean
MsgBox(x)0

قيمة المتغير x التى تظهر فى مربع الرسالة هى False

===============================================

عاطف حسان / ميت موسى

[سيف سالم]

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

==============================
أستاذنا العزيز شكرا لحضرتك لكن لى تعليق و هو خاص بالعبارة

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

و الأدق هو من وجهة نظرى
حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية False

Dim x as Boolean
MsgBox(x)0

قيمة المتغير x التى تظهر فى مربع الرسالة هى False

===============================================

عاطف حسان / ميت موسى

استاذ عاطف الموضوع باختصار ان
IsNumeric لها حالات true وحالات false من بين حالات ال true هي boolean
وخير الكلام ما قل ودل
بس الان على رأي اخوك الاستاذ حسن.
سمك لبن تمر هندي

[tmrmsr]

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

==============================
أستاذنا العزيز شكرا لحضرتك لكن لى تعليق و هو خاص بالعبارة

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

و الأدق هو من وجهة نظرى
حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية False

Dim x as Boolean
MsgBox(x)0

قيمة المتغير x التى تظهر فى مربع الرسالة هى False

===============================================

عاطف حسان / ميت موسى

كتبت بالخطأ معذرة

[سيف سالم]

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

تحية طيبة لحضرتك
أما بعد
Dim a As Boolean
((MsgBox(IsNumeric(a

حضرتك أعلنت عن متغير من النوع Boolean دون تخصيص قيمة له
بناء علية يأخذ القيمة الأفتراضية True

عند استخدام الدالة IsNumeric الوسيط a وتستقبله على شكل Object ( عددي - حرفي - ...الخ)
تستخدمه الدالة في أسطر الكود الخاصة بها وهي مخفية عنا وفقا لقاعدة التغليف
وذلك لتقييمة هل هو قيمة رقمية أم لا

وبناء عليه تم اعتبار a كقيمة رقمية

مثال
عند عمل تحويل للقيمة True ل Integer تأخذ القيمة -1
عند عمل تحويل للقيمة false ل Integer تأخذ القيمة 0
وهذا لا يعني أن الدالة IsNumeric تقوم بهذا النوع من التحويل

Parameters:
Expression: Required. Object expression.

Return Values:
Returns a Boolean value indicating whether an expression can be evaluated as a number.

وشكرا

انا لله وانا اليه راجعون

IsNumeric returns True if the data type of Expression is Boolean, Byte, Decimal, Double, Integer, Long, SByte, Short, Single, UInteger, ULong, or UShort, or an Object that contains one of those numeric types. It also returns True if Expression is a Char or String that can be successfully converted to a number.

IsNumeric returns False if Expression is of data type Date or of data type Object and it does not contain a numeric type. IsNumeric returns False if Expression is a Char or String that cannot be converted to a number.

هذه هي الدالة
بدون تغليف او فلسفة لانتصار لرأي