Ads 468x60px

wibiya widget

Labels

Rabu, 18 Januari 2012

CORETAN STACK PASCAL

USES CRT;
CONST MAX=5;
TYPE
TYPEARRAY=ARRAY[1..MAX]OF INTEGER;
TYPEINFO=INTEGER;
TYPESTACK=RECORD
ELEMEN:TYPEARRAY;
TOP:INTEGER;
END;

VAR
STACK:TYPESTACK;

PROCEDURE BUATSTACK(VAR STACK:TYPESTACK);
BEGIN
STACK.TOP:=0;
END;

FUNCTION STACKKOSONG(STACK:TYPESTACK):BOOLEAN;
BEGIN
STACKKOSONG:=(STACK.TOP=0);
END;

FUNCTION STACKPENUH(STACK:TYPESTACK):BOOLEAN;
BEGIN
STACKPENUH:=(STACK.TOP=MAX);
END;

PROCEDURE PUSH(VAR STACK:TYPESTACK; ISI:TYPEINFO);
BEGIN
IF NOT(STACKPENUH(STACK)) THEN
BEGIN
STACK.TOP:=STACK.TOP+1;
STACK.ELEMEN[STACK.TOP]:=ISI;
END
ELSE
WRITELN('STACK PENUH');
END;

PROCEDURE POP(VAR STACK:TYPESTACK; VAR INFOPOP:INTEGER);
BEGIN
IF NOT(STACKKOSONG(STACK)) THEN
BEGIN
INFOPOP:=STACK.ELEMEN[STACK.TOP];
STACK.TOP:=STACK.TOP-1;
END
ELSE
WRITELN('STACK KOSONG');
END;

PROCEDURE TAMPILSTACK;
VAR
I:INTEGER;
BEGIN
FOR I:=STACK.TOP DOWNTO 1 DO
WRITELN(STACK.ELEMEN[I]);
END;

PROCEDURE KOSONGKAN(VAR S:TYPESTACK);
BEGIN
STACK.TOP:=0;
END;
{MAIN PROGRAM}
VAR
DATA:INTEGER;
I:BYTE;
TANYA:CHAR;
BEGIN
CLRSCR;
KOSONGKAN(STACK);
BUATSTACK(STACK);
REPEAT
CLRSCR;
WRITELN;
WRITELN('  UNTUK INPUTAN KETIK MENU 1 SECARA BERULAN  ');
WRITELN;
WRITELN('                MENU PILIHAN');
WRITELN(' ============================================');
WRITELN('             [1].PUSH (MASUK)');
WRITELN('             [2].POP  (AMBIL)');
WRITELN('             [3].TAMPIL');
WRITELN('             [4].KELUAR');
WRITELN('=============================================');
WRITELN;
WRITE('             PILIHAN ANDA : ');
READLN(TANYA);
CASE TANYA OF
'1':BEGIN
CLRSCR;
WRITELN('DATA YANG DIISIKAN : ');
WRITELN('ANGKA INTEGER');
READLN(DATA);
PUSH(STACK,DATA);
END;
'2':POP(STACK,DATA);
'3':BEGIN
CLRSCR;
WRITELN;WRITELN;WRITELN;WRITELN;
WRITELN('       DATA STACK ANDA');
WRITELN('===============================');
WRITELN;WRITELN;
TAMPILSTACK;
TEXTCOLOR(RED);
GOTOXY(25,25);
WRITELN('TEKAN ENTER UNTUK KEMBALI KE MENU UTAMA');
TEXTCOLOR(WHITE);
READLN;
END;
END;
UNTIL TANYA='4';
END.

Kamis, 12 Januari 2012

CONTOH SEDERHANA MENAMPILKAN ISI DARI DATABASE

import java.sql.*;

public class tes{
public static void main (String [] args) throws Exception {
Class.forName("org.sqlite.JDBC");
Connection conn = DriverManager.getConnection("jdbc:sqlite:datairfaan.db");
Statement stat  = conn.createStatement();
    ResultSet rs = stat.executeQuery("select * from mahasiswa; ");
    System.out.println("NPM\t\tNama \t\t\t Alamat\t\tjurusan");
    while (rs.next()) {
        System.out.print(rs.getString("npm")+"\t "+rs.getString("nama")+"\t\t"+rs.getString("alamat"));
        System.out.println("\t\t"+ rs.getString("jurusan"));
    }
    rs.close();
    conn.close();
   }
}
CONTOH INPUTAN SEDERHANA KE DATABASE

