ثامر أبو بلقيس
29-11-2014, 11:55 AM
السلام عليكم ورحمة الله وبركاته
الكسر المصري هو مجموع عدة كسور واحدية
حيث بسط كل كسر يساوي واحدا، ومقامه عدد صحيح موجب وجميع المقامات مختلفة عن بعضها البعض
أمثلة :
102/229 = 1/3 + 1/9 + 1/1031 + 1/2124891
113/886 = 1/8 + 1/394 + 1/698168
91/456 = 1/6 + 1/31 + 1/1571 + 1/7402552
109/183 = 1/2 + 1/11 + 1/212 + 1/426756
297/527 = 1/2 + 1/16 + 1/937 + 1/7900784
131/206 = 1/2 + 1/8 + 1/92 + 1/18952
61/133 = 1/3 + 1/8 + 1/3192
234/253 = 1/2 + 1/3 + 1/11 + 1/1518
30/821 = 1/28 + 1/1210 + 1/13907740
173/210 = 1/2 + 1/4 + 1/14 + 1/420
123/194 = 1/2 + 1/8 + 1/111 + 1/86136
352/403 = 1/2 + 1/3 + 1/25 + 1/8636 + 1/261023100
87/614 = 1/8 + 1/60 + 1/36840
62/241 = 1/4 + 1/138 + 1/66516
857/988 = 1/2 + 1/3 + 1/30 + 1/1348 + 1/2497170
ستلاحظ أنه تم تحويل كل بسط إلى العدد 1
الان ماهو الكود الذي سيساعدنا لتحويل أي كسر إلى
كسر مصري
سنختار المثال الأول من المجموعة :
102/229 = 1/3 + 1/9 + 1/1031 + 1/2124891
سنعلن عن قيمة x = البسط و تساوي 102
ونعلن عن قيمة y = المقام وتساوي 229
نجرب الان الكود :
belkiss=""
x=102 y =229 while x>0 do
q=x x=-y%x w=(y+x)/q y=y*w
belkiss=belkiss.."1/"..w.." +"
end
result = String.Mid(belkiss,belkiss,#belkiss);
Dialog.Message("Notice",result)
تقديري :abc_138:
الكسر المصري هو مجموع عدة كسور واحدية
حيث بسط كل كسر يساوي واحدا، ومقامه عدد صحيح موجب وجميع المقامات مختلفة عن بعضها البعض
أمثلة :
102/229 = 1/3 + 1/9 + 1/1031 + 1/2124891
113/886 = 1/8 + 1/394 + 1/698168
91/456 = 1/6 + 1/31 + 1/1571 + 1/7402552
109/183 = 1/2 + 1/11 + 1/212 + 1/426756
297/527 = 1/2 + 1/16 + 1/937 + 1/7900784
131/206 = 1/2 + 1/8 + 1/92 + 1/18952
61/133 = 1/3 + 1/8 + 1/3192
234/253 = 1/2 + 1/3 + 1/11 + 1/1518
30/821 = 1/28 + 1/1210 + 1/13907740
173/210 = 1/2 + 1/4 + 1/14 + 1/420
123/194 = 1/2 + 1/8 + 1/111 + 1/86136
352/403 = 1/2 + 1/3 + 1/25 + 1/8636 + 1/261023100
87/614 = 1/8 + 1/60 + 1/36840
62/241 = 1/4 + 1/138 + 1/66516
857/988 = 1/2 + 1/3 + 1/30 + 1/1348 + 1/2497170
ستلاحظ أنه تم تحويل كل بسط إلى العدد 1
الان ماهو الكود الذي سيساعدنا لتحويل أي كسر إلى
كسر مصري
سنختار المثال الأول من المجموعة :
102/229 = 1/3 + 1/9 + 1/1031 + 1/2124891
سنعلن عن قيمة x = البسط و تساوي 102
ونعلن عن قيمة y = المقام وتساوي 229
نجرب الان الكود :
belkiss=""
x=102 y =229 while x>0 do
q=x x=-y%x w=(y+x)/q y=y*w
belkiss=belkiss.."1/"..w.." +"
end
result = String.Mid(belkiss,belkiss,#belkiss);
Dialog.Message("Notice",result)
تقديري :abc_138: