WELCOME to JF's ZONE

arek STIKOM SURABAYA

Jeff's says :

Inspirasiku untuk membuat blog yang dapat memberikan segala pengetahuan dan dapat menjadi tuntunan bagi sobat JF's Zone. Pengetahuan dengan dasar Teknologi Informasi yang aku dapatkan sehingga dapat berguna bagi pembaca dan dapat digunakan sebagai inspirasi dalam memperoleh wawasan.

Aku ingin ilmuku bermanfaat bagi orang lain...

Showing posts with label programming. Show all posts
Showing posts with label programming. Show all posts

Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.ComponentModel
Imports System.Data.SqlClient
<System.Web.Services.WebService(Namespace:="http://tempuri.org/")> _
<System.Web.Services.WebServiceBinding(ConformsTo:=WsiProfiles.BasicProfile1_1)> _
<ToolboxItem(False)> _
Public Class Service1
    Inherits System.Web.Services.WebService
    Dim connSTR As String = "SERVER=JEFF-PC;DATABASE=PEMESANAN;INTEGRATED SECURITY=TRUE"
    Dim conn As SqlConnection
    Dim comm As SqlCommand
    Dim reader As SqlDataReader
    Sub New()
        conn = New SqlConnection
        conn.ConnectionString = connSTR
    End Sub
    Function returnConnStr() As String
        Return conn.ConnectionString
    End Function
    <WebMethod()> _
    Public Function HelloWorld() As String
       Return "Hello World"
    End Function
    <WebMethod()> _
      Function InsertBarang(ByVal id_barang As String, ByVal nama_barang As String, ByVal harga_beli As String, ByVal harga_jual As String, ByVal stok As String)
        Try
            conn.Open()
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "insert into barang values ('" & id_barang & "', '" & nama_barang & "', '" & harga_beli & "', '" & harga_jual & "', '" & stok & "')"

            comm.ExecuteNonQuery()
            conn.Close()
            Return "Data Tersimpan"

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
     Function InsertPelanggan(ByVal id_pelanggan As String, ByVal nama_pelanggan As String, ByVal alamat As String, ByVal telepon As String)
        Try
            conn.Open()
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "insert into pelanggan values ('" & id_pelanggan & "', '" & nama_pelanggan & "', '" & alamat & "', '" & telepon & "')"

            comm.ExecuteNonQuery()
            conn.Close()
            Return "Data Tersimpan"

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
    Function InsertPemasok(ByVal id_pemasok As String, ByVal nama_pemasok As String, ByVal alamat As String, ByVal telepon As String)
        Try
            conn.Open()
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "insert into pemasok values ('" & id_pemasok & "', '" & nama_pemasok & "', '" & alamat & "', '" & telepon & "')"

            comm.ExecuteNonQuery()
            conn.Close()
            Return "Data Tersimpan"

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
    Function CekBarang(ByVal idbarang As String)
        Try
            Dim row1 As Integer = 0
            Dim bool As Boolean
            comm = New SqlCommand
            comm.CommandText = "select count(*) from barang where id_barang = '" & idbarang & "'"
            comm.Connection = conn
            conn.Open()
            row1 = comm.ExecuteScalar()

            If row1 > 0 Then
                bool = True
                Return bool
            Else
                bool = False
                Return bool
            End If

            conn.Close()
        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
    Function TotalHargaJual(ByVal idbarang As String, ByVal jumlahjual As Integer)
        conn.Open()
        comm = New SqlCommand
        comm.Connection = conn
        comm.CommandText = "select harga_jual from barang where id_barang ='" & idbarang & "'"
        Dim jumlah As Integer
        Dim total_harga As Integer
        jumlah = comm.ExecuteScalar()
        total_harga = jumlahjual * jumlah
        conn.Close()
        Return total_harga
    End Function
    <WebMethod()> _
    Function TotalHargaBeli(ByVal idbarang As String, ByVal jumlahbeli As Integer)
        conn.Open()
        comm = New SqlCommand
        comm.Connection = conn
        comm.CommandText = "select harga_beli from barang where id_barang ='" & idbarang & "'"
        Dim jumlah As Integer
        Dim total_harga As Integer
        jumlah = comm.ExecuteScalar()
        total_harga = jumlahbeli * jumlah
        conn.Close()
        Return total_harga
    End Function
    <WebMethod()> _
    Function UpdateKeluar(ByVal idbarang As String, ByVal jumlahjual As String)
        Try
            conn.Open()
            Dim total As Integer
            Dim sub1 As String = ("select stok from barang where id_barang = '" & idbarang & "'")
            Dim comm1 As SqlCommand = New SqlCommand(sub1, conn)
            Dim stok As Object = comm1.ExecuteScalar
            total = stok - jumlahjual
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "update barang set stok = '" & total & "' where id_barang = '" & idbarang & "'"

            comm.ExecuteNonQuery()
            Dim jumlah As String
            jumlah = total
            conn.Close()
            Return "jumlah stok sekarang = " + jumlah

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
    Function UpdateMasuk(ByVal idbarang As String, ByVal jumlahbeli As String)
        Try
            conn.Open()
            Dim total As Integer
            Dim sub1 As String = ("select stok from barang where id_barang = '" & idbarang & "'")
            Dim comm1 As SqlCommand = New SqlCommand(sub1, conn)
            Dim stok As Object = comm1.ExecuteScalar
            total = stok + jumlahbeli
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "update barang set stok = '" & total & "' where id_barang = '" & idbarang & "'"

            comm.ExecuteNonQuery()
            Dim jumlah As String
            jumlah = total
            conn.Close()
            Return "jumlah stok sekarang = " + jumlah

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
    Function InsertTransJual(ByVal idpenjualan As String, ByVal idbarang As String, ByVal tanggaljual As String, ByVal jumlahjual As String, ByVal idpelanggan As String, ByVal totalharga As String, ByVal status As String)
        Try
            conn.Open()
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "insert into penjualan values ('" & idpenjualan & "', '" & idbarang & "', '" & tanggaljual & "', '" & jumlahjual & "', '" & idpelanggan & "', '" & totalharga & "', '" & status & "')"

            comm.ExecuteNonQuery()
            conn.Close()
            Return "Data Tersimpan"

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
  Function InsertTransBeli(ByVal idpembelian As String, ByVal idbarang As String, ByVal tanggalbeli As String, ByVal jumlahbeli As Integer, ByVal idpemasok As String, ByVal totalharga As Integer)
        Try
            conn.Open()
            comm = New SqlCommand
            comm.Connection = conn
            comm.CommandText = "insert into pembelian values ('" & idpembelian & "', '" & idbarang & "', '" & tanggalbeli & "', '" & jumlahbeli & "', '" & idpemasok & "', '" & totalharga & "')"

            comm.ExecuteNonQuery()
            conn.Close()
            Return "Data Tersimpan"

        Catch ex As Exception
            Return ex.Message()
        End Try
    End Function
    <WebMethod()> _
       Function incbarang()
        conn.Open()
        Dim strQuery As String = "select count(id_barang)+1 from barang"
        comm = New SqlCommand(strQuery, conn)
        Dim cek
        Dim jumlah As String = comm.ExecuteScalar
        cek = "B" + jumlah
        conn.Close()
        Return cek
    End Function
    <WebMethod()> _
      Function incpelanggan()
        conn.Open()
        Dim strQuery As String = "select count(id_pelanggan)+1 from pelanggan"
        comm = New SqlCommand(strQuery, conn)
        Dim cek
        Dim jumlah As String = comm.ExecuteScalar
        cek = "P" + jumlah
        conn.Close()
        Return cek
    End Function
    <WebMethod()> _
     Function incpemasok()
        conn.Open()
        Dim strQuery As String = "select count(id_pemasok)+1 from pemasok"
        comm = New SqlCommand(strQuery, conn)
        Dim cek
        Dim jumlah As String = comm.ExecuteScalar
        cek = "S" + jumlah
        conn.Close()
        Return cek
    End Function
    <WebMethod()> _
   Function inctranjual()
        conn.Open()
        Dim strQuery As String = "select count(id_penjualan)+1 from penjualan"
        comm = New SqlCommand(strQuery, conn)
        Dim cek
        Dim jumlah As String = comm.ExecuteScalar
        cek = "FJ" + jumlah
        conn.Close()
        Return cek
    End Function
    <WebMethod()> _
  Function inctranbeli()
        conn.Open()
        Dim strQuery As String = "select count(id_pembelian)+1 from pembelian"
        comm = New SqlCommand(strQuery, conn)
        Dim cek
        Dim jumlah As String = comm.ExecuteScalar
        cek = "FB" + jumlah
        conn.Close()
        Return cek
    End Function
    <WebMethod()> _
    Function txhrgbelibarang(ByVal idbarang As String)

        conn.Open()
        Dim cek As String
        comm = New SqlCommand
        comm.Connection = conn
        comm.CommandText = "SELECT harga_beli FROM barang where id_barang = '" & idbarang & "'"
        cek = comm.ExecuteScalar()
        Return cek
        conn.Close()
    End Function
    <WebMethod()> _
   Function txhrgjualbarang(ByVal idbarang As String)

        conn.Open()
        Dim cek As String
        comm = New SqlCommand
        comm.Connection = conn
        comm.CommandText = "SELECT harga_jual FROM barang where id_barang = '" & idbarang & "'"
        cek = comm.ExecuteScalar()
        Return cek
        conn.Close()
    End Function
    <WebMethod()> _
   Function txstokbarang(ByVal idbarang As String)

        conn.Open()
        Dim cek As String
        comm = New SqlCommand
        comm.Connection = conn
        comm.CommandText = "SELECT stok FROM barang where id_barang = '" & idbarang & "'"
        cek = comm.ExecuteScalar()
        Return cek
        conn.Close()
    End Function
    <WebMethod()> _
  Function txnamabarang(ByVal idbarang As String)

        conn.Open()
        Dim cek As String
        comm = New SqlCommand
        comm.Connection = conn
        comm.CommandText = "SELECT nama_barang FROM barang where id_barang = '" & idbarang & "'"
        cek = comm.ExecuteScalar()
        Return cek
        conn.Close()
    End Function
End Class

Label:

Belajar Java 25

0 Comments Diposkan oleh Antonius Jefry di 7:51 PM

import java.util.StringTokenizer;

class StringTokenizer1
{
  public static void main(String[] args)
  {
    String teks = "Surabaya ada di Jawa Timur";
    String delim = "au";

    StringTokenizer st = new StringTokenizer(teks, delim);

    System.out.println("Teks    : " + teks);
    System.out.println("Pemisah : " + delim);
    System.out.println();
    System.out.println("Token:");

    while (st.hasMoreTokens())
    {
      System.out.println("   " + st.nextToken());
    }

    System.out.println();
  }
}

Label:

Belajar Java 24

0 Comments Diposkan oleh Antonius Jefry di 7:50 PM

class StringBuffer2
{
  public static void main(String[] args)
  {
    StringBuffer sb = new StringBuffer("Surabaya");

    System.out.println("Isi sb  ==> " + sb);
    System.out.println("Panjang ==> " + sb.length());
    System.out.println();

    sb.insert(4, ' ');

    System.out.println("Isi sb  ==> " + sb);
    System.out.println();

    sb.insert(6, 'u');

    System.out.println("Isi sb  ==> " + sb);
    System.out.println();

    sb.insert(2, 'a');

    System.out.println("Isi sb  ==> " + sb);
    System.out.println();
  }
}

