المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : مقارنة بين قيمتين

ثامر أبو بلقيس
04-07-2017, 03:52 PM
السلام عليكم ورحمة الله وبركاته

من باب الترفيه و قتل الرتابة لا غير

:abc_012: أمامك المطلب التالي : لديك مثلا أنبوتين Input1 و Input2

:abc_156: ستكتب فيهما نصوصا أو أرقاما

:abc_145: الان في علبة تحرير الأكواد مطالب بكتابة كود يفارن بين ما كتبت و يخبرك بأنهما متساويين أو غير متساويين

:abc_065: شروط كتابة الكود : بسيطة جدا
لا تكتب أيا من المعاملات الرياضية في محرر الأكواد فــالاشارات = - / * ^ % > < وكأنها غير متاحة للاستعمال و تحت اي ظرف
و في أي موقع كان في محررات الأكواد

سهلة .... موفق :abc_083:
عبد الهادي بهاب
04-07-2017, 08:05 PM
فكرت في استعمال الصيغة not لكن لم استطيع
مررت فقط لالقاء التحية
شكرا على التمارين
ثامر أبو بلقيس
04-07-2017, 08:52 PM
فكرت في استعمال الصيغة not لكن لم استطيع
مررت فقط لالقاء التحية
شكرا على التمارين

لا عليك .. مادمت لم تستطع فستكتشف الجديد :abc_152:

في انتظار تدخل المحترفين لفك شفرة الطلب
ياسرهتهت
04-07-2017, 11:18 PM
موفق بإذن الله ... استاذنا الفاضل
لك مني أجمل تحية .
:abc_138::abc_138:
ثامر أبو بلقيس
04-07-2017, 11:46 PM
موفق بإذن الله ... استاذنا الفاضل
لك مني أجمل تحية .
:abc_138::abc_138:

ولك مني كل التقدير و الاحترام :abc_138:
ياسرهتهت
04-07-2017, 11:54 PM
ولك مني كل التقدير و الاحترام :abc_138:

لا ادري استاذي الفاضل هل انا فهمت السؤال بشكل خطأ

:abc_102:محاولة بسيطة

Inp1 = Input.GetText("Input1");
Inp2 = Input.GetText("Input2");
if Inp1==Inp2 then
Dialog.Message("Notice", "متساوية", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

else
Dialog.Message("Notice", "غير متساوية", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end


موفق بإذن الله ... لك مني أجمل تحية .
ثامر أبو بلقيس
05-07-2017, 01:24 AM
لا ادري استاذي الفاضل هل انا فهمت السؤال بشكل خطأ

:abc_102:محاولة بسيطة

Inp1 = Input.GetText("Input1");
Inp2 = Input.GetText("Input2");
if Inp1==Inp2 then
Dialog.Message("Notice", "متساوية", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

else
Dialog.Message("Notice", "غير متساوية", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end


موفق بإذن الله ... لك مني أجمل تحية .




لاحظ هذا الاقتباس من عملك :
Inp1 = Input.GetText("Input1");
Inp2 = Input.GetText("Input2");
if Inp1==Inp2 then

اذ تخلصت من إشارات المساواة سنعتبر الطلب محلول
موفق :abc_138:
ثامر أبو بلقيس
07-07-2017, 12:21 AM
اذ كان السؤال مستعصي نغيره
عبد الهادي بهاب
07-07-2017, 01:50 AM
قد لا يكون كذلك لكننا نفكر بطريثة تقليدية او خاطئة
ممكن اشارة ما استاذ
ثامر أبو بلقيس
07-07-2017, 02:04 AM
قد لا يكون كذلك لكننا نفكر بطريثة تقليدية او خاطئة
ممكن اشارة ما استاذ

كنت على وشك كتابة الحل
لكن ها أنا أفكر أن أتركه ليومين
التلميح : لايحتاج للتفكير
إليك الخط صديقي :abc_085:
ياسرهتهت
07-07-2017, 03:24 AM
بسم الله الرحمن الرحيم

كود مميز من استاذنا المميز
if rawequal(Input.GetText("Input1"),Input.GetText("Input2")) then
Dialog.Message("Notice", "ãÊÓÇæíÉ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

else
Dialog.Message("Notice", "ÛíÑ ãÊÓÇæíÉ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end


موفق بإذن الله ... لك مني أجمل تحية .
ثامر أبو بلقيس
07-07-2017, 12:34 PM
شكرا أستاذي ياسر أغلقت الموضوع بهذا التعديل الصحيح على كودك

:shokr: