SOAL UH PASCAL

Suatu perusahaan besar yang bernama Perusahaan Arpellow-gaz, ingin mendata Total Gaji Karyawannya.


Input :


Suatu input yang terdiri dari :
Nomor Pegawai, 
Nama Pegawai, 
Jabatan,

Untuk Jabatan berkode 

1 =  Direktur. 

2 =  Wakil direktur. 

3 =  Kepala Bagian,

4 =  Kepala Seksi

5 =  Staf, yang terbagi menjadi golongan A,B,C, dan D. 
Golongan, dan
Gaji Pokok.


Kondisi :

• Jika terdapat kondisi jabatan yang berisi kode 1,2 dan 3 maka mendapat Bonus dari pekerjaannya sebesar 25% Gaji Pokok.
• Jika jabatan tersebut berisi kode 4, maka mendapat Bonus dari pekerjaannya sebesar 100% dari Gaji Pokok.
• Jika jabatan tersebut berisi kode 5, maka Bonus dihitung bedasarkan Golongan.
• Jika Golongan A dan B, maka bonus mendapat 85% dari Gaji Pokok.
• Jika Golongan C dan D, maka mendapat 

Output :

• Dengan memasukkan kode Jabatan, kita akan mengetahui Jabatan tersebut, beserta Gaji Total yang di dapat dari Gaji Pokok + Bonus.
• Khusus jabatan yang berkode 5, maka dengan memasukkan Golongan yang telah anda sediakan, kita akan mengetahui  Gaji Total yang di dapat dari Gaji Pokok + Bonus.
• Gambar : 

Untuk lebih jelas, klik pada gambar

J
Soal:
Buatlah program tersebut dalam Turbo Pascal 7.0 !