ارجو حل المسألة

[rery fared]

بفرض انك اودعت مبلغ من المال لمدة عشر سنوات في احد البنوك وتريد ان تحسب الفائدة المركبة لهذا المبلغ علما بأن المبلغ هو A, و N هي عدد السنوات و Rهي معدل الفائدة وذلك بالقانون الاتي : F=A(1+R)^N
باستخدام For, Next

[ahashem82]

الحل هو كما يلي

For N = 1 to 10
F=A(1+R)^N
MsgBox(F)
Next

كما يلاحظ هنا وجود صندوق الرسالة لعر قيمة المبلغ بالفائدة في كل سنة
أرجو أن يكون الحل واضح

[(*أحمد عرفة*)]

Dim a,f as decimal ,n as integer
"من المفترض أنه يكون له قيمة و لكنها غير معطاة "= Const r as decimal
For n = 1 to 10
F=A(1+R)^N
( f = f + f)
Next
print f



أتمنى أن يكون الحل صحيحا

[حمدية صيام]

يمكن استخدام كلمة byte كاسم لمتغير فى البرنامج.

[rery fared]

لماذا ( f = f + f)

[rery fared]

الي اساتذه المنتدي الكرام ضروري حل المسألة