import java.sql.*;
import java.io.*;


public class TUGASKU
{
    public static void main(String[]koneksi) throws Exception
    {
        String strA;
        BufferedReader buff= new BufferedReader ( new InputStreamReader(System.in));
       
        System.out.print("Nama : ");
        String a = buff.readLine();
        System.out.print("NPM  : ");
        String b = buff.readLine();
        System.out.print("alamat: ");
        String c = buff.readLine();
        System.out.print("jurusan: ");
        String d = buff.readLine();
       
        System.out.println("==============================");
        System.out.println("          mahasiswa           ");
        System.out.println("==============================");
        System.out.println("Nama    : "+a);
        System.out.println("NPM     : "+b);
        System.out.println("Kelas   : "+c);
        System.out.println("jurusan : "+d);
        System.out.println("==============================");
     
        Class.forName("org.sqlite.JDBC");
        Connection cn = DriverManager.getConnection("jdbc:sqlite:irfaan.sqlite");
        Statement st= cn.createStatement();
        st.executeUpdate("insert into mahasiswa (Nama,NPM,alamat,jurusan) values ('"+a+"','"+b+"','"+c+"','"+d+"');");
        st.close();
        cn.close();
    }
}
BUAT BINTANG

public class tugas_bintang5 {
public static void main (String[] args) {
    int baris,m;
    for (int i=1;i<=7;i++) {
        if(i<5) {
            for (int j=1;j<=4;j++) {
                if (j<=i)
                   System.out.print("*");
                   else
                   System.out.print(" ");
                }
}
    else {
        for (int j=1;j<=4;j++) {
            m=i+j;
            if (m<=8)
            System.out.print(" ");
            else
            System.out.print(" ");
        }
}
    System.out.println();
      }
    } 
}  
INPUTAN ARRAY

    import java.util.Scanner;
    class InputanArray
    {
        public static void main(String[]sf)
        {
            Scanner s=new Scanner(System.in);
           
            System.out.print("Masukkan Jumlah Array:");
            int jumlah=s.nextInt();
           
            int bilangan[]=new int[jumlah];
           
            for(int i=0;i             {
                System.out.print("Masukkan Index Array:");
                bilangan[i]=s.nextInt();
               
            }
            System.out.println("----Hasil Inputan Array----");
           
            for(int b=0;b             {
                System.out.print("\t"+bilangan[b]);
            }
           
        }
    }
 ARRAY ASCENDING DECENDING
public class ArrayAscendingDecending {

    public static void main(String args[]){
        int[]data={18,4,9,10,14,7,12,16,30,5};
        cetakConsole("Data asli dalam array:",data);
        ascending(data);
        cetakConsole("Pengurutan Ascending",data);
        decending(data);
        cetakConsole("Pengurutan Decending",data);
    }
static void ascending(int[]urut){
    int tukar=0;
    for(int a=0;a         for(int d=0;d             if(urut[a]                 tukar=urut[a];
                urut[a]=urut[d];
                urut[d]=tukar;
            }
        }
}

static void decending(int[]urut){
    int tukar=0;
    for(int a=0;a         for(int d=0;d             if(urut[a]>urut[d]){
                tukar=urut[a];
                urut[a]=urut[d];
                urut[d]=tukar;
            }
        }
}
static void cetakConsole(String jdl,int[]arr){
    System.out.println(jdl);
    for(int b=0;b         System.out.print(arr[b]+"  ");
    System.out.println();
}
}
array2D
class Array2D {
public static void main(String[] args) {
int[][] arrx; // Cara 1 Array 2 Dimensi
arrx = new int[3][3];
arrx[0][0] = 1;
arrx[0][1] = 2;
arrx[0][2] = 3;
arrx[1][0] = 4;
arrx[1][1] = 5;
arrx[1][2] = 6;
arrx[2][0] = 7;
arrx[2][1] = 8;
arrx[2][2] = 9;
System.out.println("Nilai arrx[0] : " + arrx[0][0]);
System.out.println("Nilai arrx[0] : " + arrx[0][1]);
System.out.println("Nilai arrx[0] : " + arrx[0][2]);
System.out.println("Nilai arrx[1] : " + arrx[1][0]);
System.out.println("Nilai arrx[1] : " + arrx[1][1]);
System.out.println("Nilai arrx[1] : " + arrx[1][2]);
System.out.println("Nilai arrx[2] : " + arrx[2][0]);
System.out.println("Nilai arrx[2] : " + arrx[2][1]);
System.out.println("Nilai arrx[2] : " + arrx[2][2]);
int[][] arry = {{10,20,30},{40,50,60},{70,80,90}} ; // Cara 2 Array 2
//Dimensi dgn ukuran 3 * 3 = 9
System.out.println("Nilai arry[0] : " + arry[0][0]);
System.out.println("Nilai arry[0] : " + arry[0][1]);
System.out.println("Nilai arry[0] : " + arry[0][2]);
System.out.println("Nilai arry[1] : " + arry[1][0]);
System.out.println("Nilai arry[1] : " + arry[1][1]);
System.out.println("Nilai arry[1] : " + arry[1][2]);
System.out.println("Nilai arry[2] : " + arry[2][0]);
System.out.println("Nilai arry[2] : " + arry[2][1]);
System.out.println("Nilai arry[2] : " + arry[2][2]);
}
}
array multi dimensi

class ArrayMultiD {
public static void main(String[] args) {
int[][][] arr3 = {{{10,20,30},{40,50,60}},
                  {{11,21,31},{41,51,61}},
                  {{12,22,32},{42,52,62}}}; // ukuran 3 * 6 = 18
System.out.println("Nilai arr3[0] : " + arr3[0][0][0]);
System.out.println("Nilai arr3[0] : " + arr3[0][0][1]);
System.out.println("Nilai arr3[0] : " + arr3[0][0][2]);
System.out.println("Nilai arr3[0] : " + arr3[0][1][0]);
System.out.println("Nilai arr3[0] : " + arr3[0][1][1]);
System.out.println("Nilai arr3[0] : " + arr3[0][1][2]);
System.out.println("Nilai arr3[1] : " + arr3[1][0][0]);
System.out.println("Nilai arr3[1] : " + arr3[1][0][1]);
System.out.println("Nilai arr3[1] : " + arr3[1][0][2]);
System.out.println("Nilai arr3[1] : " + arr3[1][1][0]);
System.out.println("Nilai arr3[1] : " + arr3[1][1][1]);
System.out.println("Nilai arr3[1] : " + arr3[1][1][2]);
System.out.println("Nilai arr3[2] : " + arr3[2][0][0]);
System.out.println("Nilai arr3[2] : " + arr3[2][0][1]);
System.out.println("Nilai arr3[2] : " + arr3[2][0][2]);
System.out.println("Nilai arr3[2] : " + arr3[2][1][0]);
System.out.println("Nilai arr3[2] : " + arr3[2][1][1]);
System.out.println("Nilai arr3[2] : " + arr3[2][1][2]);
}
}
array

public class SingleArray {
public static void main(String[] args) {
int [] x; // Cara 1
x = new int[3];
x[0] = 20 ;
x[1] = 10 ;
x[2] = 30;
System.out.println("Nilai x[0] : " + x[0]);
System.out.println("Nilai x[1] : " + x[1]);
System.out.println("Nilai x[2] : " + x[2]);
String [] y = new String[3]; // Cara 2
y[0] = "Joko budi bagus" ;
y[1] = "Budi" ;
y[2] = "Iwan";
System.out.println("Nilai y[0] : " + y[0]);
System.out.println("Nilai y[1] : " + y[1]);
System.out.println("Nilai y[2] : " + y[2]);
char[] z = {'a','b','c'}; // Cara 3 tdk menggunakan new
System.out.println("Nilai z[0] : " + z[0]);
System.out.println("Nilai z[1] : " + z[1]);
System.out.println("Nilai z[2] : " + z[2]);
}
}
whiledo

class WhileDo{
    public static void main(String [] args){
        int a = 5;
 
        do{
            System.out.println(a);
           //a=a+1;
            //System.out.println(a);
        }
        while (a<5);
       
       
    }
}
do while

class DoWhile1{
    public static void main(String [] args){
        int a = 1;
 
        do{
            System.out.println(a);
            a=a+1;
            //System.out.println(a);
        }
        while (a<20);
       
       
    }
}
IF

public class IF{
public static void main(String args[]){
double grade=60;
if(grade>=90){
System.out.println("Sangat bagus");
}
else if(grade>=70){
System.out.println("bagus");
}
else if(grade>=50){
System.out.println("Cukup");
}
else{
System.out.println("Sedang");
}
}
}
aritmatika

public class aritmatikaDemo
{
public static void main(String[] args)
{
//sedikit angka
int i = 37;
int j = 42;
double x = 27.475;
double y = 7.22;
System.out.println("Variable values...");
System.out.println(" i = " + i);
System.out.println(" j = " + j);
System.out.println(" x = " + x);
System.out.println(" y = " + y); //penjumlahan angka
System.out.println("Adding...");
System.out.println(" i + j = " + (i + j));
System.out.println(" x + y = " + (x + y));
//pengurangan angka
System.out.println("Subtracting...");
System.out.println(" i - j = " + (i - j));
System.out.println(" x - y = " + (x - y));
//perkalian angka
System.out.println("Multiplying...");
System.out.println(" i * j = " + (i * j));
System.out.println(" x * y = " + (x * y));
//pembagian angka
System.out.println("Dividing...");
System.out.println(" i / j = " + (i / j));
System.out.println(" x / y = " + (x / y));
//menghitung hasil modulus dari pembagian
System.out.println("Computing the remainder...");
System.out.println(" i % j = " + (i % j));
System.out.println(" x % y = " + (x % y));
//tipe penggabungan
System.out.println("Mixing tipes...");
System.out.println(" j + y = " + (j + y));
System.out.println(" i * x = " + (i * x));
}
}
luas bangun

import java.util.Scanner;
class luasbangun
{
public static void main (String []args)
{
Scanner s = new Scanner (System.in);
float luas,panjang,lebar, tinggi;
System.out.print ("Masukkan Panjang ? ");
panjang = s.nextFloat();
System.out.print ("Masukkan Lebar ? ");
lebar = s.nextFloat();
luas = panjang * lebar ;
System.out.println (" Luas Persegi Panjang Adalah " + luas);
}
}
menghitung lingkaran

import java.util.Scanner;
class luas_lingkaran
{
    public static void main (String[]xxx)
    {
        Scanner x = new Scanner(System.in);
        double r,luas;

        System.out.print("masukkan nilai jari-jari: ");
        r=x.nextDouble();
        luas=r*r*3.14;
        System.out.println ("Luas Lingkaran adalah = "+luas);
    }
}
MENGHITUNG LUAS SEGITIGA

import java.util.Scanner;
class luas_segitiga {
public static void main (String [] args)
{
Scanner masukan = new Scanner(System.in);

Double luas,a,t;

System.out.print("Masukan alas : ");
a = masukan.nextDouble();
System.out.print("Masukan tinggi : ");
t = masukan.nextDouble();

luas = 0.5*a*t;

System.out.printf("Jadi luas = %f \t",luas);
System.out.println("Jadi luas = "+luas);
}
}
import java.util.Scanner;
class luas_segitiga {
public static void main (String [] args)
{
Scanner masukan = new Scanner(System.in);

Double luas,a,t;

System.out.print("Masukan alas : ");
a = masukan.nextDouble();
System.out.print("Masukan tinggi : ");
t = masukan.nextDouble();

luas = 0.5*a*t;

System.out.printf("Jadi luas = %f \t",luas);
System.out.println("Jadi luas = "+luas);
}
}
sample SC.

import java.util.Scanner;
public class dalamdalam
{public static void main (String [] args)
{Scanner p=new Scanner (System.in);
System.out.println ("menu");
System.out.println ("1. makanan");
System.out.println ("2. Minuman");
System.out.println ("Apa pilihan anda ?");
int menu = p.nextInt ();
switch (menu)
{case 1 : System.out.println ("anda pilih makanan");
          System.out.println ("1. Bakso");
          System.out.println ("2. mie ayam");
          System.out.println ("Apa pilihan anda?");
          int pilih =p.nextInt ();

switch (pilih)
{case 1 : System.out.println ("anda memilih bakso"); break;
case 2  : System.out.println ("anda memilih ayam"); break;
default : System.out.println ("makanan belum tersedia");
}
break; //break case utama
case 2 : System.out.println ("apa pilihan minuman");
         System.out.println ("1. Air Putih");
         System.out.println ("2. teh hangat");
         int pilih2 =p.nextInt ();
        
switch (pilih2)
{
case 1 : System.out.println ("anda memilih air putih"); break;
case 2 : System.out.println ("anda memilih teh hangat"); break;
case 3 : System.out.println ("minuman belum tersedia"); break;
}
break;
default : System.out.println ("tidak ada pilihan menu");
}
}
}

Rabu, 11 Januari 2012

Pengertian SQLite

SQLite merupakan sebuah sistem manajemen basisdata relasional yang bersifat ACID-compliant dan memiliki ukuran pustaka kode yang relatif kecil, ditulis dalam bahasa C. SQLite merupakan proyek yang bersifat public domain yang dikerjakan oleh D. Richard Hipp.

Tidak seperti pada paradigma client-server umumnya, Inti SQLite bukanlah sebuah sistem yang mandiri yang berkomunikasi dengan sebuah program, melainkan sebagai bagian integral dari sebuah program secara keseluruhan. Sehingga protokol komunikasi utama yang digunakan adalah melalui pemanggilan API secara langsung melalui bahasa pemrograman. Mekanisme seperti ini tentunya membawa keuntungan karena dapat mereduksi overhead, latency times, dan secara keseluruhan lebih sederhana. Seluruh elemen basisdata (definisi data, tabel, indeks, dan data) disimpan sebagai sebuah file. Kesederhanaan dari sisi disain tersebut bisa diraih dengan cara mengunci keseluruhan file basis data pada saat sebuah transaksi dimulai.

Fitur-fitur

Pustaka SQLite mengimplementasikan hampir seluruh elemen-elemen standar yang berlaku pada SQL-92, termasuk transaksi yang bersifat atomic, konsistensi basisdata, isolasi, dan durabilitas (dalam bahasa inggris lebih sering disebut ACID), trigger, dan kueri-kueri yang kompleks. Tidak ada pengecekan tipe sehingga data bisa dientrikan dalam bentuk string untuk sebuah kolom bertipe integer. Beberapa kalangan melihat hal ini sebagai sebuah inovasi yang menambah nilai guna dari sebuah basisdata, utamanya ketika digunakan dalam bahasa pemrograman berbasis script (PHP, Perl), sementara kalangan lain melihat hal tersebut sebagai sebuah kekurangan.

Beberapa proses ataupun thread dapat berjalan secara bersamaan dan mengakses basisdata yang sama tanpa mengalami masalah. Hal ini disebabkan karena akes baca data dilakukan secara paralel. Sementara itu akses tulis data hanya bisa dilakukan jika tidak ada proses tulis lain yang sedang dilakukan; jika tidak, proses tulis tersebut akan gagal dan mengembalikan kode kesalahan (atau bisa juga secara otomatis akan mencobanya kembali sampai sejumlah nilai waktu yang ditentukan habis). Hanya saja ketika sebuah tabel temporer dibuat, mekanisme penguncian pada proses multithread akan menyebabkan masalah. Update yang terkini (versi 3.3.4) dikatakan telah memperbaiki masalah ini.

Sebuah program yang mandiri dinamakan sqlite disediakan dan bisa digunakan untuk mengeksekusi kueri dan memanajemen file-file basisdata SQLite. Program tersebut juga merupakan contoh implementasi penulisan aplikasi yang menggunakan pustaka SQLite.

Integrasi dengan bahasa lain

SQLite termasuk dalam framework REALbasic, yang memungkinkan aplikasi yang dikembangkan dengan menggunakan REALbasic dapat memanfaatkan basisdata SQLite.

Pustaka SQLite bisa digunakan secara langsung pada bahasa C/C++, namun untuk Tcl dan beberapa bahasa pemrograman berbasis script juga tersedia.

Modul DBI/DBD untuk Perl juga tersedia pada CPAN, DBD:SQLite, namun modul ini bukanlah antarmuka dengan SQLite melainkan memasukkan SQLite secara keseluruhan dalam modul tersebut.

Modul Python juga tersedia (PySQLite) yang diimplementasikan pada DB API Python versi 2.0 (PEP 249)

PHP dimulai dengan PHP5 telah memasukkan SQLite, versi PHP4 sebelumnya bisa juga digunakan untuk mengakses SQLite, namun modul SQLite tidak dimasukan secara standar bawaan.

Dimulai Lazarus versi 0.9.8 dan Free Pascal 2.0.0, SQLite didukung untuk digunakan oleh para programmer. Tutorial tersebut bisa didapatkan disini.

Meskipun borland tidak mempaketkan SQLite secara standar bawaan, Delphi sudah mendukung SQLite juga menggunakan pustaka yang dibuat oleh pihak ketiga (Aducom dan Zeos). Banyak program administrasi basisdata SQLite baik komersil ataupun bebas yang menawarkan kemudahan-kemudahan dalam memanajemen basisdata SQLite terdapat di internet dibuat dengan menggunakan bahasa ini.

SQLite juga termasuk dalam paket yang dibundle secara standar bawaan pada Mac OS X, dan digunakan sebagai salah satu pilihan mekanisme penyimpanan data pada API Apple.

selesai.

Selasa, 10 Januari 2012

tutorial sqlite lagi


tutorial sqlite,