Jumat, 20 Juli 2012

Bocoran Mengenai Tugas Matlab

Ini ni aku bocorin bebearapa cara mengerjakan Tugas Matlab. Tapi ga tau ya benar atau enggak. hehe ini jawabannya :


tol=10^(-5);     %nilai toleransi
rep=100;         % banyaknya iterasi
x(1)=20;          % nilai awal tebakan
err(1)=0;         %selisih

fprintf('===================================================================\n');
fprintf('  iterasi   x(i)        err           f(xi)           f_aksen(xi)\n');
fprintf('===================================================================\n');
for i=1:rep
    iterasi(i)=i;
    fungsi(i)=feval('fun',x(i));
    f_aksen(i)=feval('fun2',x(i));
    x(i+1)=x(i)-(fungsi(i)/f_aksen(i));
    err(i)=x(i+1)-x(i);
    fprintf('   %1d       %2.4f      %1.4f       %3.6f         %3.6f\n', iterasi(i),x(i),err(i),fungsi(i),f_aksen(i));
    if abs(err(i))<=tol
        break      
    end
    akar=x(i+1);  
end
fprintf('===================================================================\n');
no=abs(err(i));
fprintf('dari tabel diatas dapat dilihat bahwa :\n');
fprintf('proses perhitungan berhenti pada iterasi ke-%1d\n',i);
fprintf('dengan error = %1.4f\n',no);
fprintf('maka akar persamaannya adalah x=%1.4f\n',x(i));