Pages

Senin, 14 Juni 2010

PROGRAM INTEGRAL dengan GAUSSIAN_LEGENDRE QUADRATURE

%GausQuad - integral dengan Gaussian-Legendre Quadrature
% dengan orde n = 5.
clear; help GausQuad;
a=input('Batas bawah integral - ');
b=input('Batas atas integral - ');
% akar Pn(x)
x1=0.9061798459;
x2=0.5384693101;
x3=0.000;
x4= -x1;
x5= -x2;
% koefisien
c1=0.2369268851;
c2=0.4786286705;
c3=0.5688888889;
c4=c1;
c5=c2;
% transformasi variabel
dz=(b-a)/2;
dx=(b+a)/2;
% ganti fungsi bila perlu
[f1 par]=errf(dz*x1+dx);
[f2 par]=errf(dz*x2+dx);
[f3 par]=errf(dz*x3+dx);
[f4 par]=errf(dz*x4+dx);
[f5 par]=errf(dz*x5+dx);
% hasil integral
I = par*(c1*f1 + c2*f2 + c3*f3 + c4*f4 + c5*f5)*dz;
fprintf('Hasil integral = %g\n', I);
PROGRAM INTEGRAL dengan GAUSSIAN_LEGENDRE QUADRATURE

%GausQuad - integral dengan Gaussian-Legendre Quadrature
% dengan orde n = 5.
clear; help GausQuad;
a=input('Batas bawah integral - ');
b=input('Batas atas integral - ');
% akar Pn(x)
x1=0.9061798459;
x2=0.5384693101;
x3=0.000;
x4= -x1;
x5= -x2;
% koefisien
c1=0.2369268851;
c2=0.4786286705;
c3=0.5688888889;
c4=c1;
c5=c2;
% transformasi variabel
dz=(b-a)/2;
dx=(b+a)/2;
% ganti fungsi bila perlu
[f1 par]=errf(dz*x1+dx);
[f2 par]=errf(dz*x2+dx);
[f3 par]=errf(dz*x3+dx);
[f4 par]=errf(dz*x4+dx);
[f5 par]=errf(dz*x5+dx);
% hasil integral
I = par*(c1*f1 + c2*f2 + c3*f3 + c4*f4 + c5*f5)*dz;
fprintf('Hasil integral = %g\n', I);
PROGRAM INTERPOLASI KUADRAT PADA MATLAB

%program interpolasi kuadrat
%DEWI JUMLIANA ML/MTK 08 UIN ALAUDDIN MKS
%x0 x1 x2 adalah titik data
clc;
clear;
x=input('masukkan x= ');
x0=input('masukkan x0= ');
x1=input ('masukkan x1= ');
x2=input ('masukkan x2= ');
%f(x)=ln(x)
fx0=log (x0);
fx1=log (x1);
fx2=log (x2);
b0=fx0;
b1=(fx1-fx0)/(x1-x0);
c=(fx2-fx1)/(x2-x1);
d=(fx1-fx0)/(x1-x0);
b2=(c-d)/(x2-x0);
fx=b0+b1(x-x0)+b2(x-x0)*(x-x1);
fprintf('jadi y= %3.7f\n',fx);
disp('TERIMA KASIH............WASSALAM')
PROGRAM INTERPOLASI LINEAR DENGAN MATLAB

clc;
clear;
% x adalah nilai yang akan dicari f(x)
%x0 adalah titik data awal
%x1 adalah titik data akhir
%f(x)=ln(x)
%program interpolasi lanjar
%DEWI JUMLIANA ML/MTK 08 UIN ALAUDDIN MKS
x=input('masukkan x= ');
x0=input('masukkan x0= ');
x1=input ('masukkan x1= ');
fx0=log(x0);
fx1=log(x1);
fx=fx0+((fx1-fx0)*(x-x0))/(x1-x0);
fprintf('jadi y= %3.7f\n',fx)
disp('TERIMA KASIH...........WASSALAM')

Pada program ini,semakin dekat jarak antara titik data yang anda gunakan maka semakin dekat nilai hampiran terhadap nilai sejati.

Senin, 07 Juni 2010

Menjadi Diri Kamu Sendiri

BE YOUR SELF AJA

Bagaimana menjadi diri kamu sendiri? Itu mungkin pertanyaan yang sering terlintas di pikiran kamu. Sebenarnya kamu tuh udah jadi diri kamu sendiri cuma mungkin kamu belum sadar aja...Kenapa kamu harus mengikuti style orang lain yang kamu anggap bagus, padahal mungkin itu nggak cocok sama kamu...ya syukur2 kalo cocok, kalo nggak kan keliatannya jadi maksa...kan kamu nggak mau dong kalo dibilang norak, ya nggak?
So untuk menjadi diri kamu yang apa adanya ya kamu berbuatlah seperti apa mau kamu,tau dong motonya S***** "Kutau yang kumau"...intinya kamu nggak usah peduliin apa kata orang2 disekitar kamu yang mau ngomong apa,yang penting kamu percaya aja sama diri kamu,nggak usah terbawa lingkungan pergaulan kamu....dengan begitu kamu bisa mengekspresikan diri kamu seutuhnya.
Dengan begitu kamu menjadi seseorang yang berbeda dengan orang2 disekitar kamu....kan pada dasarnya setiap orang memang diciptakan berbeda oleh-NYA oleh karena itu manusia memiliki keunikannya masing2 yg nggak bisa ditemukan pada manusia lain, tinggal bagaimana kita bisa menemukan keunikan itu dan mengembangkannya.
Ada moto yang bilang begini "Janganlah menjadi pengekor tetapi jadilah pelopor",tentunya kamu nggak mau donk kalo selalu mengekor terus, kan sebenarnya mereka itu menjadi seorang pelopor sehingga menyebabkan orang lain menjadi seorang pengekor, maka mulailah dari sekarang untuk menjadi seorang pelopor...caranya ya BE YOUR SELF

Jumat, 04 Juni 2010

Assalamu Alaikum................
Maaf sebelumnya karena tidak sempat posting kembali program-programnya. Masalahnya akhir-akhir ini kami sibuk dengan perkuliahan maklum lagi deadline final test. Jadi mungkin nanti setelah waktunya sudah luang insya Allah akan saya posting kembali.
TERIMA KASIH.......