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, free pascal menghitung gaji karyawan dengan procedure dan function, Cara membuat program pascal proceduru dan function untuk slip gaji, program procedure dan function slip gaji, pascal pendapatan gaji bersih, Menghitung slip gaji dengan free pascal procedure, menghitung slip gaji dengan free pascal pricedure dan function, contoh free pascal proceduru dan functiom pada slip haji, codingan free pascal gaji karyawan.

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.