Scribd
Unggah
28 tayangan2 halaman

Perhitungan Gaji Pegawai FreeBASIC

Program ini menghitung gaji bersih pegawai berdasarkan nama, golongan, dan jumlah jam lembur yang diinput. Setiap golongan memiliki gaji pokok, tunjangan, dan potongan yang berbeda. Hasil perhitungan gaji bersih ditampilkan setelah proses input dan perhitungan selesai.

Diunggah oleh

akunpindo55
Hak Cipta
© All Rights Reserved
Kami menangani hak cipta konten dengan serius. Jika Anda merasa konten ini milik Anda, ajukan klaim di sini.
Format Tersedia
Unduh sebagai TXT, PDF, TXT atau baca online di Scribd
28 tayangan2 halaman

Perhitungan Gaji Pegawai FreeBASIC

Program ini menghitung gaji bersih pegawai berdasarkan nama, golongan, dan jumlah jam lembur yang diinput. Setiap golongan memiliki gaji pokok, tunjangan, dan potongan yang berbeda. Hasil perhitungan gaji bersih ditampilkan setelah proses input dan perhitungan selesai.

Diunggah oleh

akunpindo55
Hak Cipta
© All Rights Reserved
Kami menangani hak cipta konten dengan serius. Jika Anda merasa konten ini milik Anda, ajukan klaim di sini.
Format Tersedia
Unduh sebagai TXT, PDF, TXT atau baca online di Scribd

Tentu, berikut adalah program perhitungan gaji pegawai sesuai dengan cerita di atas

menggunakan bahasa FreeBASIC:

```freebasic
' Program perhitungan gaji pegawai
Dim nama As String
Dim golongan As String
Dim jumlah_jam_lembur As Single
Dim gaji_pokok As Single
Dim upah_lembur As Single
Dim tunjangan_ppn As Single
Dim potongan_ppn As Single
Dim gaji_bersih As Single

' Input
Input "Masukkan Nama: "; nama
Input "Masukkan Golongan (I/II/III/IV): "; golongan
Input "Masukkan Jumlah Jam Lembur: "; jumlah_jam_lembur

' Data Golongan


Select Case golongan
Case "I"
gaji_pokok = 1000000
upah_lembur = 20000
tunjangan_ppn = 0.5 * gaji_pokok
potongan_ppn = 0.05 * gaji_pokok
Case "II"
gaji_pokok = 850000
upah_lembur = 15000
tunjangan_ppn = 0.4 * gaji_pokok
potongan_ppn = 0.03 * gaji_pokok
Case "III"
gaji_pokok = 750000
upah_lembur = 12000
tunjangan_ppn = 0.3 * gaji_pokok
potongan_ppn = 0.02 * gaji_pokok
Case "IV"
gaji_pokok = 500000
upah_lembur = 10000
tunjangan_ppn = 0.2 * gaji_pokok
potongan_ppn = 0.01 * gaji_pokok
Case Else
Print "Golongan tidak valid"
End
End Select

' Proses perhitungan gaji


If jumlah_jam_lembur > 0 Then
upah_lembur = jumlah_jam_lembur * upah_lembur
Else
upah_lembur = 0
End If

' Hitung gaji bersih


gaji_bersih = gaji_pokok + upah_lembur + tunjangan_ppn - potongan_ppn

' Output
Print "Nama: "; nama
Print "Gaji Bersih: "; gaji_bersih
```

Program ini meminta input untuk nama, golongan, dan jumlah jam lembur. Berdasarkan
golongan yang diinput, program akan menghitung gaji bersih sesuai dengan aturan
yang telah ditetapkan. Hasilnya akan ditampilkan dalam bentuk Nama dan Gaji Bersih.
Pastikan untuk menjalankan program ini dalam lingkungan FreeBASIC di FBIDE.

Anda mungkin juga menyukai