‹(•¿•)...› MODUL Pemrograman Lanjutan DELPHI7

Diposting oleh Rahayu Setiawan Ismail Kamis, 19 April 2012

Wiissss... Praktikum.... Praktikum....

Sedot ajj niieh.... MODUL Pemrograman Lanjutan DELPHI7
http://www.mediafire.com/?282o5uoz2485ner

Baca selengkapnya »

(◡‿◡✿) Java Metoda Secant

Diposting oleh Rahayu Setiawan Ismail Minggu, 08 April 2012

Niiee.. skrng lnjt k Metode Berikutnya....

package tugas;
import java.util.Scanner;
public class secant {

   public static void main(String[] args) {
       Scanner s = new Scanner(System.in);
       System.out.printf(“Tebakan ke – 1 : “);
       double tebakan1 = s.nextDouble();
       System.out.printf(“Tebakan ke – 2 : “);
       double tebakan2 = s.nextDouble();
       System.out.printf(“Galat : “);
       double galat= s.nextDouble();
       System.out.printf(“Max Iterasi : “);
       int maxiterasi = s.nextInt();

       double xold = tebakan1;
       double xnow = tebakan2;
       double yold = fungsi (xold);
       double ynow = fungsi (xnow);
       int iterasi = 0;
       while ((Math.abs(ynow)>=galat)&(iterasi <=maxiterasi));
       {
           iterasi+=1;
           double xnew = xnow-ynow*((xnow-xold)/(ynow-yold));
           double ynew=fungsi(xnew);
           xold = xnow;
           yold = ynow;
           xnow = xnew;
           ynow = ynew;

           System.out.println(“Hasil Iterasi ke- “+iterasi+” dititik x = “+xnow+” dengan nilai “+ynow);
       }
       if(iterasi<=maxiterasi)
       {
           System.out.println(“Mungkin tidak ada akar, karena melebihi maximum iterasi”);
       }
   }
static double fungsi(double z)
{
   return Math.exp(-z)-z;
}
}

Baca selengkapnya »

(∩▂∩) Metode Biseksi

Diposting oleh Rahayu Setiawan Ismail

package tugas;
import java.util.Scanner;
public class biseksi {
   public static void main(String[] args) {
       Scanner s =new Scanner(System.in);
       Double xr=0.0, Fxr=0.0;
       System.out.printf(“Masukkan Batas Bawah : “);
       Double batasbawah = s.nextDouble();
       System.out.printf(“Masukan Batas Atas :”);
       Double batasatas = s.nextDouble();
       System.out.printf(“Maximum Iterasi : “);
       Integer Maximumiterasi = s.nextInt();
       System.out.printf(“Galat : “);
       Double galat = s.nextDouble();

       Double fa = fungsi(batasbawah);
       Double fb = fungsi(batasatas);

       if (fa*fb>0)
       {
           System.out.printf(“Tidak ada akar diantara “+batasatas+” dan “+batasbawah);
       }
       else
           {
               int kondisi = 1;
               int iterasi = 0;
               while(kondisi == 1)
               {
                   iterasi++;
                   xr = (batasatas+batasbawah)/2;
                   Fxr = fungsi(xr);
                   if((Math.abs(Fxr)<galat)|(iterasi>=Maximumiterasi));
                   {
                       kondisi=0;
                   }

                   {
                       if(fa*Fxr>0)
                       {
                           batasbawah = xr;
                           fa = Fxr;
                       }
                       else
                       {
                           batasatas=xr;
                           fb = Fxr;
                       }
                   }
               }
               System.out.println(“Lokasi Akar di “+xr+” dengan “+Fxr);
           }

       }
       static double fungsi (double z)
       {
           return Math.exp(-z)-z;
       }
   }

Baca selengkapnya »