وعليكم السلام ورحمة الله وبركاته
اخي انا لا اقصد انك تشك فيما نقوله لك انما قمت بالتوضيح كي لا يختلط عليك الامر وتشعر ان موضوع الاصلاح صعب, علما ان ما قاله الاخ Ndagor كلام سليم مئة بالمئة وغالبا هو يملك فهم تقني وليس كلام من النت وانا فهمت ذلك من بعض مشاركاته مثلا عندما قال في المشاركة رقم 25 "الهدف من التاكد ان الموفست متصل بالمكثف انه يعفيك من البحث عن المقاومات و المسارات" هنا فهم ما اقصده بدون ان اوضح مقصدي,
اما موضوع البحث عن المقاومه ان شاء الله امر بسيط للغاية فقط عليك ان تعلم ان اتصال مقاومتان على التوالي يعطيك مجموع المقاومات بالاوم مع نفس الواط بدون جمعه وتوصيلهم على التوازي يعطيك قيمة اوم اقل من اقل مقاومه مع جمع الواط, للتوضيح,
مقاومتان كل منهما 10 اوم 1 واط عندما نوصلهم على التوالي تصبح القيمة الكلية 20 اوم 1 واط.
مقاومتان كل منهما 10 اوم 1 واط عندما نوصلهم على التوازي تصبح القيمة الكلية 5 اوم 2 واط.
وعليك ان تفهم مقصدي , اذا قمت بتوصيل مجموعة مقاومات على التوازي لا يهم انها صغيرة الحجم ولا يهم ان تكون جميعها ذات قيمة متساوية انما يمكن ان تستخدم مجموعة مقاومات مختلفة الحجم والقيمة.
بما ان جميع المقاومات التي تلمكها صغيرة الحجم اي انها ذات واط صغير وقيمة مختلفة عن المقاومه الاصلية فعليك ما يلي.
احضار عدة مقاومات قيتمها اكبر من المقاومة الاصلية والواط اقل اي انها صغيرة الحجم وتقوم بتوصيلهم على التوازي ومع كل اضافة مقاومه على التوازي تحصل على قيمة اوم اقل وواط اكبر .
المقاومة الاصلية 0.33 اوم أي ثلث اوم وغالبا 2 واط, المقاومات التي تملكها غالبا ربع واط اي انك اذا جمعت 4 مقاومات متوازية ستحصل على نفس الواط المطلوب ولكن يجب ان تكون قيم المقاومات اكبر من الاصلية لان اتصال المقاومات بالتوازي سوف يقلل الاوم. ملحوظة اذا حصلت على واط اكبر من 2 واط لامشكلة المهم نفس الواط او اكبر ولكن يفضل نفس الاوم .
اذا كانت المقاومات التي تملكها كثيرة ولكن غير متشابهة كما قولت فهناك قانون يمكن ان تستخدمة في برنامج تقوم بانشاءه يختصر عليك توصيل المقاومات وقياسهم وما عليك الا ادخال قيم المقاومات التي عندك وسيخبرك بالقيمة الكلية قبل توصيلهم.
اليك كود البرنامج
كود :
var
rA : array of real;
rEqual, rT : real;
rN, i : integer;
begin
rT := 0;
Write('Please enter numbers of resistors : ');
Readln(rN);
Writeln; Writeln('====================='); Writeln;
SetLength(rA, rN);
for I := 0 to Length(rA) - 1 do
begin
Write('Enter R', i + 1, ' Value : ');
Readln(rA[i]);
end;
for i := 0 to Length(rA) - 1 do
begin
rT := rT + 1/rA[i];
end;
rEqual := 1.0 / rT;
Writeln; Writeln('====================='); Writeln;
Writeln('RT = ', rEqual:3:2);
Readln;
end.
البرنامج
كود :
https://www.gulf-up.com/5lm8sdh281l1
القانون الخاص بحساب قيمة المقاومة الكلية لتوصيل المقاومات على التوازي هو RT = 1/(1/R1 + 1/R2 + 1/R3) .
يمكنك مع هذا البريمج ان تضع قيم مقاومات مختلفة ولا يهم ان تكون لها نفس الاوم.
هل هذه الطريقة تسهل عليك تعويض قيمة المقاومه الان ؟