資源描述:
《matlab_張曉玲課件》由會員上傳分享,免費在線閱讀,更多相關(guān)內(nèi)容在教育資源-天天文庫。
1、MATLAB程序設(shè)計MATLAB程序設(shè)計主講:張曉玲勝利學(xué)院信息與計算科學(xué)系課程介紹:教學(xué)目的:了解MATLAB,能夠熟練掌握數(shù)學(xué)(矩陣)運算、簡單編程、簡單的數(shù)據(jù)處理及基本圖形繪制。劉衛(wèi)國主編.MATLAB程序設(shè)計與應(yīng)用(第二版).高等教育出版社教材:特點:完全不必具備其它語言的基礎(chǔ)課程安排:學(xué)時:48學(xué)時安排:機房授課,隨講隨練考核要求:不得缺勤,上機作業(yè)必須齊備考核方式:上機考試成績計算方法:總評成績=考試成績(70%)+平時成績(30%)第一章Matlab概述一、為什么要學(xué)習(xí)Matlab?二、Matlab是什么?三、如何
2、使用Matlab?四、怎樣學(xué)習(xí)Matlab?一、為什么要學(xué)習(xí)Matlab?——有用Matlab能干什么?科學(xué)計算、算法開發(fā)、數(shù)據(jù)采集建模、仿真、控制數(shù)據(jù)分析、處理和可視化Matlab能應(yīng)用于哪些領(lǐng)域?科學(xué)和工程領(lǐng)域圖形應(yīng)用程序的開發(fā)可以說,無論從事工程方面的哪個學(xué)科,都能在Matlab中找到合適的功能。加速創(chuàng)新和算法開發(fā)站在巨人肩上的語言Matlab內(nèi)建了600多個數(shù)學(xué)、統(tǒng)計和工程計算函數(shù),使用它們進行問題的分析與解答,可使用戶從繁雜的編程中解放出來,加速算法開發(fā)。Example:解線性方程組x1+2x2=82x1+3x2=13
3、1)使用VBFunctionGauss_Jordan(a()AsDouble,xx()AsDouble,NAsInteger,GroupAsInteger)AsInteger'*************************************************************'用途:用Gauss_Jordan消去法解方程組集'參數(shù):a()AsDouble——方程組的系數(shù)矩陣'xx()AsDouble——方程組集中各方程組的右端項組成的矩陣'nAsInteger——方程組的階數(shù)'GroupAsInteger—
4、—方程組集中包含方程組的個數(shù)'返回值:0——解方程組集成功時返回'1——解方程組集未成功時返回'**************************************************************Step1:編寫一個解線性方程組的函數(shù)OnErrorGoToGauss_JordanErrorDimiAsInteger,jAsInteger,KAsInteger,i0AsIntegerDimpelementAsDoubleForK=1ToNpelement=Abs(a(K,K))i0=KFori=K+1ToN
5、IfAbs(a(i,K))>pelementThenpelement=Abs(a(i,K))i0=iEndIfNext接上頁:Ifi0<>KThenForj=KToNpelement=a(K,j)a(K,j)=a(i0,j)a(i0,j)=pelementNextForj=1ToGrouppelement=xx(K,j)xx(K,j)=xx(i0,j)xx(i0,j)=pelementNextEndIfIfAbs(a(K,K))6、"BasedFunctions","Gauss_Jordan",AppError.AppErrBookMark1,"主元為零"ExitFunctionEndIfForj=K+1ToNa(K,j)=a(K,j)/a(K,K)NextForj=1ToGroupxx(K,j)=xx(K,j)/a(K,K)Nexta(K,K)=1#接上頁:Fori=1ToNIfi<>KThenForj=1ToGroupxx(i,j)=xx(i,j)-a(i,K)*xx(K,j)NextForj=K+1ToNa(i,j)=a(i,j)-a(i,K)*a(
7、K,j)Nexta(i,K)=0#EndIfNextNextGauss_Jordan=0接上頁:ExitFunctionGauss_JordanError:Gauss_Jordan=1AppError.SaveAppError"BasedFunctions","Gauss_Jordan",AppError.AppErrBookMark0EndFunction接上頁:Step2:調(diào)用上述解線性方程組的函數(shù)求解dimA(1to2,1to2)asdouble,B(1to2)asdoubleA(1,1)=1,A(1,2)=2,A(2,1
8、)=2,A(2,3)=3B(1)=8,B(2)=13Gauss_Jordan(A,B,1,2)2)使用C#includemain(){inti,j;for(i=-32768;i<=32767;i++)for(j=-32768;j<=3276