Program Gaji

Jun 27, 2009 1 Comment by Sahabat

Program Gaji ;

uses wincrt;
var Nama,Nip : char ;
gaji_pokok,gaji_kotor,tunjangan,pajak,gaji_bersih :real;

begin
writeln (‘ Gaji Pegawai ‘) ;
write ( ‘ Nama : ‘ ) ; readln ( Nama ) ;
write ( ‘ Nip : ‘) ; readln (Nip) ;
write ( ‘ Gaji Pokok : ‘ ) ; readln ( gaji_pokok ) ;
write ( ‘ Tunjangan : ‘ ) ; readln ( tunjangan ) ;

writeln;

pajak := 0.1 * gaji_pokok ;
writeln ( ‘ Pajak : ‘ , pajak : 2 : 0 ) ;
gaji_kotor := gaji_pokok + tunjangan ;
writeln ( ‘ Gaji Kotor : ‘ , gaji_kotor: 2 : 0 ) ;
gaji_bersih := gaji_kotor + pajak ;
writeln ( ‘ Gaji Bersih: ‘ , gaji_bersih : 2 : 0 ) ;
readln ;
end.

Kata Kunci

program gaji pegawai pascal function procedure, pascal program gaji, program procedure untuk pajak pegawai, contoh flowchart penggajian karyawan perpustakaan, rumus membuat pajak turbo pascal.

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau

One Response to “Program Gaji”

  1. AMZAN says:

    GAN, MINTA TOLONG NIE, CONTOH PROGRAM PERPUSTAKAAN,
    BISA Y GAN…..!!

Leave a Reply

You must be logged in to post a comment.