islambase@yahoo.com

لا يا أخى ليس لدى مرجع ولكنى مدرس رياضيات وهندسة ومبرمج رياضيات وخوارزميات

تحسب ميل كل من الخطين(فرق الصادات/ فرق السينات) للنقطتين الواقعتين عليه M1=(Y2-Y1)/(X2-X1) M2=(Y2-Y3)/(X2-X3) ثم تحسب هذا المقدار (M1-M2)/(1+M1*M2) هذا المقدار السابق هو ظل الزاوية المطلوبة ، وبالآلة الحاسبة(shift TAN) تحصل على الزاوية

السلام عليكم: هذا هو الحل الصحيح الأكيد Y=100-50-2*10=30 (بعد المركز عن القاطع) COS U=Y/(R+r)=30/60=0.5 U=60 L/3.14(R+r)=2U/180 حيث L هى طول القوس أعلى الخط القاطع L=120*3.14*60/180 L=40*3.14 الشكل المطلوب حجمه عبارة عن اسطوانة مقطعها هو دائرة نصف قطرها=r وارت…

جزاكم الله خيرآ أجمعين ولكم ألف شكر

هل السؤال مفهوم وليس له حل ؟ أم أنه غير مفهوم؟

السلام عليكم ورحمة الله إخواني الأعزاء كيف يمكن أن أجعل البرنامج لا يهتم ولا يعبأ بالهمزات فى أى كلمة داخل txtbox عند البحث فى قاعدة البيانات؟ بحيث اذا أدخل المستخدم فى الtext المتصل بحقل الاسم كلمة أحمد " كانت كمن أدخل كلمة احمد " وبحيث اذا أدخل المستخدم فى ا…

جزاك الله خيرآ ولك ألف شكر ويرجي من الخبراء برده يردون على لعله أخطأ في توضيح والله اعلم

اخوانى الأعزاء ما الفرق بين كل من هذه الجمل الخمسة أى ما نتيجة كل أمر؟ . أو متى أستخدم كلآ منهم؟ </SPAN> انسخ الكود Adodc1 . Recordset . Update Adodc1 . Recordset . UpdateBatch Adodc1 . Recordset . UpdateBatch adAffectAllChapters Adodc1 . Recordset . UpdateBat…

هذا هو الكود للتعامل مع الأعداد الصحيحة أو الكسرية انسخ الكود Dim I , J , C As Integer Dim NUM , A , B As Single Text2 . Text = "" NUM = Val ( Text1 . Text ) INTNUM = Int ( Text1 . Text ) Print NUM , INTNUM A = INTNUM B = A 2 C = A Mod 2 Text2 . Text = C Print…

وان كنت تريدين تعديل كودك لتحويل من عشــري إلى ثنــآئي بحيث يتعامل أيضآ مع الأعداد الصحيحة أو الكسرية فاطلبى

ان البرنامج الذى أرسلته لك يكتب لك نقط التقاطع التى تسأل عنها

هذا هو الكود للتعامل مع الأعداد الصحيحة أو الكسرية انسخ الكود [ b ] Dim NTOT , NINT , NASH As Integer Dim I , J As Integer Dim NUM , X As Single NUM = 0 NTOT = Len ( Text1 . Text ) INTNUM = Int ( Text1 . Text ) NINT = Len ( INTNUM ) NASH = NTOT - NINT - 1 [ / …

جزاك الله خيرآ يا أخى ولك ألف شكر

اخوانى فى المنتدى كل عام وأنتم بخير انا أعرف أحول من عدد عشـــري إلى ثنــآآئي والعكس عند تعاملى مع أعداد صحيحة بدون العلامة"." فأعرف جيدآ كيف أتعامل مع العدد1101 فى الثنائى ليصل بى الى أنه هو العدد13 فى العشرى كما أعرف جيدآ كيف أتعامل مع العدد4 فى العشرى ليصل …

هذا هو الكود المطلوب انسخ الكود Dim I , J , NUM , NTOT As Integer NUM = 0 NTOT = Len ( Text1 . Text ) For I = 1 To NTOT J = NTOT + 1 - I NUM = NUM + Mid ( Text1 . Text , J , 1 ) * 2 ^ ( I - 1 ) Next I Text2 . Text = NUM End Sub

آآآسف أعنى وكيف سيتم ادخال العدد الثنائى المطلوب تحويله ؟ العدد 1101 مثلآ هل ندخل 1 فى text1 و1 فى text2 و0 فى text3 و1 فى text4 ؟ أم سندخل الرقم 1101 كاملا فى text واحد

وكيف سيتم ادخال العدد الثنائى المطلوب تحويله ؟ هل ندخل بسط فى text1 ومقام فى text2 أم كيف ؟

جزاكم الله خيرآ أجمعين ولكم ألف شكر

جزاك الله خيرآ يا أخى فعلآ انتهت مشكلتى تمامآ ولكن أرجومنك أن تشرح لى معنى هذا الكود انسخ الكود InStr ( 1 , Text1 , " " ) = 0 Text1 = Replace ( Text1 , " " , " " ) أى ما المقصود بالرقم 1 الموجود فى الجملة الأولى؟ وماذا لوغيرناه بأى رقم آخر3 مثلآ؟ ولماذا أرى ال…

جزاك الله خيرآ يا أخى ولك ألف شكر وكل عام والأمة الإسلاميه جميعها بخير ويمن وبركاته