Contoh program gaji pegawai sederhana dengan pascal

uses crt;
var n,s:string;
ja,g:byte;
ta,ts,gp,tg,gb:real;

begin
     clrscr;
     write('| Nama                   : ');readln(n);
     write('| Golongan               : ');readln(g);
     case g of
          1:begin
                 gp:=1000000;
            end;
          2:begin
                 gp:=1500000;
            end;
          3:begin
                 gp:=2000000;
            end;
          4:begin
                 gp:=2500000;
            end;
          5:begin
                 gp:=3000000;
            end;
     end;
     write('| Status                 : ');readln(s);
         if(s='belum menikah')then
         ts:=0
     else
         if(s='menikah')then
         ts:=gp*0.2
     else
         if(s='janda')or(s='duda') then begin
         ts:=gp*0.2;
end;
write('| Jumlah Anak            : ');readln(ja);
 if(ja=1) and (s='menikah') or (s='janda') or (s='duda')then
 ta:=gp*0.2
 else if(ja=2) and (s='menikah') or (s='janda') or (s='duda')then
 ta:=gp*0.6
 else if(ja=3) and (s='menikah') or (s='janda') or (s='duda')then
 ta:=gp*0.8
 else if(ja>3) and (s='menikah') or (s='janda') or (s='duda')then
 ta:=gp*0.1
 else if(ja=0)then begin
 ta:=0;
 end;
write('++++++++++++++>ENTER TO AMOUNT<++++++++++++++');
tg:=gp+ts+ta;
if (tg>5000000)then
gb:=tg-500000
else gb:=tg-0;
readln;
writeln('Gaji Pokok             : ','Rp.',gp:0:0);
writeln('Tunjangan status       : ','Rp.',ts:0:0);
writeln('Tunjangan anak         : ','Rp.',ta:0:0);
writeln('Gaji bersih            : ','Rp.',gb:0:0);
readln;
end.

welcome

Dengan Ganti Themes/Tampilan Mozilla Firefox dengan gaya dan warna kesukaan tentu membuat anda tidak akan bosan menggunakan Mozilla Firefox, karena kita ketahui Browser Mozilla Firefox adalah browser yang terkenal dan terbesar, dan mozilla adalah browser yang teringan, dengan mengganti tema / theme Mozilla Firefox mudah-mudahan anda makin rajin Blogging, Chat, Browsing, Main game, Email, Download di Browser Mozilla Firefox.

Kalau anda hobi Blogging tentu sangat santai dengan tampilan mozilla yang baru, dan apabila anda punya blog yang ingin dirampingkan silahkan klik Cara Menambahkan Fitur Scroll di Widget Blog

CARA MENGGANTI THEME ATAU TEMA BROWSER MOZILLA FIREFOX

1. Buka browser Mozilla Firefox anda

2. Silahkan klik link di bawah ini

https://addons.mozilla.org/en-US/firefox/themes/

3. Pilih tema/themes yang anda sukai, Setelah memilih tema yang nda Sukai - Klik Gambar tema yang anda sukai.

4. Pilih Add to Firefox / Download → Lalu klik Allow → klik Install Now → tungu beberapa saat sampai instali themes selesai → lalu klik Restart Now

5. Finish → Mozilla Firefox anda berganti tampilan baru.

Tambahan : Anda dapat download Tema / Theme Mozilla Firefox sebanyak mungkin.
Untuk mengganti-ganti tema/Theme Mozilla Firefox Ikuti Langkah Berikut :

1. Buka browser Mozilla Firefox anda seperti biasa.

2. Klik pada Tab Menu Mozilla " Tools ".

3. Klik pada Pilihan " Add Ons ".

4. Klik Tab " Themes ".
(Bila anda sudah banyak download theme mozilla, akan tampil disana, Silahkan Sekali Klik gambar Theme/Tema yang anda ingin gunakan)

5. Setelah Memilih tadi, Lalu Klik " Use Theme ", setelah itu Restart Mozilla Firefox anda.

Selamat Mencoba Cuy