تويت
الكود بعد محاولتكم يا سادة
انا لم اتي بجديد .......فقط استغلال ماهو مطروح في المنتدى و دمجه ببعضه
انا لم اتي بجديد .......فقط استغلال ماهو مطروح في المنتدى و دمجه ببعضه
-
-
وعليكم السلام ورحمة الله وبركاتهالمشاركة الأصلية بواسطة المحترف اقلي مشاهدة المشاركةالسلام عليكم ورحمة الله وبركاته
كيف نجد تاريخ الاول من شهر رمضان لعشرة اعوام القادمة ؟ اقصد مقاباه من الميلادي
يعني تكييف المعاجلة مع السنة الهجرية
لست استاذ لتنتظر الجواب
أنا كذلك لست أستاذا من قال ذلك ؟ ومنه --- اذ فرضت أن الاستاذ فقط من حقه
كتابة الحلول فسأمسح كل ما كتبت تحت هذا الغطاء
رجوعا لسؤالك الجميل و الذي اعتمد على طرح 10 أيام لكل سنة
سؤالي : متى يعلن عن دخول شهر رمضان ؟ أحسابيا أم رؤية الهلال
مجرد تساؤلتعليق
-
السلام عليكم ورحمة الله وبركاتهالمشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
طبعا حسابيا ..... لان الرؤية حسب علمي لا يمكن توقعها الا حسب العين و المناظير و التلسطوبات و و و .........و الا فمعلوماتي خاطئة
و ان كان في الوقت متسع ...........فاريد الاثنينتعليق
-
و لا اظن ان الفكرة في انقاص عشرة ايام .........تعليق
-
ردي أخي لم يكن بغرض طرح الجواب الا في حالة تحويل السؤال الى رياضي بحتالمشاركة الأصلية بواسطة المحترف اقلي مشاهدة المشاركة
لذلك ... كيف تطلب مني أن أبرمج رؤية الهلال أليس هذا بغريب ؟؟؟
و اذا كان كما تقول أن الأمر يتم حسابيا هل لك تعليل لما الدول تختلف في الاعلان عن رمضان
مادام الايام هي الايام و الاشهر هي الاشهر و الحسابات هي الحسابات أرى أن تحول الطلب الى تساؤل رياضي أفيد لي
لأني لست أهلا للخوض في مسائل لا أعرفها
تعليق
-
صحيح .....لم اوفق في طرح وجهة نظري او طلبي ........... بل رياضيا ...........اي هل الحل المقدم صحيح او الكود الذي ستستعمله يعطي نفس النتائج ؟المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركةردي أخي لم يكن بغرض طرح الجواب الا في حالة تحويل السؤال الى رياضي بحت
لذلك ... كيف تطلب مني أن أبرمج رؤية الهلال أليس هذا بغريب ؟؟؟
و اذا كان كما تقول أن الأمر يتم حسابيا هل لك تعليل لما الدول تختلف في الاعلان عن رمضان
مادام الايام هي الايام و الاشهر هي الاشهر و الحسابات هي الحسابات أرى أن تحول الطلب الى تساؤل رياضي أفيد لي
لأني لست أهلا للخوض في مسائل لا أعرفهاتعليق
-
هل أرسلت الرابط الدال على حساب دخول شهر رمضان حسابياالمشاركة الأصلية بواسطة المحترف اقلي مشاهدة المشاركة
من داخل الموقع
لاحظ أنك لم تكتب معطيات لحل تمرين رياضي يبدو لك ذلك
كونك مقتنع أن العملية الحسابية -10 -11 ... الخ هي طريقة
معتمدة لدرجة أنها من البديهيات لكن الأمر ليس كذلك
----------------------------- موفق-------------------------------------------
سأمر لطرح و تساؤل اخر :
سألك صديق عن الأكواد المدمجة في الاوتوبلاي و يطلب منك مثالا
ماذا ستقول له ؟ أراد أن يعرفها كلها ؟ ماردك ؟تعليق
-
الموضوع سبق و طرحته استاذالمشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركةهل أرسلت الرابط الدال على حساب دخول شهر رمضان حسابيا
من داخل الموقع
لاحظ أنك لم تكتب معطيات لحل تمرين رياضي يبدو لك ذلك
كونك مقتنع أن العملية الحسابية -10 -11 ... الخ هي طريقة
معتمدة لدرجة أنها من البديهيات لكن الأمر ليس كذلك
----------------------------- موفق-------------------------------------------
سأمر لطرح و تساؤل اخر :
سألك صديق عن الأكواد المدمجة في الاوتوبلاي و يطلب منك مثالا
ماذا ستقول له ؟ أراد أن يعرفها كلها ؟ ماردك ؟
http://sites.ienajah.com/vb2/showthread.php?t=28649
فيه الاتجاهين اي من الميلادي الى الهجري و العكس
---------------
لم افهم دمج الاكود ؟ لكن قصدت بالدمج الاستافدة من عدة افكار لا ستخرج طرح جديد ............ مباشرة .........استفدت من الكود الموجود في الرابط اعلاه و اخر مشاركة لك في استخراج الاحد الاخير من شهر اكتوبر ..............هل اجبت استاذ ؟
تعليق
-
الحل الذي تزصل اليه مخخي .................
كود PHP:belkiss=""
for annee = 2000, 2033 do ------------ نبحث في السنوات من 2000 الى 2033
for mois =1,12 do ------------من اجل كل الاشهر
for jour =1,31 do-------------- من اجل كل الايام
----------------التحويل الى الهجري ---------
if mois <=2 then
value1 = mois+12
value2 = annee-1
elseif
mois >2 then
value1 = mois
value2 = annee
end
value3 = Math.Floor(value2/100);
value4 = Math.Floor(value2/400);
value5 = 2-value3+value4
value6 =Math.Floor((value2+4716)* 365.25)
value7 =Math.Floor((value1 + 1 ) * 30.6001)
value8 = jour +value7+value6+value5-1524.5
value9 = value8-1937806.5
value10=Math.Floor((value9-1)/10631)
value11=( value9 + 354 ) - 10631 * value10
value12=Math.Floor(( 10985 - value11)/ 5316)
value13= Math.Floor(( 50 *value11 )/ 17719)
value14=Math.Floor(value11/5670)
value15=Math.Floor(( 43 * value11 )/ 15238)
value16= value13 * value12 + value15 * value14
value17=Math.Floor((30 - value16 )/ 15)
value18=Math.Floor((17719 * value16 ) / 50)
value19=Math.Floor(value16/16)
value20=Math.Floor((15238 * value16 ) / 43)
value21= value11-value17*value18-value19*value20+29
moish = Math.Floor(( 24 * value21 ) / 709)
value22=Math.Floor(( 709 * moish) / 24)
jourh = value21-value22
anneeh = 30 * value10 + value16 - 30
if jourh == 1 then ------------نبحث عن اليوم الاول
if moish == 9 then----------من شهر رمضان ------------
tamer = os.time({year=annee, month=mois, day=jour})----------- عندما نجد الشرط نختفظ بالسنة و الشهر و اليوم و نسجل ترجمته الى لا ادري ؟؟؟-------------
belkiss=belkiss.."\r\n"..os.date("%A".." %Y/%m/%d ", tamer);---------- نحول الشيء الذي لا ادري الى تاريخ يستنج لنا اليوم و التاريخ المقابل لذلك الشي الذي لا ادري ما هو ------------
end
end
end
end
end
Dialog.Message("ABOU_BELKISS:)", belkiss) ------------و ثم نخرج الناتج في ديالوج بلقيس
تعليق
-
جيد ... حول الشيء الذي لا أدري إلى تساؤل و استفد من موضوع
" بالمختصر المفيد " أو الأشمل :
----------------------------------------------------------------------
قم بالبحث و تحميل luaforwindows لا يهمك البرنامج في حد ذاته بل أدخل الى ملفاته
و ادرسها ركز على المجلدexamplesتعليق
-
تساؤلي أخي عن الاكواد المدمجة كان مقصودا بعينه لم أقصد
ما هي الاكواد التي دمجتها للحصول على نتائج محاولتك لا أبدا
لكن ههههههههههه تشابه الطلب مع ما كتبت أنت بنفس الصياغة أعطى فائدة
وهي أن كتبت الكود ........ على كل سأعود لتساؤلي و لا تربطه بما فات:
_SourceFolder كود مدمج في الاوتوبلاي يوجد حوالي 177 أو 178
نريد أن نعرفها قلت سطر دعنا نخليه بحرف ؟؟ ماهو ؟
ابحث
فكر 
اسأل 
في الاخير ستعرف
تعليق
-
لم افهم الطلب بالضبط لكن فيه صفحة المساعدةالمشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركةتساؤلي أخي عن الاكواد المدمجة كان مقصودا بعينه لم أقصد
ما هي الاكواد التي دمجتها للحصول على نتائج محاولتك لا أبدا
لكن ههههههههههه تشابه الطلب مع ما كتبت أنت بنفس الصياغة أعطى فائدة
وهي أن كتبت الكود ........ على كل سأعود لتساؤلي و لا تربطه بما فات:
_SourceFolder كود مدمج في الاوتوبلاي يوجد حوالي 177 أو 178
نريد أن نعرفها قلت سطر دعنا نخليه بحرف ؟؟ ماهو ؟
ابحث فكر اسأل في الاخير ستعرف
http://www.indigorose.com/webhelp/am..._Variables.htmتعليق
-
جيد هو بالضبط
تعليق
-
[hide]لتجديد روابط المشاركة رقم 12المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركةالسلام عليكم
هذا ملف انطوى على أحد الحلول
http://www.gulfup.com/?JThZ2q
ممكن طرح أسئلة ذات طابع بحثي ممكن الوصول لها مشكووور
خذ أنبوت 1 لكتابة الجملة
و الانبوت2 لاستقبال الجملة بعد عكس المفردات
بالضغط على الزر المتضمن الكود التالي ستظهر النتائج
[HTML]sSeparator = " ";
tWords = {};
nEntries = 1;
nEntriesStart = 1;
sOutput = "";
nSeparator = 0;
sInput = Input.GetText("Input1");
while (nSeparator ~= -1) do
nInputLength = String.Length(sInput);
nSeparator = String.ReverseFind(sInput, sSeparator, false);
sWord = String.Right(sInput, (nInputLength-nSeparator));
tWords[nEntries] = sWord;
sInput = String.TrimRight(sInput, sWord);
sInput = String.TrimRight(sInput, sSeparator);
nEntries = nEntries + 1;
end
repeat
sOutput = sOutput..tWords[nEntriesStart]..sSeparator;
nEntriesStart = nEntriesStart + 1;
until nEntriesStart == nEntries
sOutput = String.TrimRight(sOutput, sSeparator);
Input.SetText("Input2", sOutput);[/HTML][/hide]تعليق
-
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركة
الى التطبيق مباشرةتعليق
تعليق