第一篇：工程熱力學上機實驗報告

工程熱力學上機實驗報告

姓名：

專業：能源與動力

學號：朗肯循環

對蒸汽動力循環的基本循環——朗肯循環，其工作原理是，從鍋爐出來的高溫T1，高壓p1的過熱水蒸氣經汽輪機絕熱膨脹做工至低壓p2的乏汽，在冷凝器中凝結成飽和液體，經水泵升壓至p1下的未飽和過冷液體，進入鍋爐加熱至過熱蒸汽，再進入汽輪機絕熱膨脹做功，周而復始的將熱能轉換為機械能，圖1為理想朗肯循環工作過程的水蒸氣T—S圖。循環中：

工質在鍋爐中的加熱量：q1=h1-h4 在冷凝器中的放熱量：q2=h2-h3 在汽輪機中的做功量：w1=h1-h2 在水泵中的耗功量：w2=h4-h3 循環熱效率n=(q1-q2)/q1=1-(h2-h3)/(h1-h4)如忽略泵功，h3=h4 則循環效率：n=(h1-h2)/(h1-h3)=1-(h2-h3)/(h1-h3)程序如右圖

1、實驗初始參數：P1=4Mpa,t1=450攝氏度，p2=6kpa如下圖

P1,P2不變改變初溫t1，結果如圖

t1,P2不變改變初溫p1，結果如圖

t1,P1不變改變初溫p2，結果如圖

當汽機絕熱內效率nex=0.85，此時實際不可逆循環的熱效率nt=0.33226925

二，再熱循環

循環熱效率：n=((h1-hb)+(ha-h2)-(h4-h3))/((h1-h4)+(ha-hb))如忽略泵功，h3=h4 則循環效率：n=((h1-hb)+(ha-h2))/((h1-h3)+(ha-hb))如果過分提高壓力p1，而不響應提高t1,將引起乏汽敢賭x2減小，產生不利后果。為此，將新蒸汽膨脹至某一中間壓力pb后撤出汽輪機，導入鍋爐中的特設的再熱器或其他換熱設備中，使之再加熱后，再倒入汽輪機繼續膨脹至背壓p2.即為再熱循環。圖2為再熱循環工作過程的T-S圖。程序如右下面3個圖

2、初始參數

P1=12Mpa,t1=500攝氏度，終壓p2=6kpa, 第一個再熱循環的再熱壓力pa1=3Mpa, 另一個再熱循環的壓力為pa2=0.6Mpa

順序1-3

2、初始參數

P1=12Mpa,t1=500攝氏度，終壓p2=6kpa, 第一個再熱循環的再熱壓力pa1=3Mpa, 另一個再熱循環的壓力為pa2=0.6Mpa 結果如右圖

經程序運行，比較朗肯循環和在再熱循環的效率發現：相同初始參數和相同背壓下，再熱循環效率較高。

當汽機絕熱內效率nex=0.85，此時實際不可逆循環的熱效率nt=0.3812862 0.3777485三、一次抽氣回熱循環

為提高循環平均吸熱溫度，在汽輪機膨脹做功過程中，取出一部分蒸汽用以回熱給水，使循環平均吸熱溫度有所提高，而平均官方熱溫度不變，熱效率相應也隨之提高。

如圖為一級抽氣回熱循環的T-S圖。循環熱效率：

n=((h1-ha)+(1-a)(ha-h2)-(h6-h5)-(1-a)(h4-h3))/(h1-h6)若忽略泵功，循環效率：

n=((h1-ha)+(1-a)(ha-h2))/(h1-h5)其中a由圖回熱器的熱平衡方程求的: a=(h5-h3)/(ha-h3)=(ha’-h2’)/(ha-h2’)程序如右圖

1、實驗初始參數： P1=5Mpa,t1=450攝氏度

抽氣壓力pa=0.5Mpa，p2=6kpa 實驗結果如圖

當汽機絕熱內效率nex=0.85，此時實際不可逆循環的熱效率nt=0.72267255

四、心得

經過這兩次的工程熱力學上機實驗，發現可以用電腦來簡化計算步驟。鞏固了所學熱力學知識，掌握了系統熱力計算的基本概念和計算方法，得到了所求問題的計算結果，但是這只是一些簡單的題目，在更復雜的問題上可更上一層樓。