Label:

Belajar Java 23

0 Comments Diposkan oleh Antonius Jefry di 7:46 PM

class Overloading5
{
  public static void main(String[] args)
  {
    bikinGaris();
    bikinGaris(50);
    bikinGaris('*');
    bikinGaris('#',70);
  }

  static void bikinGaris()
  {
    bikinGaris('-',10);
  }

  static void bikinGaris(int n)
  {
    bikinGaris('-',n);
  }

  static void bikinGaris(char c)
  {
    bikinGaris(c,10);
  }

  static void bikinGaris(char c, int n)
  {
    for (int i=0; i<n; i++)
      System.out.print(c);
    System.out.println();
  }
}

Label:

Belajar Java 22

0 Comments Diposkan oleh Antonius Jefry di 7:46 PM

class Overloading4
{
  public static void main(String[] args)
  {
    bikinGaris();
    bikinGaris(50);
    bikinGaris('*');
    bikinGaris('#',70);
  }

  static void bikinGaris()
  {
    System.out.println("----------");
  }

  static void bikinGaris(int n)
  {
    for (int i=0; i<n; i++)
      System.out.print("-");
    System.out.println();
  }

  static void bikinGaris(char c)
  {
    for (int i=0; i<10; i++)
      System.out.print(c);
    System.out.println();
  }

