تحدي برمجي ~1~

تم تحميل الصفحة في 0,6501700 ثانية
تحدي برمجي ~1~
إنضم
5 أغسطس 2011
المشاركات
513
الإعجابات
451
النقاط
63
الإقامة
0x400000
السلام عليكم
هذا اول موضوع لي هنا
قررت ان اضع موضوع و اذا كان هناك تفاعل ايجابي ازيد من الصعوبة في التحديات
التحديات ان شاء الله ستكون بشكل دوري
المهم اترككم مع التحدي الاول
التحدي ~1~ :
اكتب برنامج يقارن بين 3plets
مثلا (1،2،3) = (1،2،3) و (3،1،2) == (1،3،2) و (0،0،0) != (1،2،3)
**************************************************************
المهم هو الفكرة و ليس الكود في حد ذاته.
 
إنضم
8 سبتمبر 2013
المشاركات
7,793
الإعجابات
11,660
النقاط
168
الإقامة
Live.IQ(JO => JO.AMMAN)
حياك الله اخي ..
استفسر منك اكثر اذا تسمحلي

التحدي هو عمل function تقارن ما بين قوسان يحتويان 3 ارقام
تقارن القيمة و المكان ..؟ يعني (1,2,3) =! (3,2,1)

اعذر تركيزي ما انتبهت للمثال الثاني .. وصلت ♥
 

slarkpicker

موقوف لمخالفة الشروط
rank
إنضم
17 ديسمبر 2018
المشاركات
34
الإعجابات
35
النقاط
18
العمر
102
تحدي مش واضح لاكن على حسب ما فهمت من الامثلة انه لدينا ثلاثة حالات
يمكننا عمل مصفوفة ثلاثية الابعاد نعمل loop افقي لابعاد يعني نقارن قيم x و y و z لكل بعد على سوى
نعمل loop اخر عمودي ونضع مجموع كل بعد في متغير ومن بعد نقارن اذا كان مجموع كل بعد يساوي الاخر
else معناه عدم تساوي
 

MSCFS

.:: مُشرف أقسام التصميم ::.
rankrankrank
إنضم
12 نوفمبر 2016
المشاركات
963
الإعجابات
1,267
النقاط
121
الإقامة
D Z
خل نقول عندنا المصفوفتين x و y والمتغير Boolean bRes
نحول المصفوفة x إلى سترنج sX يحتوي ع كل عناصرها
نسوي For each لـ y ولكل عنصر InStr في sX
ونحدث قيمة bRes حيث تكون And بينه وبين نتيجة InStr


كود تخيلي حسب قواعد لغة البيسك
X = {*,*,*}
Y = {*,*,*)
bRes = True
For each sElement As String In x
sX = sX & sElement
Next


For each sElement As String in Y
bRes = InStr(sX, sElement) And bRes
Next


MsgBox("النتيجة : " & bRes)
 

الأعضاء النشطين حاليآ الذين يشاهدون هذا الموضوع (1 عضو و 0 ضيف)

خيارات الاستايل

نوع الخط
مودك
اخفاء السايدر بار OFF
توسيط المنتدى OFF
فصل الأقسام OFF
الأقسام الفرعية OFF
عرض المشاركات
حجم الخط
معلومات العضو OFF
إخفاء التوقيع OFF

إرجاع خيارات الإستايل