第二篇：上機實驗報告格式

請各位同學按照下列格式寫：否則按照0分記

上機實驗報告格式

Matlab學習第？次上機實驗報告（第？次）

姓名：？？？班級:???上機時間：？？？？？？

1.上機內容

2.建模及算法分析

3.程序

4.小結

5.參考文獻

將文檔發到我的郵箱里面

learn_matlab@163.com

第三篇：上機實驗報告

一． 題目1． 建立一個學生檔案，內容包括學號，姓名，年齡，性別，數學，物理和英語3門功課成績。要求實現以下功能：1)數據輸入；2)查詢某個學生的成績；3)按平均排列輸出；4)統計某門課各分數段人數；5)刪除某個學生記錄；2． 編程實現對二位數進行加，減，乘運算，每運行一次程序做10道題，完成后給出成績（每題10分）。二． 設計思想和模塊劃分1.1．先定義所需要的條件，例如，姓名，學號，性別，三門功課的成績，平均分等。2．輸入姓名，學號，性別，年齡，三門功課的成績后，就輸出相應的姓名，學號，性別，年齡，三門功課的成績。3．打印表頭；4．在求出平均分，并打印出平均分。5．在查找學生，并打印出學生的相關資料；并按照平均分的高低排列；6．在統計學生各科成績是否》=60分，如果是就是通過，否就是沒通過，最后打印出最后的結果。7．刪除學生，選中刪除的學生，如果確定要，那么該學生的一切記錄就變為0；2．1．隨機調用函數，產生兩個其值為10到99的隨機整數分別放在c,d中用作運算時的運算數。2．隨機調用函數，產生一個值為1到3 的隨機整數放入b中，用來選擇不同的運算。根據b的值選擇不同的運算。當b=1時，去進行c+d的運算練習；當b＝2 時，去進行c-d的運算練習；當b=3時，去進行c×d的運算練習。每完成一個算題就給出是否正確的信息。3．根據答案正確與否統計。正確時，顯示’right’;錯誤時，顯示’wrong’。4．步驟1.2.3.4.重復10次。5．輸出學生成績。三． 運行結果1.Input the 1 student :num:03name:wfage:18sex:fmath:98phy:75eng:65Input the 2 student :num:06name:scage:17sex:fmath:78phy:45eng:65Input the 3 student :num:09name:ytage:17sex:mmath:69phy:75eng:501.readin 2.finds 3.del 4.tj 5.exit1-----------------------------table----num name age sex math phy eng ave------3 wf 18 f 98.0 75.0 65.0 79.3------9 yt 17 m 69.0 75.0 50.0 64.7-------6 sc 17 f 78.0 45.0 65.0 62.7-------1.readin 2.finds 3.del 4.tj 5.exit2Into number:3---num name age sex math phy eng ave---3 wf 18 f 98.0 75.0 65.0 79.3----1.readin 2.finds 3.del 4.tj 5.exit3Into number:6---num name age sex math phy eng ave---6 sc 17 f 78.0 45.0 65.0 62.6---true? Y/Ny1----------------table------------------num name age sex math phy eng ave----3 wf 18 f 98.0 75.0 65.0 79.3-----9 yt 17 m 69.0 75.0 50.0 64.7-----0 0 0 f 0.0 0.0 0.0 0.0-----1.readin 2.finds 3.del 4.tj 5.exit4 1.input the math 2.input the phy 3.input the eng 1math: pass num is :3 no pass num is :02.32+82=114right!97*15=1455right!99-58=41right!76-66=10right!58+13=71right!37+49=86right!99+52=151right!49*69=5462wrong!73-38=31wrong!86+34=120right!mark is 80四． 主要錯誤改正方法1.在本題的編寫過程中常出現begin 和end 不配對，只要始它們的個數相同就可以了，就可以了。在程序中常出現的’unknown identifier’沒有定義的錯誤，只要在程序前加上定義，就可以了。還有就是type mismatch’的類型不匹配，只要根據前后內容，重新定義，就可以了。2.在本題編寫中，題目要求是兩個兩位數運算，如果寫成c:=random(100)在運行過程中，就會出現一位數運算，只要把它寫成c:=random(90)+10，就可以了。五． 實習小結1．第一題的程序編寫比較復雜，需要較多的定義，因而在后面的程序部分，就常出現標識符重復，而導致的類型不匹配。還有就是每個部分編好后，上下不能連接，而無法調用。2．第二題較第一題簡單，和書上的例題類似，所以，比較簡單，但從中也出現一些不問題。以上兩大題中出現的問題，要在同學的幫助下，才能完成。總的來說兩題程序比較困難六． 程序清單1.program twins;const m=3;n=3;typestudent=recordnum:integer;name:string[3];age:integer;sex:char;s:array[1..n] of real;math,eng,phy:real;ave:real;end;sarr=array[1..m] of student;ta=array [1..m] of student;f=string[6];varstu:sarr;ct:ta;k,d:integer;procedure readin(var stu:sarr);const wrong='0<=data<=100 ,again!';var j,i:integer;a:student;beginwriteln;writeln('Input ',m,' num name sex math phy eng',' of student.');for j:=1 to m dobeginwriteln;writeln('Input the ',j,' student :');with a dobeginwrite('num:');readln(num);write('name:');readln(name);write('age:');readln(age);write('sex:');readln(sex);while(sex<>'m')and(sex<>'f')dobeginwrite('sex:');readln(sex)end;for i:=1 to n do begincase i of1:begin write('math:');readln(s[i]);while(s[i]<0)or(s[i]>100)dobeginwriteln(wrong);write('math:');readln(s[i]);end;end;2:begin write('phy:');readln(s[i]);while(s[i]<0)or(s[i]>100)dobeginwriteln(wrong);write('phy:');readln(s[i]);end;end;3:begin write('eng:');readln(s[i]);while(s[i]<0)or(s[i]>100)dobeginwriteln(wrong);write('eng:');readln(s[i]);end;end;end;end;stu[j]:=a;end;writeln;end;end;procedure ave(var stu:sarr);var j,i:integer;k:real;beginfor j:=1 to m dobegink:=0;with stu[j] dobeginfor i:=1 to n do k:=k+s[i];ave:=k/nend;end;end;procedure px(var stu:sarr);var tm:ta;j,i,p:integer;beginfor j:=1 to m dobeginp:=j;for i:=j+1 to m doif stu[i].ave>stu[p].ave then p:=i;tm[1]:=stu[p];stu[p]:=stu[j];stu[j]:=tm[1];end;end;procedure head(ct:ta);var i:integer;beginwrite(' ');for i:=1 to 72 do write('-');writeln;write('',' num':4,' ','name':9,' ','age':8,' ','sex':5,' ','math':6,' ','phy':9,' ','eng':8,' ');writeln('ave':6,' ');write(' ');for i:=1 to 72 do write('-');writeln;with ct[1] dobeginwrite('',num:7,' ',name:8,' ',age:8,' ',sex:5,' ');for i:=1 to n do write(s[i]:7,' ');write(ave:10,' ');writeln;end;write(' ');for i:=1 to 72 do write('-');writeln;end;procedure find(var stu:sarr);var n,i:integer;u:boolean;beginu:=true;while u dobeginwrite('Into number:');readln(n);for i:=1 to m dobeginif stu[i].num=n then beginct[1]:=stu[i];u:=false;d:=iend;end;end;end;procedure del(var stu:sarr);var i:integer;b:char;beginhead(ct);write('true? Y/N');readln(b);if b='y' then begin write('1');with stu[d] dobeginnum:=0;name:='0';age:=0;sex:='f';for i:=1 to n do s[i]:=0;ave:=0end;endelseend;procedure tj(var stu:sarr);var w1,q1,q2,num,j:integer;h1,h2,h3:boolean;beginh1:=false;h2:=false;h3:=false;q1:=0;q2:=0;writeln(' ':30,'1.input the math 2.input the phy 3.input the eng ');readln(w1);case w1 of1:h1:=true;2:h2:=true;3:h3:=true;end;if h1 thenbeginbeginfor j:=1 to m dowith stu[j] doif stu[j].math>=60 thenq1:=q1+1elseq2:=q2+1;writeln('math:');end;if h2 thenbeginbeginfor j:=1 to m dowith stu[j] doif stu[j].phy>=60 thenq1:=q1+1elseq2:=q2+1;writeln('phy:');end;if h3 thenbeginbeginfor j:=1 to m dowith stu[j] doif stu[j].eng>=60 thenq1:=q1+1elseq2:=q2+1;writeln('eng:');end;end;end;end;writeln(' ':5,'pass num is :',q1);writeln(' ':5,'no pass num is :',q2);end;procedure head1(var stu:sarr);var j,i:integer;beginwriteln('----------------table--------------':60);writeln;write(' ');for i:=1 to 72 do write('-');writeln;write('',' num':4,' ','name':9,' ','age':8,' ','sex':5,' ','math':6,' ','phy':9,' ','eng':8,' ');writeln('ave':6,' ');write(' ');for i:=1 to 72 do write('-');writeln;for j:=1 to m do beginwith stu[j] dobeginwrite('',num:7,' ',name:8,' ',age:8,' ',sex:5,' ');for i:=1 to n do write(s[i]:7:1,' ');write(ave:10:1,' ');writeln;end;write(' ');for i:=1 to 72 do write('-');writeln;end;end;beginreadin(stu);ave(stu);k:=0;while k<>5 dobeginwriteln('1.readin 2.finds 3.del 4.tj 5.exit');read(k);readln;while(k<>1)and(k<>2)and(k<>3)and(k<>4)and(k<>5)dobeginwriteln(' mistake,please again');read(k)end;case k of1: begin px(stu);head1(stu)end;2: begin find(stu);head(ct)end;3: begin find(stu);del(stu);px(stu);head1(stu)end;4: begin tj(stu);end;5: writeln('exit!');end;end;end..2.program shadow;var a,b,c,d,e:integer;right:boolean;procedure s1;beginwriteln('right!');right:=trueend;procedure s2;beginwriteln('wrong!');right:=falseend;procedure s3(x,y:integer);var h:integer;beginwrite(x,'+',y,'=');readln(h);if h=x+y then s1else s2 end;procedure s4(x,y:integer);var h,w:integer;beginif x