  static void bikinGaris(char c, int n)
  {
    for (int i=0; i<n; i++)
      System.out.print(c);
    System.out.println();
  }
}

Label:

Belajar Java 21

0 Comments Diposkan oleh Antonius Jefry di 7:45 PM

//------------------------------------
// File  : ArrayDinamis5
//
// Desc. : implementasi array dinamis
//         menggunakan konsep vector
//------------------------------------
import java.util.Vector;

class ArrayDinamis5
{
  public static void main(String[] args)
  {
    //.. definisi array of vector sebanyak 10 elemen
    Vector[] dataku = new Vector[10];

    //.. create seluruh elemen agar bisa menampung data
    for (int i=0; i<10; i++)
      dataku[i] = new Vector();

    //.. inisialisasi data random sebanyak 300
    for (int i=0; i<300; i++)
    {
      int acak = (int)(Math.random()*10);
      dataku[acak].addElement(acak);
      System.out.print(acak + " ");
    }

    //.. cetak seluruh isi vector
    /*for (int i=0; i<10; i++)
    {
      System.out.println("Vector ke-" + (i+1) + " (" + dataku[i].size() + ") : " + dataku[i]);
    }*/

    //.. periksa size terbesar dari 10 elemen vector yg ada
    int max = dataku[0].size();
    for (int i=1; i<10; i++)
    {
      if (dataku[i].size() > max)
        max = dataku[i].size();
    }

    //.. tampilkan seluruh vector yg ber-size terbesar
    System.out.println("\n\nMODUS:");
    for (int i=0; i<10; i++)
    {
      if (dataku[i].size() == max)
        System.out.print(i + " ");
    }
    System.out.println("sebanyak " + max + " kemunculan");

    System.out.println();
    System.out.println();
  }
}

Label:

Belajar Java 20

0 Comments Diposkan oleh Antonius Jefry di 7:45 PM

class SubProgram6
{
  //--------------
  // Fungsi UTAMA
  //--------------
  public static void main(String[] args)
  {
    bikinKotak(20,10,4,new String[] {"New",
                                     "Open",
                                     "--------",
                                     "Save",
                                     "Save as",
                                     "Setup..",
                                     "Print",
                                     "--------",
                                     "Exit"}, "File");

    bikinKotak(1,10,5,new String[] {"Rawon",
                                    "Soto",
                                    "Pecel",
                                    "Urap-urap",
                                    "Semanggi"}, "Makanan");

    bikinKotak(0,24,3,new String[] {"",
                                    "NIM    : 10.41010.0023",
                                    "Nama   : Budi Santoso",
                                    "Alamat : Surabaya",
                                    ""}, "Biodata");
  }

