Rabu, 04 Desember 2013



Program Menghitung Gaji Karyawan Menggunakan IF
program hitung_gaji;
Uses wincrt;
Var nama:string[20];jabatan:string;
Gaji:longint;
Tunj,ppn,Total,gajibersih:real;
Begin
Clrscr;
Write( 'Nama Karyawan     : '); readln(nama);
Write('Masukkan Jabatan  : '); readln(jabatan);
If  (jabatan='Direktur') or (jabatan='direktur') then
     Begin
 Gaji:=4000000;
 Tunj:=0.1* gaji;
     End
Else If  (jabatan='Manager') or (jabatan='manager') then
     Begin
 Gaji:=3000000;
 Tunj:=0.01* gaji;
     End
Else If  (jabatan='Supervisor') or (jabatan='supervisor') then
     Begin
 Gaji:=2000000;
 Tunj:=0.1* gaji;
     End
Else If  (jabatan='Karyawan') or (jabatan='karyawan') then
     Begin
 Gaji:=1000000;
 Tunj:=0.1* gaji;
     End
Else
     Begin
 Gaji:=800000;
 Tunj:=0.1* gaji;
     End;
Writeln('Gaji Bersih        : Rp.',gaji);
Writeln('Tunjangan Jabatan  : Rp.',tunj:9:2);
Ppn:=0.2*gaji;
Writeln('PPN 10 %           : Rp.',ppn:9:2);
Total:=gaji+total;
Writeln('Total Gaji         : Rp.',total:9:2);
Readln;
End.


Hasil Program Menghitung Gaji Karyawan Menggunakan IF
 

FLOWCHART HITUNG GAJI KARYAWAN
 

Minggu, 01 Desember 2013

cara buat tabel pada html

Cara Membuat Tabel

<HTML>
<HEAD>
<TITLE>MEMBUAT TABEL</TITLE>
</HEAD>
<BODY BGCOLOR="violet">TABEL BARANG<BR></BR>
<TABLE BORDER="4" WIDTH="400" CELLPADDING="8">
<TR>
    <TD COLSPAN = "2" BGCOLOR="green">JENIS BARANG </TD>
    <TD BGCOLOR="green">HARGA</TD>
    <TD ROWSPAN = "4"><MARQUEE><IMG SRC="Untitled-11.JPG" WIDTH="300"></MARQUEE></TD>
</TR>
<TR>
    <TD>1.</TD>
    <TD>tas</TD>
    <TD>25000</TD>
</TR>
<TR>
    <TD>2.</TD>
    <TD>sepatu</TD>
    <TD>50000</TD>

</TR>
<TR>
    <TD>3.</TD>
    <TD>jeans</TD>
    <TD>100000</TD>
</TR>
</TABLE>
</BODY>
</HTML>

hasil layout :












latihan soal stuktur data




SOAL LATIHAN STRUKTUR DATA :

1. Struktur pertama dalam pascal adalah
a. Char;
b. String
c. End.
d. Writeln
e. Uses crt;

Alasan : Karena tanpa Uses Crt; program sebagus apapun tidak akan bisa jalan


2. Untuk melihat hasil dari program yang dikerjakan tekan tombol
a. Crtl+f5
b. Ctrl+f9
c. Ctrl+f2
d. Ctrl+f12
e. Ctrl+f4

Alasan : Karna di aplikasi pascal perintah keyword untuk menampilkan hasil yaitu dengan menekan  CTRL + F9

3. Berapa kode yang digunakan untuk membuat tulisan berwarna “CYAN”
a. 4
b. 2
c. 128
d. 7
e. 3

Alasan : -karena dalam kode warna” CYAN “ berada  di urutan  nomor 3

4. Perintah dasar sederhana dalam program pascal adalah
a. Readln
b. End
c. Write
d. Writeln
e. Uses crt;

Alasan : - karna di pascal sintak yang paling sederhana adalah Write

5. Tipe data bahasa pascal untuk TRUE FALSE adalah
a. String
b. Char
c. Boolean
d. Byte
e. Real

Alasan : Karena boolean adalah tipedata yang memiliki nilai 1 (TRUE) dan 0 (FALSE).

6. Siapakah penemu pascal
a. Greyson change
b. Prof. Niklaus Wirth
c. Kondrazuse
d. Prof. Niklaus Smirth
e. Dr. Hercules

Alasan : Karena Prof. Niklaus Wirth.adalah penemu program pascal.

7. Struktur bahasa pemrograman pascala paling pertama adalah
a. Var;
b. Begin
c. End;
d. Uses crt;
e. Writeln;

Alasan : Karena tanpa uses crt program tidak akan bisa d compile dan otomatis tidak akan bisa d jalankan.

8. Tipe data pascal untuk karakter adalah
a. Char
b. Boolean
c. Integer
d. Real
e. Byte

Alasan : Karena tipe data integer untuk bilangan bulat, boolean untuk jawaban benar/salah, real untuk bilangan decimal.

9. Kapan terbentuknya pascal
a. 1981
b. 1971
c. 1961
d. 1991
e. 1987

