• Home
  • Posts RSS
  • Comments RSS
  • Edit
  • TUGAS LOGIKA ALGORITMA "Listing Program Pengurangan Matriks"

    Rabu, 08 Desember 2010
    NAMA         : ANGGA PRASETIYO
    KELAS        : 12.1B.25
    NIM             : 12104850
    ABSEN        : 20
    JURUSAN : MANAGEMENT INFORMATIKA

    TAMPILAN PROGRAM

    1.  Input jumlah baris dan kolom matriks A dan B
    2.  Input data Matriks A
     3. Input data matriks B
     4. Hasil pengurangan mariks (A-B=C)

     5. Perulangan Program

    LISTING PROGRAM:

    #include <iostream.h>
    #include <conio.h>

    #define Nmaks 25

    typedef int matriks[Nmaks][Nmaks];
    void main()
    {
     int colA,colB,rowA,rowB,i,j;
     matriks A,B,C;
     char tanya;

     do
     {
     do
     {
      clrscr();
      cout<<"MATRIKS A : "<<endl;
      cout<<"Masukkan Jumlah Baris Matriks A : ";
      cin>>rowA;
      cout<<"Masukkan Jumlah Kolom Matriks A : ";
      cin>>colA;
      cout<<endl<<endl;
      cout<<"MATRIKS B : "<<endl;
      cout<<"Masukkan Jumlah Baris Matriks B : ";
      cin>>rowB;
      cout<<"Masukkan Jumlah Kolom Matriks B : ";
      cin>>colB;
     }
     while ((colA!=colB) || (rowA!=rowB));

     clrscr();
     cout<<"Masukkan Nilai Matriks A : "<<endl;
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       cout<<"A["<<i<<","<<j<<"] = ";
       cin>>A[i][j];
      }
     }

     clrscr();
     cout<<"Masukkan Nilai Matriks B : "<<endl;
     for(i=1;i<=rowB;i++)
     {
      for(j=1;j<=colB;j++)
      {
       cout<<"B["<<i<<","<<j<<"] = ";
       cin>>B[i][j];
      }
     }

     clrscr();
     cout<<endl;
     //Proses Pengurangan Matriks
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       C[i][j] = A[i][j] - B[i][j];
      }
     }

     clrscr();
     //Output Matriks A
     gotoxy(1,5);
     cout<<"A = ";
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       gotoxy(2+4*j,2+2*i);
       cout<<A[i][j];
      }
     }

     //Output Matriks B
     gotoxy(1,13);
     cout<<"B = ";
     for(i=1;i<=rowB;i++)
     {
      for(j=1;j<=colB;j++)
      {
       gotoxy(2+4*j,10+2*i);
       cout<<B[i][j];
      }
     }

     //Output Matriks C
     gotoxy(1,20);
     cout<<"C = ";
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       gotoxy(3+4*j,17+2*i);
       cout<<A[i][j];
      }
     }

     gotoxy(17,20);
     cout<<" - ";
     for(i=1;i<=rowB;i++)
     {
      for(j=1;j<=colB;j++)
      {
       gotoxy(18+4*j,17+2*i);
       cout<<B[i][j];
      }
     }

     gotoxy(32,20);
     cout<<" = ";
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       gotoxy(33+4*j,17+2*i);
       cout<<C[i][j];
      }
     }

     getch();
     clrscr();
     cout<<"        ** PROGRAM SELESAI **"<<endl<<endl;
     cout<<"Mau Melakukan Perhitungan Lagi? [Y/T]:"; cin>>tanya;
     }
     while ((tanya == 'y') || (tanya == 'Y'));
    }

    TUGAS LOGIKA ALGORITMA "Listing Program Penjumlahan Matriks"

    Kamis, 02 Desember 2010

    NAMA         : ANGGA PRASETIYO
    KELAS        : 12.1B.25
    NIM             : 12104850
    ABSEN        : 20
    JURUSAN : MANAGEMENT INFORMATIKA

    TAMPILAN PROGRAM
     
    1.  Input jumlah baris dan kolom matriks A dan B
    2.  Input data Matriks A
     3. Input data matriks B
     4. Hasil penjumlahan mariks (A+B=C)
     5. Perulangan Program

    LISTING PROGRAM:

    #include <iostream.h>
    #include <conio.h>
    #define Nmaks 25

    typedef int matriks[Nmaks][Nmaks];
    void main()
    {
     int colA,colB,rowA,rowB,i,j;
     matriks A,B,C;
     char tanya;

     do
     {
     do
     {
      clrscr();
      cout<<"MATRIKS A : "<<endl;
      cout<<"Masukkan Jumlah Baris Matriks A : ";
      cin>>rowA;
      cout<<"Masukkan Jumlah Kolom Matriks A : ";
      cin>>colA;
      cout<<endl<<endl;
      cout<<"MATRIKS B : "<<endl;
      cout<<"Masukkan Jumlah Baris Matriks B : ";
      cin>>rowB;
      cout<<"Masukkan Jumlah Kolom Matriks B : ";
      cin>>colB;
     }
     while ((colA!=colB) || (rowA!=rowB));

     clrscr();
     cout<<"Masukkan Nilai Matriks A : "<<endl;
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       cout<<"A["<<i<<","<<j<<"] = ";
       cin>>A[i][j];
      }
     }

     clrscr();
     cout<<"Masukkan Nilai Matriks B : "<<endl;
     for(i=1;i<=rowB;i++)
     {
      for(j=1;j<=colB;j++)
      {
       cout<<"B["<<i<<","<<j<<"] = ";
       cin>>B[i][j];
      }
     }

     clrscr();
     cout<<endl;
     //Proses Penjumlahan Matriks
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       C[i][j] = A[i][j] + B[i][j];
      }
     }

     clrscr();
     //Output Matriks A
     gotoxy(1,5);
     cout<<"A = ";
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       gotoxy(2+4*j,2+2*i);
       cout<<A[i][j];
      }
     }

     //Output Matriks B
     gotoxy(1,13);
     cout<<"B = ";
     for(i=1;i<=rowB;i++)
     {
      for(j=1;j<=colB;j++)
      {
       gotoxy(2+4*j,10+2*i);
       cout<<B[i][j];
      }
     }

     //Output Matriks C
     gotoxy(1,20);
     cout<<"C = ";
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       gotoxy(3+4*j,17+2*i);
       cout<<A[i][j];
      }
     }

     gotoxy(17,20);
     cout<<" + ";
     for(i=1;i<=rowB;i++)
     {
      for(j=1;j<=colB;j++)
      {
       gotoxy(18+4*j,17+2*i);
       cout<<B[i][j];
      }
     }

     gotoxy(32,20);
     cout<<" = ";
     for(i=1;i<=rowA;i++)
     {
      for(j=1;j<=colA;j++)
      {
       gotoxy(33+4*j,17+2*i);
       cout<<C[i][j];
      }
     }

     getch();
     clrscr();
     cout<<"        ** PROGRAM SELESAI **"<<endl<<endl;
     cout<<"Mau Melakukan Perhitungan Lagi? [Y/T]:"; cin>>tanya;
     }
     while ((tanya == 'y') || (tanya == 'Y'));
    }

    TUGAS LOGIKA ALGORITMA "penyelesaian game logic"

    1. wolf sheep cabbage

    penyelesaian:
    1. angkut domba ke seberang
    2. petani kembali ke tempat awal tanpa penumpang
    3. angkut rumput ke seberang dan tukar rumput dengan domba
    4. petani kembali ke tempat awal membawa domba, dan tukar domba dengan serigala
    5. angkut serigala ke seberang
    6. petani kembali ke tempat awal tanpa penumpang
    7. angkut bomba ke seberang
    semua telah selesai di pindahkan

    2. cannibals and missioneries

    penyelesaian:
    1. cannibal dan cannibal ke seberang
    2. cannibal kembali
    3. cannibal dan cannibal ke seberang
    4. cannibal kembali
    5. missionerie dan missionerie ke seberang
    6. cannibal dan missionerie kembali
    7. missionerie dan missionerie ke seberang
    8. cannibal kembali
    9. cannibal dan cannibal ke seberang
    10. cannibal kembali
    11. cannibal dan cannibal ke seberang
    selesai

    3.Family Crisis

    penyeleaian:
    1. 1 dan 2 ke seberang
    2. 1 kembali
    3. 1 dan 6 ke seberang
    4. 3 kembali
    5. 8 dan 12 ke seberang
    6. 1 kembali
    7. 1 dan 3 ke seberang
    selesai