  //---------------------------------
  // Fungsi utk membuat persegiempat
  //---------------------------------
  static void bikinKotak(int x, int lebar, int tinggi, String[] data, String judul)
  {
    if (tinggi != data.length)
      tinggi = data.length;

    for (int i=0; i<x; i++)
      System.out.print(" ");

    System.out.print((char)218);
    for (int i=0; i<lebar; i++)
      System.out.print((char)196);
    System.out.print((char)191);

    //-- 1: judul rata kiri
    for (int i=0; i<lebar+1; i++)
      System.out.print("\b");
    System.out.println(judul);

    //-- 2: judul rata tengah
    for (int i=0; i<(lebar+2)/2+judul.length()/2+1; i++)
      System.out.print("\b");
    System.out.println(judul);

    //-- 3: judul rata kanan
    for (int i=0; i<judul.length()+1; i++)
      System.out.print("\b");
    System.out.println(judul);

    for (int i=0; i<tinggi; i++)
    {
      for (int j=0; j<x; j++)
        System.out.print(" ");
      System.out.print((char)179);
      System.out.print(data[i]);
      for (int j=0; j<lebar-data[i].length(); j++)
        System.out.print(" ");
      System.out.println((char)179);
    }

    for (int i=0; i<x; i++)
      System.out.print(" ");
    System.out.print((char)192);
    for (int i=0; i<lebar; i++)
      System.out.print((char)196);
    System.out.println((char)217);
  }
}

Label:

Belajar Java 19

0 Comments Diposkan oleh Antonius Jefry di 7:44 PM

    class SubProgram5
{
  //--------------
  // Fungsi UTAMA
  //--------------
  public static void main(String[] args)
  {
    bikinKotak(20,10,4,new String[] {"New",
                                     "Open",
                                     "-",
                                     "Save",
                                     "Save as",
                                     "Setup..",
                                     "Print",
                                     "-",
                                     "Exit"});

    bikinKotak(1,10,5,new String[] {"Rawon",
                                    "Soto",
                                    "Pecel",
                                    "Urap-urap",
                                    "Semanggi"});

    bikinKotak(0,24,3,new String[] {"NIM    : 10.41010.0023",
                                    "Nama   : Budi Santoso",
                                    "Alamat : Surabaya"});
  }

  //---------------------------------
  // Fungsi utk membuat persegiempat
  //---------------------------------
  static void bikinKotak(int x, int lebar, int tinggi, String[] data)
  {
    if (tinggi != data.length)
      tinggi = data.length;

    for (int i=0; i<x; i++)
      System.out.print(" ");

    System.out.print((char)218);
    for (int i=0; i<lebar; i++)
      System.out.print((char)196);
    System.out.println((char)191);

    for (int i=0; i<tinggi; i++)
    {
      for (int j=0; j<x; j++)
        System.out.print(" ");
      System.out.print((char)179);
      System.out.print(data[i]);
      for (int j=0; j<lebar-data[i].length(); j++)
        System.out.print(" ");
      System.out.println((char)179);
    }

    for (int i=0; i<x; i++)
      System.out.print(" ");
    System.out.print((char)192);
    for (int i=0; i<lebar; i++)
      System.out.print((char)196);
    System.out.println((char)217);
  }
}

Label:

Belajar Java 18

0 Comments Diposkan oleh Antonius Jefry di 7:44 PM

class SubProgram4
{
  //--------------
  // Fungsi UTAMA
  //--------------
  public static void main(String[] args)
  {
    bikinKotak(20,10,5);
    bikinKotak(5,40,2);
    bikinKotak(50,5,12);
  }

  //---------------------------------
  // Fungsi utk membuat persegiempat
  //---------------------------------
  static void bikinKotak(int x, int lebar, int tinggi)
  {
    for (int i=0; i<x; i++)
      System.out.print(" ");

    System.out.print((char)218);
    for (int i=0; i<lebar; i++)
      System.out.print((char)196);
    System.out.println((char)191);

    for (int i=0; i<tinggi; i++)
    {
      for (int j=0; j<x; j++)
        System.out.print(" ");
      System.out.print((char)179);
      for (int j=0; j<lebar; j++)
        System.out.print(" ");
      System.out.println((char)179);
    }

    for (int i=0; i<x; i++)
      System.out.print(" ");
    System.out.print((char)192);
    for (int i=0; i<lebar; i++)
      System.out.print((char)196);
    System.out.println((char)217);
  }
}

