উত্তর সমান 1 বা তার কম না হওয়া পর্যন্ত সমীকরণে কীভাবে পুনরাবৃত্তি করা যাবে?

Question

বেস সমীকরণ

(J3+x)/150

xতারপরে উত্তরের গুণকে সমস্ত দিয়ে ভাগ করে 150পুনরাবৃত্তি করুন

( ((J3+x)/150)x )/150
(( ( ((J3+x)/150)x )/150 )x)/150

শেষ পুনরাবৃত্তির উত্তর না আসা পর্যন্ত পুনরাবৃত্তি করুন <=1। সমস্ত অংশ যোগফল।

সম্ভবত এটি দেখার সাথে এটি আরও ভাল ব্যাখ্যা করবে।

এই মুহুর্তে আমি কেবল কয়েকটি ঘরগুলিতে সমীকরণটি ভেঙে দিয়েছি এবং তারপর তাদের যোগফল দিয়েছি তবে এটি মারাত্মকভাবে অক্ষম।

A1: =(J3+x)/150
B1: =(((J3+x)/150)x)/150
C1: =(( (((J3+x)/150)x)/150 )x)/150
D1: =(( (( (((J3+x)/150)x)/150 )x)/150 )x)/150
E1: etc, etc

Comments

জে 3 বা এক্স হয় নেতিবাচক হতে পারে?

— ফিক্সার 1234

যে কখনও ঘটবে না।

— অপমানিত

এটির জন্য একটি ভিবিএ সমাধান প্রয়োজন হবে। এফওয়াইআই, এক্স অবশ্যই <150 হবে বা কোনও শব্দ কখনও হবে না <= 1.

— ফিক্সার 1234

সঠিক, xমনে হয় 150 এর বেশি হবে না

— 6:47

আমার কি এই অধিকার আছে তা আমি চেক করতে পারি? যদি, উদাহরণস্বরূপ, জে 3 = 10,000 এবং x = 20 তবে এ 1 = 66.8, বি 1 = 8.9, সি 1 = 1.19 এবং ডি 1 = 0.16, যাতে শেষ মানটি <1 হয় আপনি সেই 4 টি মানগুলি যোগ করতে চান এবং তার ফলাফল পেতে চান 77.05 (প্রায়)?

— ব্যারি হউদিনী

Answer 1

নিম্নলিখিত ব্যবহারকারী সংজ্ঞায়িত ফাংশন (ইউডিএফ) একটি স্ট্যান্ডার্ড মডিউলে রাখুন:

Public Function deflime(J3 As Variant, x As Variant) As Double
    deflime = 0
    result = (J3 + x) / 150
    For i = 1 To 9999
        deflime = deflime + result
        If result <= 1 Then
            Exit Function
        End If
        result = x * result / 150
    Next i
End Function

ব্যবহারকারীর সংজ্ঞায়িত ফাংশন (ইউডিএফ) ইনস্টল এবং ব্যবহার করা খুব সহজ:

1. ALT-F11 VBE উইন্ডোটি নিয়ে আসে
2. ALT-I ALT-M একটি নতুন মডিউল খোলে
3. স্টাফটি আটকে দিন এবং ভিবিই উইন্ডোটি বন্ধ করুন

আপনি যদি ওয়ার্কবুকটি সংরক্ষণ করেন তবে এটির সাথে ইউডিএফ সংরক্ষণ করা হবে। আপনি যদি 2003 এর পরে এক্সেলের কোনও সংস্করণ ব্যবহার করেন তবে আপনার অবশ্যই ফাইলটিকে .xlsx এর চেয়ে .xlsm হিসাবে সংরক্ষণ করতে হবে

ইউডিএফ অপসারণ করতে:

1. উপরের মতো ভিবিই উইন্ডোটি আনুন
2. কোড সাফ করুন
3. ভিবিই উইন্ডোটি বন্ধ করুন

এক্সেল থেকে ইউডিএফ ব্যবহার করতে:

=deflime(A1,B1)

সাধারণভাবে ম্যাক্রোগুলি সম্পর্কে আরও জানতে, দেখুন:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

এবং

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

এবং ইউডিএফ-এর নির্দিষ্টকরণের জন্য, দেখুন:

http://www.cpearson.com/excel/WritingFunctionsInVBA.aspx

এটি কাজ করার জন্য ম্যাক্রোগুলিকে সক্ষম করতে হবে!

এখানে একটি উদাহরণ:

Answer 2

আমি দেখতে পাচ্ছি আপনার একটি ভিবিএ সমাধান রয়েছে তবে সূত্রগুলি দিয়ে এটি করা সম্ভব।

আপনার "x" মানটি J2 এ অনুমান করে যে সূত্রটি আপনাকে প্রথমবারের জন্য <= 1 এ নিয়ে যাবে সেই পুনরাবৃত্তির সংখ্যা দিতে J4 এ এই সূত্রটি রাখুন

=MATCH(TRUE,(J3+J2)/150^{1,2,3,4,5,6,7,8,9,10}*J2^{0,1,2,3,4,5,6,7,8,9}<=1,0)

এবং তারপরে আপনার চূড়ান্ত মান পেতে J5 এ এই সূত্র

=SUMPRODUCT((J3+J2)/150^ROW(INDIRECT("1:"&J4))*J2^(ROW(INDIRECT("1:"&J4))-1))

এই প্রথম সূত্রটি আপনাকে 10 টি পুনরাবৃত্তির মধ্যে সীমাবদ্ধ করে তবে আপনি এটি প্রসারিত করতে পারেন প্রয়োজন হলে ..... বা এমনকি এই দুটি সূত্রকে এক "মেগাফর্মুলা" এ একত্রিত করতে পারেন

আমার পরীক্ষায় সেই সূত্রগুলি আমাকে গ্যারি এর শিক্ষার্থীর ইউডিএফ হিসাবে একই ফলাফল দিয়েছে