[سعود]

السلام عليكم ورحمة الله وبركاته
اذكر قديما كانت هناك لعبة تخمين نتيجة عملية حسابية غير معروفة كل الارقام.
وكان المطلوب معرفة  الناتج النهائي وهذا سهل وهو  بالطريقة التالية:

• خمن رقم
  
• ضاعف هذا الرقم
  
• اضف عليه رقم كذا
  
• احذف النصف
  
• احذف الرقم الاساسي
  
• يتبقى نصف الرقم بالخطوة  الثالثة.
  

هذا سهل لكن بحثت عن طريقة تخمين الرقم الذي اخترت هل يمكن كشفها بمعادلة معينة؟

[silverlight]

هل تقصد تحويل الفكرة الي معادلة حسابية؟

[سعود]

(19-08-16, 10:53 AM)silverlight كتب : هل تقصد تحويل الفكرة الي معادلة حسابية؟

نعم لو كان بالامكان.

[الوادي]

إيش رأيك في هذا الحل

خطوات الحل

• خمن رقم (x):
  x
  
  
• ضاعف هذا الرقم:
  2x
  
  
• اضف عليه رقم (y):
  2x + y
  
  
• احذف النصف:
  2x + y ) / 2 )
  
  
• احذف الرقم الاساسي:
    2x + y ) / 2 ) - x ) )
  
  
• يتبقى نصف الرقم (y) بالخطوة  الثالثة.
    2x + y ) / 2 ) - x ) ) =
  

PHP كود :

Dim x As Single = 8
Dim y As Single = 6
Dim r As Single

r = ( ( ( x * 2) + y) /2 ) - x

'' r = 3    : y / 2 


[silverlight]

كود :

Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim originalNo As Double = 10
       Dim sameNo As Double = 10
       Dim AddNo As Double = 4

       Me.Text = SolveEquation(originalNo, sameNo, AddNo)
   End Sub

   Private Function SolveEquation(originalNo As Double, sameNo As Double, numberToAdd As Double) As Double
       Dim result As Double = originalNo + sameNo + numberToAdd
       result /= 2
       result -= originalNo
       Return result
   End Function
End Class

[الوادي]

حقيقة اللعبة هي خداع الضحية، 

لأن اللعبة تكمن في أن أتخلص من الرقم الذي اختارته الضحية وأبدله برقم من عندي 
ولكي تكون الخدعة (شبه) محبوكة أجعل الناتج نصف الرقم اللي أنا أضفته  
لأنه لو لم أفعل ذلك فإن الضحية ستقارن رقمي الذي أضفته بالناتج الأخير 
وهنا سيستيقظ من سحره ويكتشف أنني لم أعرف الرقم الذي أختاره هو.