15 let f=1,y=x
20 for i=1 to n
30 f=f*i
40 y=y+x^i/f
50 next i
60 print y
70 end
اذا تتبعنا تنفيذ البرنامج سنجد ان
f
تحسب مضروب
i
وان البسط x^i
![]() |
الحل |
شيت 3 رقم 2 البرنامج وخريطة التدفق
فكرة البرنامج جمع متسلسه بحيث يكون الاس والمقام يساوى قيمة العداد من 3 الى
n
علامة السالب والموجب
تحتاج الى ضرب المعادله فى -1 مرفوعه الى الاس
j
وتزيد قيمته بمقدار 1 فاذا كان قيمته سالبه ينتج رقم سالب واذا كنت موجبه يكون الناتج موجب
15 let y=x,j=1
20 for i=3 to n step2
30 y=y+(x^i/i)*(-1^j)
35 j=j+1
40 next i
50 print y
60 end
شيت 3 رقم 3
15 let y=x^2,j=1
20 for i=4 to n step2
30 y=y+(x^i/(i-1))*(-1^j)
35 j=j+1
40 next i
50 print y
60 end
نفس الفكرة السابقه وضعنا القيمة الاوالى من المتسلسله فى
y
ثم نبدا العد من 4 الى
n
والمقام يمثل العداد -1
3- المتسلسله لحساب قيمة y
y=1+2+4+8+16
10 input n
20 y=o
30 i=1
40 for k=1 to n step k+k
50 y=y+k
70 next k
يلاحظ ان مقدار الزياده k+k تعمل على توليد قيم المتسلسه
التمرين رقم 5 فى شيت 3 يحل بنفس حل المتسلسله السابقه حيث ان اول خانه من لوح الشطرنج = 1
الثانيه =2
الثالثه=4
الرابعه=8
كما ورد فى التمرين من مضاعفة عدد حبات القمح فى كل خانه عن الخانه السابقه لها.
4- اذا اشترى العميل منتجات احدى الشركات بقيمة 1000 جنيه او اكثر ،فانها تقدم له خصما قيمته 10% اما اذا كانت قيمة المشتريات اقل من ذلك لايحصل على اى خصم.
التمرين رقم 5 فى شيت 3 يحل بنفس حل المتسلسله السابقه حيث ان اول خانه من لوح الشطرنج = 1
الثانيه =2
الثالثه=4
الرابعه=8
كما ورد فى التمرين من مضاعفة عدد حبات القمح فى كل خانه عن الخانه السابقه لها.
4- اذا اشترى العميل منتجات احدى الشركات بقيمة 1000 جنيه او اكثر ،فانها تقدم له خصما قيمته 10% اما اذا كانت قيمة المشتريات اقل من ذلك لايحصل على اى خصم.
الحل
input x
if x>=1000 then
sale=1000*10/100
print "sale=",sale
else
print "no sale"
end if
end
شيت 4 تمرين 3
ص14 -تمرين 4
نحتاج عداد لعد 20 متسابق وداله لتوليد ارقام عشوائيه من 1 الى 5000for i=1 to 20
print int(RND(1)*5000)+1
next i
ص 14 تمرين 5 نفس فكرة التمرين الاول فى هذه الصفحة ولكن البسط يكون 1بدلا من x^i
ص22- تمرين b
المخرجات كالتالى
15
13
11
9
7
5
3
1
بما ان i حاليا تساوى 1فان جملة print الاخيرة
1+1^2+1^3=3
اى تطبع 3 فقط وذلك لان العداد انتهى عند قيمة i=1
ليست هناك تعليقات:
إرسال تعليق