Label:

Belajar Java 17

0 Comments Diposkan oleh Antonius Jefry di 7:42 PM

import javax.swing.JOptionPane;

class Sort3
{
  public static void main(String[] args)
  {
    String[] nim = new String[6];
    String[] nama = new String[6];
    double[] ipk = new double[6];

    nim[0] = "10.0210";
    nim[1] = "10.0034";
    nim[2] = "09.0115";
    nim[3] = "08.0201";
    nim[4] = "09.0135";
    nim[5] = "10.0037";

    nama[0] = "Budi";
    nama[1] = "Toni";
    nama[2] = "Painem";
    nama[3] = "Panjul";
    nama[4] = "Paijo";
    nama[5] = "Marta";

    ipk[0] = 2.7;
    ipk[1] = 3.4;
    ipk[2] = 3.5;
    ipk[3] = 2.1;
    ipk[4] = 2.0;
    ipk[5] = 3.5;

    System.out.println("Sebelum sortir");
    System.out.println("--------------");
    for (int i=0; i<nim.length; i++)
      System.out.println(nim[i] + "\t" + nama[i] + "\t" + ipk[i]);

    System.out.println();

    //--- awal proses sort metode SELECTION SORT
    int n = nim.length;

    for (int kiri=0; kiri<n-1; kiri++)
    {
      for (int kanan=kiri+1; kanan<n; kanan++)
      {
        //if (nim[kiri].compareTo(nim[kanan]) > 0)      // sort by NIM
        //if (nama[kiri].compareTo(nama[kanan]) > 0)    // sort by NAMA
        if (ipk[kiri] > ipk[kanan])                     // sort by IPK
        {
          String nimBantu = nim[kiri];
          nim[kiri] = nim[kanan];
          nim[kanan] = nimBantu;

          String namaBantu = nama[kiri];
          nama[kiri] = nama[kanan];
          nama[kanan] = namaBantu;

          double ipkBantu = ipk[kiri];
          ipk[kiri] = ipk[kanan];
          ipk[kanan] = ipkBantu;
        }
      }
    }
    //--- akhir proses sort

    System.out.println("Sesudah sortir");
    System.out.println("--------------");
    for (int i=0; i<nim.length; i++)
      System.out.println(nim[i] + "\t" + nama[i] + "\t" + ipk[i]);

    System.out.println();
  }
}

Label:

Belajar Java 16

0 Comments Diposkan oleh Antonius Jefry di 7:42 PM

import javax.swing.JOptionPane;

class Sort2
{
  public static void main(String[] args)
  {
    int[] bilangan = new int[25];

    System.out.println("Sebelum sortir");
    System.out.println("--------------");
    for (int i=0; i<bilangan.length; i++)
    {
      bilangan[i] = (int)(Math.random()*75);
      if (bilangan[i] < 10) System.out.print(" ");
      System.out.print(bilangan[i] + " : ");

      for (int j=0; j<=bilangan[i]; j++)
        System.out.print((char)205);

      System.out.println();
    }
    System.out.println('\n');

    //--- awal proses sort metode SELECTION SORT
    int n = bilangan.length;

    for (int kiri=0; kiri<n-1; kiri++)
    {
      for (int kanan=kiri+1; kanan<n; kanan++)
      {
        if (bilangan[kiri] > bilangan[kanan])
        {
          int bantu = bilangan[kiri];
          bilangan[kiri] = bilangan[kanan];
          bilangan[kanan] = bantu;
        }
      }
    }
    //--- akhir proses sort

    System.out.println("Sesudah sortir");
    System.out.println("--------------");
    for (int i=0; i<bilangan.length; i++)
    {
      if (bilangan[i] < 10) System.out.print(" ");
      System.out.print(bilangan[i] + " : ");

      for (int j=0; j<=bilangan[i]; j++)
        System.out.print((char)205);

      System.out.println();
    }
    System.out.println('\n');
  }
}

