This is default featured slide 1 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 2 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 3 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 4 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

This is default featured slide 5 title

Go to Blogger edit html and find these sentences.Now replace these sentences with your own descriptions.This theme is Bloggerized by Lasantha Bandara - Premiumbloggertemplates.com.

Aksesories ornamen batik

Belajar Batik ..AYOK.....>>! Aplikasi : 1. Toolbar object builder ( Kotak, lingkaran, persegi 5 ) 2. Shaping ( Intersect, Weld, Trim ) 3. align distribute, flip / mirror ( toolbar ) 4. Operasi object ( copy, paste ) 5. transformasi mouse ( klik, double klik )
Share:

entri data

************ membuat form pengisian
Share:

design batik

Share:

SQL Language

<<<<<<<<<<<< PERINTAH SQL ***** Membuat Table baru *********** CREATE TABEL [nama table] ( fields1 jenis(ukuran),fields1 jenis(ukuran)... ); contoh : CREATE TABLE siswa(NIS text(5),Nama text(10),kelas text(3)); ***** menambah rekord baru ********** INSERT INTO [nama table] (fields1,fields2,fields3) VALUES (nilai1,nilai2,nilai3); contoh : INSERT INTO siswa (NIS,nama,kelas) VALUES ("7872","Binar Mutia","X"); ***** mengubah rekord ********** UPDATE [nama table] SET [fields]=[nilai pengganti] WHERE fields_syrat=nilai_syrat; ****** menghapus rekord ********* DELETE FROM [nama table] WHERE fields_syrat=nilai_syrat;
Share:

Soal Pascal

2 :Percabangan / IF If adalah suatu perintah yang digunakan untuk melakukan pemilihan suatu jawaban berdasarkan suatu pengujian. pengujian ini berbentuk comparation/perbandingan yang akan menghasilkan jawaban berbentuk LOGIKA yaitu YES / NO ataupun true / False. program tamu_losmen; uses crt; var nama,tanggal,jenis,kelas : string[20]; kode:string[1]; kdkls,lama : integer; biaya,bayar: longint; begin clrscr; writeln('daftar tamu losmen'); writeln('ADEM AYEM'); writeln('Jl. patimura No. 7223 Wiradesa'); writeln('=============================='); writeln(' '); write('tanggal :'); readln(tanggal); write('nama tamu :'); readln(nama); write('kode kamar :'); readln(kode); IF (kode='s') or (kode='S') then jenis:='Single' else jenis:='Double'; writeln('jenis kamar :',jenis); write('Kode Kelas :'); readln(kdkls); IF KDKLS=1 then begin kelas:='Top room';biaya:=50000; end else IF kdkls=2 then begin kelas:='President';biaya:=65000; end else IF kdkls=3 then begin kelas:='Suite';biaya:=50000; end else begin kelas:='data salah';biaya:=0; end; writeln('Kelas kamar :',kelas); writeln('biaya permalam : Rp.',biaya); write('lama inap : ');readln(lama); bayar:=biaya*lama; writeln('jumlah bayar : Rp.',bayar); readln(); end.
Share:
Share:

Support