Latihan Kode Program Pascal: Menghitung Gaji Karyawan

Latihan kode program Pascal kali ini akan membahas cara menghitung gaji mingguan karyawan berdasarkan golongan serta kondisi tambahan untuk menghitung upah lembur.

Soal ini umumnya dipakai untuk menguji pemahaman seputar konsep if else atau case of.


Soal Menghitung Gaji Karyawan

Buatlah program dalam bahasa Pascal untuk menentukan gaji karyawan mingguan dengan ketentuan sebagai berikut:

  • Golongan = A maka upah per jam 5000
  • Golongan = B maka upah per jam 7000
  • Golongan = C maka upah per jam 8000
  • Golongan = D maka upah per jam 10000

Ketentuan tambahan:

  • Jika jam kerja karyawan lebih dari 48 jam per minggu maka akan mendapat uang lembur dengan perhitungan uang lembur = (jam kerja-48)*4000.
  • Jika jam kerja kurang dari 48 jam maka pegawai tidak akan mendapat uang lembur.
  • Perhitungan gaji pegawai adalah upah + uang lembur.
  • Input berupa nama karyawan, golongan dan jam kerja.
  • Outputnya adalah nama karyawan dan gaji yang diterima.

Berikut contoh tampilan akhir yang diinginkan (1):

##  Program Pascal Menghitung Gaji Karyawan  ##
===============================================

Nama Karyawan: Lisa Lestari
Golongan: B
Jumlah jam kerja: 45

Lisa Lestari menerima upah Rp.315000 per minggu

Berikut contoh tampilan akhir yang diinginkan (2):

##  Program Pascal Menghitung Gaji Karyawan  ##
===============================================

Nama Karyawan: Agung Wijaya
Golongan: D
Jumlah jam kerja: 60

Agung Wijaya menerima upah Rp.648000 per minggu

Tips Membuat Kode Program Menghitung Gaji Karyawan

Soal ini melatih pemahaman tentang cara penggunaan variabel serta cara penggunaan kondisi if else atau switch case. Berikut tutorial pendahuluan yang bisa diikuti:

Karena golongan karyawan hanya berbentuk satu karakter, maka kita bisa menggunakan kondisi caseĀ untuk menentukan gaji harian. Setelah itu gunakan kondisi if else untuk memeriksa apakah karyawan bisa mendapat lembur atau tidak.

Silahkan anda coba sebentar untuk membuat kode program ini.


Kode Program Pascal Menghitung Gaji Karyawan

Berikut salah satu solusi dari soal menghitung gaji karyawan menggunakan bahasa pemrograman Pascal:

program gaji_karyawan;
uses crt;
var
  nama: string;
  golongan: char;
  jam_kerja, upah_per_jam: integer;
  total_upah: longint;
  
begin
  clrscr;
  writeln('##  Program Pascal Menghitung Gaji Karyawan  ##');
  writeln('===============================================');
  writeln;

  // proses input
  write('Nama Karyawan: ');
  readln(nama);
  write('Golongan: ');
  readln(golongan);
  write('Jumlah jam kerja: ');
  readln(jam_kerja);

  writeln;

  // tentukan jumlah upah per jam berdasarkan golongan
  case (golongan) of
    'A': upah_per_jam := 5000;
    'B': upah_per_jam := 7000;
    'C': upah_per_jam := 8000;
    'D': upah_per_jam := 10000;
  end;

  total_upah := jam_kerja * upah_per_jam;

  // cek apakah jam kerja lebih dari 48 jam
  if ( (jam_kerja - 48) > 0 )  then
    total_upah := total_upah + ((jam_kerja - 48)*4000);
 
  // proses output
  writeln(nama, ' menerima upah Rp.',total_upah,' per minggu');

  readln;
end.

Hasil kode program:

Latihan Kode Program Pascal - Menghitung Gaji Karyawan

Di baris 4-7 terdapat kode untuk deklarasi semua variabel yang diperlukan. Lalu proses input data ada pada baris 16-21.

Kondisi case of di baris 26-31 berguna untuk menentukan nilai variabel upah_per_jam. Alternatif lain bisa saja menggunakan kondisi if else.

Setelah di dapat upah_per_jam, kita bisa mencari total_upah di baris 33 dengan mengalikan isi variabel jam_kerja * upah_per_jam.

Dalam soal, terdapat kondisi tambahan jika jam kerja lebih dari 48, maka perlu ditambah dengan upah lembur. Inilah yang dilakukan oleh kode program di baris 36-37.

Kondisi if ( (jam_kerja – 48) > 0 ) hanya akan terpenuhi jika jam kerja lebih dari 48 jam. Jika kondisi ini menghasilkan nilai true, maka baris 45 akan diproses dan isi variabel total_upah akan di tambah dengan perhitungan total_upah + ((jam_kerja – 48)*4000).

Namun jika kondisi if ( (jam_kerja – 48) > 0 ) menghasilkan nilai false, tidak perlu perhitungan tambahan.

Terakhir, proses output di lakukan pada baris 40, yakni menampilkan kembali nama karyawan serta jumlah upah per minggu yang disimpan dalam variabel total_upah.


Demikian kode program latihan Menghitung Gaji Karyawan dalam bahasa pemrograman Pascal. Soal seperti ini cukup sering ditemukan dengan beberapa variasi jumlah gaji.


eBook Pascal Uncover Duniailkom
Apabila anda serius ingin mempelajari Pascal dan butuh materi Pascal yang jauh lebih lengkap, Duniailkom telah menerbitkan eBook Pascal Uncover yang membahas bahasa pemrograman Pascal dari dasar hingga procedure, function dan contoh kasus. Penjelasan lebih lanjut bisa ke eBook Pascal Uncover Duniailkom.

Add Comment