Friday, May 25, 2012
Program Menghitung Diskon 2 (Bahasa Pascal)
Buatlah program untuk menghitung diskon dengan ketentuan: jika membeli tidak kurang dari 5 buah, maka akan mendapat diskon 12,5% dari harga total.
uses crt;
{I.S.: user memasukkan kode barang (kb), nama barang (nb), harga satuan (hs)
dan jumlah yang dibeli (jml)}
{F.S.: menanmpilkan kode barang (kb), nama barang (nb), harga satuan (hs),
jumlah yang dibeli (jml), diskon dan total bayar (tb)}
Tampilkan ke layar kode barang, nama barang, harga satuan, jumlah yang dibeli, diskon dan total bayar.
program Menghitung_Diskon;uses crt;
{I.S.: user memasukkan kode barang (kb), nama barang (nb), harga satuan (hs)
dan jumlah yang dibeli (jml)}
{F.S.: menanmpilkan kode barang (kb), nama barang (nb), harga satuan (hs),
jumlah yang dibeli (jml), diskon dan total bayar (tb)}
Sunday, May 20, 2012
Upload File di Group
Fitur baru di Facebook adalah fasilitas Upload File di Group. Fasilitas ini di-launching sekitar pertengahan bulan Mei 2012, setelah penambahan fitur seperti Facebook Timeline, Header image di Group Facebook. Makin cinta deh, sama Facebook <3. Berikut screen shootnya.