extraordinary blog :)

Archive for Juni, 2012

Pembuatan Aplikasi Metode Titik Tengah Menggunakan Wolfram Mathematica 8

Berikut contoh coding yang digunakan dalam pembuatan aplikasi ini,

 

Sum[For[i=1;x=0,x=(x+2/256)/2,i£255,i++;Print[(4 x-x3) Exp[x2]]],1]+ (4 0-03) Exp[02]+ (4 x-x3) Exp[x2]

 

Contoh Tampilan yang didapat adalah sebagai berikut,

Pembuatan Aplikasi Metode Trapesium Menggunakan Wolfram Mathematica 8

Berikut adalah contoh coding yang digunakan dalam Pembuatan Aplikasi Metode Trapesium,

Sum[For[i=1;x=0,x=x+2/256,i£255,i++;Print[(2*(4 x-x3) Exp[x2])]],1]+ (4 0-03) Exp[02]+ For[i=256;

x=0,x=x+2/256,i<=256,i++;Print[((4 x-x3) Exp[x2])]]

Contoh Tampilan yang didapat sebagai berikut,

Hasil Tampilan Metode Trapesium

Pembuatan Aplikasi Metode Simpson Sepertiga Menggunakan Wolfram Mathematica 8

Berikut adalah coding yang digunakan dalam pembuatan aplikasi metode ini,

 

(Sum[Range[0.0,256.0,0.2][For[i=1;x=0,x=x+2/256,i£255,i++;Print[(2*(4 x-x3) Exp[x2])]]],1]+ (4 0-03)

Exp[02]+ Sum[Range[0.1,256.0,0.2][For[i=1;x=0,x=x+2/256,i£255,i++;Print[(4*(4 x-x3) Exp[x2])]]],1])/3

 

Contoh tampilan yang didapat adalah sebagai berikut,