Label:

Belajar Java 15

0 Comments Diposkan oleh Antonius Jefry di 7:41 PM

import javax.swing.JOptionPane;

class Sort1
{
  public static void main(String[] args)
  {
    int[] bilangan = new int[200];

    System.out.println("Sebelum sortir");
    System.out.println("--------------");
    for (int i=0; i<bilangan.length; i++)
    {
      bilangan[i] = (int)(Math.random()*100);
      if (bilangan[i] < 10) System.out.print(" ");
      System.out.print(bilangan[i] + "  ");
    }
    System.out.println('\n');

    //--- awal proses sort metode SELECTION SORT
    int n = bilangan.length;

    for (int kiri=0; kiri<n-1; kiri++)
    {
      for (int kanan=kiri+1; kanan<n; kanan++)
      {
        if (bilangan[kiri] < bilangan[kanan])
        {
          int bantu = bilangan[kiri];
          bilangan[kiri] = bilangan[kanan];
          bilangan[kanan] = bantu;
        }
      }
    }
    //--- akhir proses sort

    System.out.println("Sesudah sortir");
    System.out.println("--------------");
    for (int i=0; i<bilangan.length; i++)
    {
      if (bilangan[i] < 10) System.out.print(" ");
      System.out.print(bilangan[i] + "  ");
    }
    System.out.println('\n');
  }
}

Label:

Belajar Java 14

0 Comments Diposkan oleh Antonius Jefry di 7:41 PM

import javax.swing.JOptionPane;

class Search2
{
  public static void main(String[] args)
  {
    int[] bilangan = new int[200];

    for (int i=0; i<bilangan.length; i++)
    {
      bilangan[i] = (int)(Math.random()*100);
      if (bilangan[i] < 10) System.out.print(" ");
      System.out.print(bilangan[i] + "  ");
    }

    System.out.println();
    System.out.println();

    int kunci = Integer.parseInt(JOptionPane.showInputDialog("Masukkan sembarang bilangan:"));

    for (int i=0; i<bilangan.length; i++)
    {
      if (bilangan[i] == kunci)
      {
        System.out.println("Bilangan " + kunci + " ada di database");
      }
    }

    System.out.println();
  }
}

Label:

Belajar Java 13

0 Comments Diposkan oleh Antonius Jefry di 7:40 PM

import javax.swing.JOptionPane;

class Search1
{
  public static void main(String[] args)
  {
    String[] namaMhs = new String[10];

    namaMhs[0] = "Toni";
    namaMhs[1] = "Budi";
    namaMhs[2] = "Samsul";
    namaMhs[3] = "Bilqis";
    namaMhs[4] = "Dodi";
    namaMhs[5] = "Jupri";
    namaMhs[6] = "Ujang";
    namaMhs[7] = "Miyabi";
    namaMhs[8] = "Monica";
    namaMhs[9] = "Painem";

    String kunci = JOptionPane.showInputDialog("Masukkan sebuah nama:");

    for (int i=0; i<namaMhs.length; i++)
    {
      if (namaMhs[i].equals(kunci))
      {
        System.out.println("Nama " + kunci + " ada di database");
        break;
      }
    }

    System.out.println();
  }
}

Label:

Belajar Java 12

0 Comments Diposkan oleh Antonius Jefry di 7:40 PM

class Quis14
{
  public static void main(String[] args)
  {
    int n = Integer.parseInt(javax.swing.JOptionPane.showInputDialog("Masukkan nilai N:"));
    int baris = 0;
    int kolom = 0;

    for (baris=1; baris<=n; baris++)
    {
      for (kolom=1; kolom<=n; kolom++)
      {
        if (baris % 2 != 0)
          System.out.print("#.");
        else
          System.out.print(".#");
      }
      System.out.println();
    }
  }
}

Label:

Belajar Java 11

0 Comments Diposkan oleh Antonius Jefry di 7:38 PM

