Kamis, 19 April 2012

UTS KOMTEK no 4

Seperti yang kita ketahui kalau konveksi adalah  salah satu jenis heat tranfer yang di akibatkan oleh inter molekuler atau gerakan antar molekuler. Adapun persaamaan untuk konveksi heat transfer secara umum adalah  :
Untuk mencari koefisien konveksi bisa dengan cara mancari bilangan nusselt
Dimana :

h = koefisien konfeksi
k = konduktivitas termal
d = tinggi aliran
T = temperatur
x = jarak x

Yang pertama kita lakukan adalah melakukan derivatif dt/dx
 Misalnya persamaan distribusi temperatur pada cell 7
T(x) = 382.73 x2 - 18.99 x + 0.72


Private Sub CommandButton1_Click()
Dim a0, a1, a2, n, y_turunan As Integer
Dim b As Integer

a0 = ekox1.Text
a1 = ekox2.Text
a2 = ekox3.Text
n = pangkat.Text

'y_turunan = 2 * a2*x + a1
'b1 = 2*a2
'b2=a1

b1 = 2 * a2
b2 = a1

Labelb1.Caption = b1
Labelb2.Caption = b2

End Sub
 setelah di derivatif kan maka nilai dari T'(x) = 765.46 x -18.99

Jika di asumsikan y= 0 maka nilai derivatifnya akan menjadi
T'(x) = 765.46 (0) - 18.99 = -18.99

Kalau dimasukkan e dalam persamaan dimana nila d = 0.1 m dan k = 1000
maka akan di dapatnilai dari koefisien konveksi




maka koefisen konveksi yang dihasilkan adalah 1.8889 E05

 

Tidak ada komentar:

Posting Komentar