LA2 Matif2 (Matrik) Tanggal 26-3-2011

Listing

import javax.swing.*;
public class mat2
{
public static void main(String[]args)
{
System.out.println("Matriks A : \n");
int baris=Integer.parseInt(JOptionPane.showInputDialog(null,"Masukan Banyak Baris Untuk Matrik : "));
int kolom=Integer.parseInt(JOptionPane.showInputDialog(null,"Masukan Banyak Kolom Untuk Matrik: "));
int A[][]=new int[baris][kolom];
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
A[i][j]=Integer.parseInt(JOptionPane.showInputDialog(null,"Nilai A Baris Ke-"+(i+1)+", Kolom Ke-"+(j+1)+" = "));
System.out.print(" "+A[i][j]+" ");
}
System.out.println("|");
}
System.out.println("\n");
System.out.println("Matriks B : \n");
int B[][]=new int[baris][kolom];
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
B[i][j]=Integer.parseInt(JOptionPane.showInputDialog(null,"Nilai B Baris Ke-"+(i+1)+", Kolom Ke-"+(j+1)+" = "));
System.out.print(" "+B[i][j]+" ");
}
System.out.println("|");
}
System.out.println("\n");
System.out.println("=============================");
System.out.println("Operasi Matrik Penjumlahan :");
System.out.println("=============================");
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
System.out.print(" "+(A[i][j]+B[i][j])+" ");
}
System.out.println("|");
}
System.out.println("");
System.out.println("=============================");
System.out.println("Operasi Matrik Pengurangan :");
System.out.println("=============================");
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
System.out.print(" "+(A[i][j]-B[i][j])+" ");
}
System.out.println("|");
}
System.out.println("");
System.out.println("=========================================");
System.out.println("Operasi Perkalian Matriks A x Matriks B :");
System.out.println("=========================================");
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
int x = (i+1)%baris;
int y = (j+1)%kolom;
if((y==0)&&(x==0))
{
System.out.print(" "+((A[i][j*0]*B[i*0][j])+(A[i][y+(kolom-1)]*B[x+(baris-1)][j]))+" ");
}
else if(y==0)
{
System.out.print(" "+((A[i][j*0]*B[i*0][j])+(A[i][y+(kolom-1)]*B[x][j]))+" ");
}
else if(x==0)
{
System.out.print(" "+((A[i][j*0]*B[i*0][j])+(A[i][y]*B[x+(baris-1)][j]))+" ");
}
else
{
System.out.print(" "+((A[i][j*0]*B[i*0][j])+(A[i][y]*B[x][j]))+" ");
}
}
System.out.println("|");
}
System.out.println("");
int skalara=Integer.parseInt(JOptionPane.showInputDialog(null,"Masukan Angka Skalar A: "));
System.out.println("===================================");
System.out.println("Operasi Matrik Perkalian skalar A :");
System.out.println("===================================");
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
System.out.print(" "+(A[i][j]*skalara)+" ");
}
System.out.println("|");
}
System.out.println("");
int skalarb=Integer.parseInt(JOptionPane.showInputDialog(null,"Masukan Angka Skalar B: "));
System.out.println("===================================");
System.out.println("Operasi Matrik Perkalian skalar B :");
System.out.println("===================================");
for(int i=0;i<baris;i++)
{
System.out.print("|");
for(int j=0;j<kolom;j++)
{
System.out.print(" "+(B[i][j]*skalarb)+" ");
}
System.out.println("|");
}
System.out.println("");
}
}

}

Output

    

LA2 AP2A (Delphi) Tanggal 26-3-2011

Listing

procedure TForm1.prosesClick(Sender: TObject);
var
B, C : Integer;
begin
B:= strtoint(edit1.text);
C:= strtoint(edit2.Text);
begin
case B of
1: edit3.Text := 'Pecel Ayam dan ';
2: edit3.Text := 'Ayam Bakar dan ';
3: edit3.Text := 'Ayam Krispy dan ';
end;
case C of
4: edit3.Text := edit3.Text + 'Es Teh Manis';
5: edit3.Text := edit3.Text + 'Es Jeruk';
6: edit3.Text := edit3.Text + 'Es Capucino';
end;
end;
end;

procedure TForm1.clearClick(Sender: TObject);
begin
edit1.Clear;
edit2.Clear;
edit3.Clear;
end;

end.

Output

LA3 AP2B (Python) Tanggal 22-3-2011

Listing

Output

LA1 Matif2 (Vektor) Tanggal 19-3-2011

Listing Program