第四篇：材料熱力學實驗報告

材料熱力學實驗報告

姓名：XXX 學號：201401049 時間：2014.12.25

實驗題目：Al-Si合金DSC-TG及熱膨脹分析

一、實驗目的

1.掌握DSC（差示掃描量熱）（功率補償型）、TGA（熱重分析）和TMA實驗原理及測量方法；

2.學會使用上述三種實驗儀器，并能夠繪制樣品的DSC、TGA曲線、計算實驗材料線膨脹系數；

3.掌握實驗結果的處理方法，并能夠對譜圖進行分析。

二、實驗儀器及實驗樣品

同步熱分析儀 型號：NETZSCH STA 409PC/PG

制造廠家：德國耐弛公司

熱機械分析儀 型號：TMA/SDTA840

制造廠家：瑞士梅特勒-托利多公司 樣品：Al-Si合金

三、實驗原理 1.DSC原理

差示掃描量熱儀DSC是在程序控溫下，測量物質和參比物之間的能量差隨溫度變化關系的一種技術。根據測量方法的不同，又分為功率補償型DSC和熱流型DSC兩種類型。常用的功率補償DSC是在程序控溫下，使試樣和參比物的溫度相等，測量每單位時間輸給兩者的熱能功率差與溫度的關系的一種方法。DSC是在控制溫度變化情況下，以溫度(或時間)為橫坐標，以樣品與參比物間溫差為零所需供給的熱量為縱坐標所得的掃描曲線。當試樣在加熱過程中由于熱效應與參比物之間出現溫差ΔT時，通過差熱放大電路和差動熱量補償放大器，使流入補償電熱絲的電流發生變化，當試樣吸熱時，補償放大器使試樣一邊的電流立即增大；反之，當試樣放熱時則使參比物一邊的電流增大，直到兩邊熱量平衡，溫差ΔT消失為止。換句話說，試樣在熱反應時發生的熱量變化，由于及時輸入電功率而得到補償，所以實際記錄的是試樣和參比物下面兩只電熱補償的熱功率之差隨時間t的變化的關系。2.TGA原理