Alasan :  karena pada tahun 1971 ini pascal mulai terbentuk dan dipublikasikan.

10. Apakah kepanjangan dari USES
a. Unit secure
b. Unit syntax
c. Unit system
d. Up software
e. Unit semiconductor

Alasan : karena USES singkatan dari Unit System .

11. Berikut ini adalah penulisan identifier yang benar dalam pemrogramnan pascal adalah
a. 9program_satu
b. Program_satu
c. Program satu
d. Begin
e. Array

Alasan : Karena jawaban c adalah jawaban paling tepat.

12. Tipe bilangan bulat dalam bahasa pascal dikenal dengan
a. Byte
b. Integer
c. Char
d. String
e. Boolean

Alasan : karena tipe data untuk bilangan bulat yang paling tepat adalah integer.

13. Istilah “perulangan” dalam pemrograman pascal dikenal sebagai
a. Repeating
b. Again
c. Function
d. Replay
e. Looping

Alasan : Karena pengertian Looping itu sendiri adalah suatu kegiatan mengulangi statment sampai batas yang d inginkan.

 14. Perintah untuk menutup program pada Pascal adalah
a. END.
b. Program
c. Uses crt;
d. Finish
e. END;

Alasan : Karena END. adalah kode untuk mengakhiri listing program secara keseluruhan.

15. Menggambarkan program secara logika merupakan fungsi dari
a. flowchart
b. DxDiag
c. Begin
d. SI
e. Sistem Operasi

Alasan : Karena flowchart dapat menyelesaikan masalah selangkah demi selangkah yang ada pada proses atau algoritma tersebut.

16. Deklarasi yang digunakan untuk mengidentifikasi data yang nilainya sudah ditentukan dan pasti, tidak dirubah dalam program disebut deklarasi
a. Deklarasi label
b. Deklarasi Konstanta
c. Deklarasi tipe
d. Deklarasi Variabel
e. Deklarasi Prosedur

Alasan : Karena konstanta digunakan untuk mendeklarasikan suatu identifier yang nilainya tetap.

17. Dibawah ini termasuk dalam Deklarasi dalam Pascal kecuali
a. Deklarasi perubah
b. Deklarasi proses
c. Deklarasi konstanta
d. Deklarasi tipe
e. Deklarasi prosedure

Alasan : -karna didalam macam-macam deklarasi hanya deklarasi prosses yang bukan termasuk kedalam bagian deklarasi sedangkan deklarasi Peubah, deklarasi Konstan,deklarasi tipe dan deklarasi prosedur termasuk kedalam bagian deklarasi dalam pascal .

18. Bilangan yang mengandung pecahan, paling sedikit harus ada satu digit sebelum dan sesudah titik desimal termasuk dalam tipe data
a. Real
b. Boolean
c. Integer
d. Longint
e. Byte

Alasan : Karena real adalah tipe data untuk bilangan decimal.

19. Prosedur yang digunakan untuk membersihkan layar saat program dijalankan adalah
a. Writeln
b. Readln
c. Begin
d. Write
e. Clrscr

Alasan : Karena Clrscr adalah kepanjangan dari Clear Screen.

20. Bentuk dari suatu statement IF berada didalam lingkungan statement IF yang lainnya, disebut IF dalam kondisi
a. IF bersarang
b. IF bercabang
c. IF tunggal
d. IF-THEN
e. IF do while-until

Alasan : Karena IF Bersarang adalah If yang berada di dalam If .

21. Tipe data terstruktur yang terdiri dari sejumlah komponen-komponen yang mempunyai tipe sama, disebut tipe data
a. Array
b. Byte
c. Longint
d. Integer
e. Boolean

Alasan : Karena array adalah sebuah struktur data yang terdiri atas banyak variabel dengan tipe data yang sama.

22. Perintah untuk menampilkan atau cetak dilayar monitor tanpa pindah baris, disebut
a. Writeln
b. Write
c. Readln
d. Read
e. Begin

Alasan : Karena write adalah perintah untuk menampilkan output tanpa memindahkan baris ke baris baru.

23. Perintah untuk menampilkan atau cetak dilayar monitor lalu pindah baris kebawah, disebut
a. Writeln
b. Write
c. Readln
d. Read
e. Begin

Alasan : Karena writeln adalah perintah untuk menampilkan output dengan memindahkan baris ke baris baru.

24. Suatu identifier non-standar yang nilainya tidak tetap atau nilainya merupakan hasil dari suatu proses, disebut
a. Variabel
b. Tipe Data
c. Prosedur
d. Deklarasi
e. Array

Alasan : Karena variabel adalah sesuatu yang mewakili elemen data yang memiliki nilai yang tidak tetap.

25. Suatu program terpisah dalam blok sendiri yang berfungsi sebagai subprogram (bagian program), disebut
a. Variabel
b. Tipe Data
c. Prosedur
d. Deklarasi
e. Array

alasan :  karna Prosedur adalah suatu program terpisah dalam blok tersendiri yang berfungsi sebagai sub program (program bagian