import java.io.*;
class vektor
{
       public static void main (String[]vektor) throws IOException
       {
              BufferedReader input = new BufferedReader(new InputStreamReader(System.in));
              int[]jum = new int[100];
              int[]v1 = new int[100];
              int[]v2 = new int[100];
              int i;
              int n;
              int m;
              System.out.println();
              System.out.print("Masukkan Jumlah Elemen Vektor= ");
              n = Integer.parseInt(input.readLine());
              System.out.println();
              System.out.println("Vektor 1");
              for (i=0;i<n;i++)
              {
                       System.out.print("Elemen[1,"+i+"]= ");
                       v1[i] = Integer.parseInt(input.readLine());
              }
              System.out.println();
              System.out.println("Vektor 2");
              for (i=0;i<n;i++)
              {
                        System.out.print("Elemen[1,"+i+"]= ");
                        v2[i] = Integer.parseInt(input.readLine());
              }
              System.out.print("\nPenjumlahan Vektor: [");
              for (i=0;i<n;i++)
              {
                       jum[i]=v1[i]+v2[i];
                       System.out.print(jum[i]);
                       if (i!=n-1)
                      {
                              System.out.print(",");
                       }
              }
              System.out.print("]");
              System.out.print("\nPengurangan Vektor: [");
              for (i=0;i<n;i++)
              {
                        jum[i]=v1[i]-v2[i];
                        System.out.print(jum[i]);
                        if (i!=n-1)
                        {
                               System.out.print(",");
                         }
              }
              System.out.print("]");
              System.out.print("\nPerkalian Vektor: [");
              for (i=0;i<n;i++)
              {
                          jum[i]=v1[i]*v2[i];
                          System.out.print(jum[i]);
                          if (i!=n-1)
                          {
                                 System.out.print(",");
                           }
              }
              System.out.print("]");
              System.out.println("");
              System.out.print("\nMasukkan Angka Skalar= ");
              m = Integer.parseInt(input.readLine());
              System.out.print("\nPerkalian Vektor Skalar 1: [");
              for (i=0;i<n;i++)
              {
                          jum[i]=m*v1[i];
                          System.out.print(jum[i]);
                          if (i!=n-1)
                          {
                                   System.out.print(",");
                           }
              }
              System.out.print("]");
              System.out.print("\nPerkalian Vektor Skalar 2: [");
              for (i=0;i<n;i++)
              {
                           jum[i]=m*v2[i];
                           System.out.print(jum[i]);
                           if (i!=n-1)
                           {
                                     System.out.print(",");
                           }
              }
              System.out.print("]");
              System.out.println("");
       }
}

Output Program

LA1 AP2A (Delphi) Tanggal 19-3-2011

Program 1 (Luas Segitiga)

Listing

Output

Program 2 (Nama & NPM)

Listing

Output

 

LA2 AP2B (Python) Tanggal 15 - 3 - 2011

Listing

Output

LA1 AP2B (Python) Tanggal 8 - 3 - 2011

Listing

Output

Jadi Yang Kuinginkan chord by Vierra

[intro] D #
        D# D#/G G#

D #        D#/G        G #
kau tak sepenuhnya sendiri
D#       D#/G      G#
aku kan slalu ada disini
D#       D#/G        G#
mengapa oh mengapa dirimu
D#        D#/G        G #
penuh dengan rasa bimbang

Bbm            Cm        G#
tak perlu kau pergi tuk mencari
Bbm        Cm    G#
mencari arti cinta

[chorus]
    D#
aku sendiri disini menunggu
    Bb
aku sendiri disini menanti
    Cm           Gm      G #
aku tak terbiasa untuk berharap
     D #
berlari untuk mengejar dirimu
      Bb
dalam menggapai semua impiku
     Fm                     G-G#         Bb
smoga kau kan tetap jadi apa yang ku inginkan

[int] D# D#/G G#

D#       D#/G        G #
mengapa oh mengapa dirimu
D#        D#/G        G#
penuh dengan rasa bimbang

Bbm            Cm        G#
tak perlu kau pergi tuk mencari
Bbm        Cm    G#
mencari arti cinta

[chorus]
    D #
aku sendiri disini menunggu
    Bb
aku sendiri disini menanti
    Cm           Gm      G#
aku tak terbiasa untuk berharap
     D#
berlari untuk mengejar dirimu
      Bb
dalam menggapai semua impiku
     Fm                 G-G#         Bb
smoga kau kan tetap jadi apa yang ku inginkan

Fm                  Bb
jangan pernah berubah ingat janjimu
Fm                  G#       Bb     D #
jangan pernah menghilang dari hatiku


[chorus]
    D#
aku sendiri disini menunggu
    Bb
aku sendiri disini menanti
    Cm           Gm      G #
aku tak terbiasa untuk berharap
     D#
berlari untuk mengejar dirimu
      D#
dalam menggapai semua impiku
     Fm                   G-G#         Bb               D #
smoga kau kan tetap jadi apa yang ku inginkan