تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] شفرة التحقق من عدد اذا كان ينتمي للسلسلة العددية
#1
السَلآْم عَلْيُكّمٌ وٍرٍحَمُةّ الله وٍبُرٍكآتُهْ

ممكن كود للتحقق من عدد معين مثلا 1142 اذا كان ينتمي للسلسلة التي تبدأ بالعدد 2 وكل عدد يزيد عن الذي قبله بمقدار ثلاثة.
وشكراً.
الرد
تم الشكر بواسطة:
#2
اذا كان العد يبدأ من 2 ويزيد بمقدار 3
فببساطة اذا طرحنا ال 2 من العدد يجب ان نحصل على عدد يقبل القسمة على 3  
يعني باقي قسمة ( الرقم - 2 ) على 3 يجب ان يساوي صفر

كود :
       If ((1142- 2) Mod 3) = 0 Then
           MsgBox("ينتمي")
       Else
           MsgBox("لا ينتمي")
       End If

للتعميم يمكنك استخدام 

كود :
       Dim CurrentNumber As Integer
   
       Dim startNumber As Integer ' = 2
       Dim stepNumber As Integer ' = 3
       
         CurrentNumber = 1142
         startNumber = 2
         stepNumber = 3
         
         
       If ((CurrentNumber - startNumber) Mod stepNumber) = 0 Then
           MsgBox ("ينتمي")
       Else
           MsgBox ("لا ينتمي")
       End If

الكود كتبته ب vb.net واعتقد انه يعمل في vb6 ايضا ولكن المهم المنطق خلفه
الرد
تم الشكر بواسطة: بوعيسى
#3
شكراً على الكود المختصر
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] شفرة التحقق من عدد اذا كان ينتمي للسلسلة العددية بوعيسى 0 143 29-08-20, 03:10 PM
آخر رد: بوعيسى
  كود التحقق من القيمة المدخلة smiley 3 3,428 25-07-13, 02:28 AM
آخر رد: اسلام الكبابى
  الرجاء المساعدة في كود التحقق من صحة الايمايل wolf1120 3 1,697 06-06-13, 02:33 PM
آخر رد: wolf1120

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم