রৈখিক বীজগণিত/বিষয়: কম্পিউটার বীজগণিত সিস্টেম/সমাধান
সমাধানসমূহ
[সম্পাদনা]এই বিষয়ের উত্তরগুলোতে কম্পিউটার বীজগণিত সিস্টেম হিসেবে মেপল ব্যবহার করা হয়েছে। বিশেষ করে, এই সবকটি সমাধান এমএস-ডস এনটি সংস্করণ ৪.০-এর অধীনে চলমান মেপল ভিতে পরীক্ষা করা হয়েছে। (প্রতিটি ক্ষেত্রেই লিনিয়ার অ্যালজেব্রা প্যাকেজ লোড করার প্রাথমিক কমান্ড এবং এন্টার কী চাপার পর মেপলের দেওয়া রেসপন্স বা প্রতিক্রিয়াগুলো বাদ দেওয়া হয়েছে।) অন্যান্য সিস্টেমেও একই ধরণের কমান্ড রয়েছে।
ওল্ফরাম ম্যাথমেটিকা ১৩.০-এর জন্য অন্যান্য উত্তরগুলো পরবর্তীতে যুক্ত করা হবে।
- সমস্যা ১
এই অধ্যায়ের শুরুতে দেওয়া সমস্যা দুটি সমাধান করতে কম্পিউটারের সাহায্য নিন।
- এটি হলো স্থিতিবিদ্যার সমস্যা:
- এটি হলো রসায়নের সমস্যা:
- উত্তর
- মেপল কমান্ডসমূহ—
> A:=array( [[40,15],
[-50,25]] );
> u:=array([100,50]);
> linsolve(A,u);
এর ফলে উত্তর পাওয়া যায় । ম্যাথমেটিকার উত্তর:এটি {c,h}-এর জন্য {1,4} ভেক্টর রিটার্ন বা প্রদর্শন করে।eqns = {40 h + 15 c == 100, 25 c == 50 + 50 h}; {b, m} = CoefficientArrays[eqns, {c, h}] LinearSolve[m, -b] {c, h} /. Solve[eqns, {c, h}]
- এখানে একটি স্বাধীন চলক বা ফ্রি ভ্যারিয়েবল রয়েছে:
> A:=array( [[7,0,-7,0],
[8,1,-5,2],
[0,1,-3,0],
[0,3,-6,-1]] );
> u:=array([0,0,0,0]);
> linsolve(A,u);
এর জবাবে মেপল প্রদর্শন করে । ম্যাথমেটিকা কোড:এটি LinearSolve-এর জন্য {0,0,0,0} এবং শেষ লাইনের জন্য রিটার্ন বা প্রদর্শন করে।eqns = {7 h == 7 j, 8 h + i == 5 j + 2 k, 1 i == 3 j, 3 i == 6 j + 1 k}; {b, m} = CoefficientArrays[eqns, {h, i, j, k}] LinearSolve[m, -b] {h, i, j, k} /. Solve[eqns, {h, i, j, k}]
- সমস্যা ২
কম্পিউটার ব্যবহার করে প্রথম উপ-অনুচ্ছেদের এই সমীকরণ জোটগুলো সমাধান করুন, অথবা "অনেক সমাধান" বা "কোনো সমাধান নেই" এই সিদ্ধান্তে উপনীত হোন।
- মেপলে উত্তর
এগুলো ইনপুট বা টাইপ করা বেশ সহজ। যেমন—প্রথমটির ক্ষেত্রে:
> A:=array( [[2,2],
[1,-4]] );
> u:=array([5,0]);
> linsolve(A,u);
এটি প্রত্যাশিত উত্তর প্রদর্শন করে। অন্যান্যগুলোও একইভাবে ইনপুট করতে হবে।
- উত্তরটি হলো এবং ।
- উত্তরটি হলো এবং ।
- এই সমীকরণ জোটের অসীম সংখ্যক সমাধান রয়েছে। প্রথম উপ-অনুচ্ছেদে, -কে প্যারামিটার বা চলক ধরে আমরা পেয়েছিলাম এবং । মেপল এর জবাবে প্রদর্শন করে, কোনো এক কারণে এটি -কে প্যারামিটার হিসেবে বেশি পছন্দ করেছে।
- এই সমীকরণ জোটের কোনো সমাধান নেই। যখন মেপল-এ অ্যারে এবং ভেক্টর প্রদান করে linsolve(A,u) কমান্ড দেওয়া হয়, তখন এটি কোনো ফলাফল প্রদর্শন করে না; অর্থাৎ, এটি নির্দেশ করে যে এর কোনো সমাধান নেই।
- সমাধানটি হলো ।
- এর অনেকগুলো সমাধান রয়েছে। মেপল এর সমাধান প্রদর্শন করে ।
RowReduceAugmentedMatrix[matrix_] := MatrixForm[RowReduce[matrix]]
- সমস্যা ৩
কম্পিউটার ব্যবহার করে দ্বিতীয় উপ-অনুচ্ছেদের এই সমীকরণ জোটগুলো সমাধান করুন।
- উত্তর
পূর্ববর্তী প্রশ্নের মতোই, এগুলো ইনপুট বা টাইপ করা বেশ সহজ।
- এই সমীকরণ জোটের অসীম সংখ্যক সমাধান রয়েছে।
দ্বিতীয় উপ-অনুচ্ছেদে আমরা সমাধান সেটটি নিম্নরূপভাবে প্রকাশ করেছিলাম—
- এই সমাধান সেটের কেবল একটিমাত্র উপাদান রয়েছে—
- এই সমীকরণ জোটের সমাধান সেটটি অসীম—
- এর একটি অনন্য বা একক সমাধান রয়েছে—
- এই সমীকরণ জোটের অসীম সংখ্যক সমাধান রয়েছে; দ্বিতীয় উপ-অনুচ্ছেদে আমরা দুটি প্যারামিটার বা চলকের মাধ্যমে সমাধান সেটটিকে বর্ণনা করেছিলাম-
- এর সমাধান সেটটি ফাঁকা বা শূন্য এবং linsolve(A,u) কমান্ডের জবাবে মেপল কোনো সমাধান প্রদর্শন করে না।
- সমস্যা ৪
একটি সাধারণ বা জেনারেলাইজড সমীকরণ জোটের সমাধানের জন্য কম্পিউটার কী ফলাফল প্রদর্শন করে?
- উত্তর
এই কমান্ডটি প্রদান করার পর—
> A:=array( [[a,c],
[b,d]] );
> u:=array([p,q]);
> linsolve(A,u);
মেপল প্রায় বিশ সেকেন্ড গণনা করার পর এই উত্তরটি প্রদান করে:
- ম্যাথমেটিকা সমাধান
- এটি মাত্র ২ মিলিসেকেন্ডের মধ্যে ফলাফল প্রদর্শন করে।
RowReduce[( { {a, c, p}, {b, d, q} } )] // MatrixForm