class Quis13
{
  public static void main(String[] args)
  {
    int n = Integer.parseInt(javax.swing.JOptionPane.showInputDialog("Masukkan nilai N:"));
    int baris = 0;
    int kolom = 0;
    int status = 0;

    for (baris=1; baris<=n; baris++)
    {
      for (kolom=1; kolom<=2*n; kolom++)
      {
        if (status == 0)
          System.out.print((char)219);
        else
          System.out.print(" ");

        if (kolom < 2*n)
          status = status++ % 2;
      }
      System.out.println();
    }
  }
}

Label:

Belajar Java 10

0 Comments Diposkan oleh Antonius Jefry di 7:37 PM

class Quis11
{
  public static void main(String[] args)
  {
    int n = Integer.parseInt(javax.swing.JOptionPane.showInputDialog("Masukkan nilai N:"));
    int baris = 0;
    int kolom = 0;

    for (baris=1; baris<=n; baris++)
    {
      for (kolom=1; kolom<=2*n; kolom++)
      {
        if (((baris % 2 == 0) && (kolom % 2 == 0)) ||
            ((baris % 2 != 0) && (kolom % 2 != 0)))
          System.out.print("#");
        else
          System.out.print(".");
      }
      System.out.println();
    }
  }
}

Label:

Belajar Java 9

0 Comments Diposkan oleh Antonius Jefry di 7:37 PM

class Quis2
{
  public static void main(String[] args)
  {
    int n = Integer.parseInt(javax.swing.JOptionPane.showInputDialog("Masukkan nilai N:"));
    int baris = 0;
    int kolom = 0;
    int angka = 1;

    for (baris=1; baris<=n; baris++)
    {
      for (kolom=1; kolom<=n; kolom++)
      {
        System.out.print(angka + " ");
        angka = (angka % 9) + 1;
      }
      System.out.println();
    }
  }
}

Label:

Belajar Java 8

0 Comments Diposkan oleh Antonius Jefry di 7:36 PM

class Latihan5
{
  public static void main(String[] args)
  {
    int n = Integer.parseInt(javax.swing.JOptionPane.showInputDialog("Masukkan nilai utk N:"));

    for (int i=n; i>=1; i--)
    {
      for (int j=1; j<=n-i; j++)
      {
        System.out.print(" ");
      }

      for (int j=1; j<=2*i-1; j++)
      {
        System.out.print("*");
      }

      System.out.println();
    }
  }
}

Label:

Belajar Java 7

0 Comments Diposkan oleh Antonius Jefry di 7:36 PM

class Latihan6
{
  public static void main(String[] args)
  {
    int n1 = (int)(Math.random()*50);
    int n2 = (int)(Math.random()*50);
    int n3 = (int)(Math.random()*50);
    int n4 = (int)(Math.random()*50);
    int n5 = (int)(Math.random()*50);
    int n6 = (int)(Math.random()*50);
    int n7 = (int)(Math.random()*50);
    int n8 = (int)(Math.random()*50);
    int n9 = (int)(Math.random()*50);
    int n10 = (int)(Math.random()*50);
    int n11 = (int)(Math.random()*50);
    int n12 = (int)(Math.random()*50);

    System.out.print("Jan : ");
    for (int i=1; i<=n1; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Feb : ");
    for (int i=1; i<=n2; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Mar : ");
    for (int i=1; i<=n3; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Apr : ");
    for (int i=1; i<=n4; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Mei : ");
    for (int i=1; i<=n5; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Jun : ");
    for (int i=1; i<=n6; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Jul : ");
    for (int i=1; i<=n7; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Agt : ");
    for (int i=1; i<=n8; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Sep : ");
    for (int i=1; i<=n9; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Okt : ");
    for (int i=1; i<=n10; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Nop : ");
    for (int i=1; i<=n11; i++)
      System.out.print((char)2);
    System.out.println();

    System.out.print("Des : ");
    for (int i=1; i<=n12; i++)
      System.out.print((char)2);
    System.out.println();
  }
}

Label: