Contoh Membuat Program penghitungan Gaji dengan menggunakan bahasa Pascal

// Contoh Membuat Program penghitungan Gaji  dengan menggunakan bahasa Pascal

program gaji_bersih;
uses wincrt;
var
g,gaji,tunjangan,pajak:real;
nm:string;

begin
gotoxy(4,3);
write('Masukan Nama : ');
readln(nm);
write('Masukan Gaji ',nm,' = ');
readln(gaji);
tunjangan:= 0.2 *gaji;
pajak:= 0.15 * (gaji + tunjangan);
g:= gaji + tunjangan - pajak;
writeln;
writeln(nm,' Gaji bersih = Rp.',g:7:2);
end.

Share This

• 
• 
• 
• 
• 
• 
• 

Subscribe Here