是指在程序控制溫度下測量待測樣品的質量與溫度變化關系的一種熱分析技術，用來研究材料的熱穩定性和組份。TGA在研發和質量控制方面都是比較常用的檢測手段。熱重分析在實際的材料分析中經常與其他分析方法連用，進行綜合熱分析，全面準確分析材料。

3.同步熱分析（TG-DSC）將熱重分析與示差熱分析結合測量。4.熱膨脹原理

物體的體積或長度隨溫度的變化而發生相對變化的現象稱為熱膨脹；本質是晶體點陣結構間的平均距離隨溫度變化而變化。

一般的普通材料，通常所說膨脹系數是指線膨脹系數，其意義是溫度升高1℃時單位長度上所增加的長度，單位為厘米/厘米·度。假設物體原來的長度

為L0，溫度升高后長度的增加量為?L，它們之間存在如下關系：

?L╱L0＝?1?t

（1）

式中，?1稱為線膨脹系數，也就是溫度每升高1℃時，物體的相對伸長。當物體的溫度從T1上升到T2時，其體積也從V1變化為V2，則該物體在T1至T2的溫度范圍內，溫度每上升一個單位，單位體積物體的平均增長量為

?=(V1－V2）╱V1（T1－T2）

（2）

式中，?為平均體膨脹系數。從測試技術來說，測體膨脹系數較為復雜。因此，在討論材料的熱膨脹系數時，常常采用線膨脹系數：

?＝（L1－L2）╱L1（T1－T2）

(3)式中：?―試樣的平均線膨脹系數；L1―在溫度為T1時試樣的長度； L2―在溫度為T2時試樣的長度；

必須指出，由于膨脹系數實際上并不是一個恒定的值，而是隨溫度變化的，所以上述膨脹系數都是具有在一定溫度范圍?t內的平均值的概念，因此使用時要注意它適用的溫度范圍，如：?(0～300)= 5.7×10-7 / k。本實驗主要測量材料的平均線膨脹系數。

四、實驗參數

DSC-TGA

參數: 溫度范圍：40-740℃

加熱速率：20K/min

吹掃氣體：氬氣 20mL/min

坩堝：DSC/TG pan Al2O

3樣品量：15.434mg 熱膨脹參數： 鋁硅合金材料厚度為2.6342mm

溫度范圍：30-300℃

升溫速率：10℃/min

五、實驗步驟

1、DSC-TGA實驗

a.開機 打開恒溫水浴、STA449C主機、TASC414/4控制器與計算機電源。一般在水浴與熱天平打開4小時后，可以開始測試。如果配有低溫系統，打開冷卻控制器CC200L電源。打開Proteus測試軟件。b.進行抽真空 進行3次以上抽真空操作，確保氧氣排除干凈，然后在通入惰性氣體保護。

c.基線測試（若已有原先做好的基線文件，可跳過此步驟）d.樣品測試 先將空坩堝放在天平上稱重，隨后將樣品加入坩堝中，稱取樣品重量，本實驗中樣品重量為15.434mg。將裝有樣品的坩堝放入爐體內，關閉爐體，點擊“編輯”菜單下的“測量向導”，在彈出的“STA449C測量向導”對話框中選擇測量模式為“樣品+修正”，輸入樣品名稱、編號與樣品質量，設定完成后點擊“繼續”，打開溫度校正文件，打開靈敏度校正文件，編輯設定溫度程序，本實驗溫度范圍為40~740℃。設定測量文件名，點擊“初始化工作條件”，軟件將根據實驗設置自動打開各路氣體。轉動流量計上的旋鈕，調節各路氣體流量。本實驗所用吹掃氣體為氬氣，流速為20ml/min。隨后點擊“診斷”菜單下的“爐體溫度”與“查看信號”，調出相應的顯示框，點擊“清零”，對天平進行清零。隨后觀察儀器狀態滿足如下條件：

1）爐體溫度、樣品溫度、TG信號及DSC信號處于穩定狀態； 2）樣品溫度與設定起始溫度相吻合。即可點擊“開始”開始測量。

2、熱膨脹實驗

a.開機啟動TMA系統，進入主程序；

b.設置起始溫度、終止溫度、升溫速率，輸入新建文件名開始運行；

c.達到預定溫度后，打開爐子，歸零，抬PROBE，加入樣品，放PROBE，再次歸零，得到長度，本次實驗材料的長度為2.6342mm；ADJUST XU旋轉爐子使POS位于0%，對中，按OK確認； d.回到編輯程序處：開始實驗；終止實驗。

六、實驗分析及結果 1.DSC-TGA實驗

從上圖中觀察到由548.7℃開始至562.8℃時的吸熱峰，峰面積為19.05J/g，初步分析是由于鋁硅合金的亞共晶轉變形成的相變潛熱。因為在鋁硅相圖中，共晶轉變是發生在577?1℃，而此時的562.8℃還未達到共晶轉變溫度，但實驗用材料的成分不確定，合金中可能存在其他影響共晶轉變溫度變化的成分，所以推測在此溫度下是發生了亞共晶轉變的吸熱過程。

從上圖中觀察到由618.3℃開始的至642.0℃時出現了很強的吸熱峰，峰面積為187.6J/g，初步分析是由于鋁硅合金的熔融產生的。理論中鋁的熔點為660.4℃，硅的熔點更高，而任何合金的熔點都是小于合金中任意成分的熔點，所以由此推測是隨著溫度逐漸升高，鋁硅合金達到熔點，熔融時需要吸收大量的熱，從而引起明顯的吸熱峰。由上面兩個圖中還能觀察到除上面分析的兩個峰外，DSC曲線整體還有明顯的下降趨勢，初步分析是由于儀器本身的原因導致的。2.熱重實驗分析

由上圖中可觀察到TGA曲線有小幅度的上升，質量增重為1.09％，初步分析是由于在測量過程中鋁硅合金被氧氣氧化引起的；雖然在實驗開始前已經進行三次抽真空，但是不排除有氧氣混入。3.線膨脹實驗分析

熱（線）膨脹系數：α=斜率/材料厚度（單位：μm）由擬合圖像得 斜率B=0.05971 μm/℃

長度=2.6342mm=2634.2μm

??

0.05971?m℃?2.27?10?5/℃2634.2?m

計算得到Al-Si合金的熱膨脹系數為2.27×10-5/℃。

七、誤差分析

1、影響DSC結果的因素

a、樣品量 樣品的分辨率高，但靈敏度下降，一般根據樣品熱效應大小調節樣品量，一般3～5mg。另一方面樣品量多少對所測轉變溫度也有影響，隨樣品量的增加，峰起始溫度基本不變，但峰頂溫度增加，峰結束溫度也提高，因此如同類樣品要相互比較差異，最好量相同。b、升溫速率 通常升溫速率范圍在5～20℃/min。升溫速率越快，靈敏度提高，分辯率下降。靈敏度和分辨率是一對矛盾，一般選擇較慢的升溫速率以保持好的分辨率，而適當增加樣品量來提高靈敏度。隨著升溫速率的增加。融化峰起始溫度變化不大，而峰頂和峰結束溫度提高。峰型變寬。

c、氣氛 一般使用惰性氣體，如氮氣、氬氣、氦氣等，就不會產生氧化反應峰，同時又減少試樣揮發對監測器的腐蝕。氣流流速必須恒定，否則會引起基線波動。氣體性質對測定有顯著影響，要根據不同氣體的熱導率和所做的實驗合理選擇。有時可通過比較氮氣和氧氣中DSC曲線，來解釋一些氧化反應。

2、影響TG的因素 儀器影響

a、浮力的影響

熱天平在熱區中，其部件在升溫過程中排開空氣的重量不斷減小，即浮力在減小，會產生試樣表觀增重。

熱天平試樣周圍氣氛受熱變輕會上升，形成向上熱氣流，作用在熱天平上相當于減重。b、坩堝影響

熱分析作用的坩堝材質，要求對試樣、中間產物、最終產物和氣氛都是惰性的，其幾何形狀和重量對熱分析也有影響。c、揮發物再冷卻的影響

實樣熱分析過程溢出的揮發物有可能在熱天平其他部分再冷凝，這會污染儀器、使測的的失重量偏低，待溫度進一步上升，這些冷凝物可能再次揮發產生假失重，使曲線變形，使測定不準，也不能重復。為了解決這個問題可適當向熱天平通適量氣體。操作條件的影響 a、升溫速率的影響

升溫速率越大溫度滯后越嚴重，開始分解溫度Ti及終止分解溫度Tf都高，溫度區間寬。

一般熱重法測定不要采用太高的升溫速率，對傳熱差的高分子試樣一般用5～10K/min，對傳熱好的無機物、金屬試樣可用10～20K/min，對作用動力學分析還要低一些。b、氣氛的影響

熱天平周圍氣氛的改變對TG曲線的影響也非常顯著。在流動氣氛中進行TG測定時，流速大小、氣氛純度、進氣溫度等是否穩定，對TG曲線都有影響。一般，氣流速度大小，對傳熱和溢出氣體擴散都有利。使熱分解溫度降低。對于真空和高壓熱天平，氣氛壓力對TG也有很大影響。c、試樣用量、粒度和裝填情況的影響

試樣用量多時，要過較長時間內部才能達到分解溫度。試樣粒度與用量對TG影響相似，粒度越小、反映面積越大，反映越容易進行，使TG曲線的Ti和Tf都低，反應區間也窄。試樣裝填情況首先要求顆粒均勻，必要時要過篩。

第五篇：信息論上機實驗報告

華中科技大學文華學院

信息論上機實驗報告

專業年級：10級通信工程** 學號：1001******** 姓名：** 指導教師：***

2012年 04月30日

目錄 等長編碼.........................2 1.1 求信源的熵...................2 1.2 求等長碼碼長.................2 1.3 求等長長等編碼...............3 1.4 等長編碼全部源代碼...........3 1.5MATLAB仿真及其截圖..........5 2霍夫曼編碼.......................6 2.1 霍夫曼編碼源代碼.............6 2.2MATLAB仿真及其截圖..........9 3游程編碼.........................9 3.1 游程編碼源代碼...............9 3.2 MATLAB仿真及其截圖..........11 4 學習心得........................12 5 參考書籍........................14

for i=1:1: 4;s=i;t=lc;for j=1:1:lc;if s>power(2,t)/2;A(i,lc-t+1)=1;s=s-power(2,t)/2;else A(i,lc-t+1)=0;end t=t-1;end end 1.4全部源代碼

s=[0.25,0.25,0.25,0.25];len=size(s,2);if sum(s)~=1 error('s is not a complete set');end h=0;for i=1:1:len h=h-s(i)*log(s(i))/log(2);

結果：h=

2、lc=

2、A=00 01 10 11 1.5 MATLAB仿真及其截圖

2、霍夫曼編碼

2.1霍夫曼編碼源代碼

T(t-1)=r;T(t)=0;T=fliplr(sort(T));t=t-1;end B;%輸出編碼表

END1=sym('[0,1]');%給最后一列的元素編碼 END=END1;t=3;d=1;for j=n-2:-1:1%從倒數第二列開始依次對各列元素編碼 for i=1:t-2 if i>1 & B(i,j)==B(i-1,j)d=d+1;else d=1;end B(B(n,j+1),j+1)=-1;temp=B(:,j+1);

x=find(temp==B(i,j));END(i)=END1(x(d));

2.2MATLAB仿真及其截圖

3、游程編碼

3.1、游程編碼源代碼 I=checkerboard(10,2);[m,n]=size(I);J=[];for i=1:m

壓縮圖像大小：

Name Size Bytes Class J 1x400 3200 double array 圖像壓縮比：4 3.2 MATLAB仿真及其截圖

就直接向他們求教，雖然有些時候他們也不一定能解答出來，但最少也能給我一些提示。最后有時候也靠自己，慢慢的想，慢慢的翻資料一遍一遍的輸入，校正，最后就做出來了。雖然有些題目我也不知道自己的對不對，但是通過自己動手把它做出結果了我就覺得有收獲了。

Matlab的課比較少，課堂上學到的東西也不是特別的多，但是通過實驗，我自學了許多東西，也完成了學習任務，同時也鍛煉了自己的個人能力

2012/5/3

314-