Pascal : Membuat Perhitungan Gaji dengan Turbo Pascal

Gaji --- Gaji merupakan bayaran yang kita terima setelah melakukan pekerjaan yang sudah terselesaikan dengan perjanjian diantara pemberi gaji dan penerima gaji sebelumnya. Gaji berhubungan erat dengan uang meskipun tidak gaji dibayar dengan uang bisa dengan benda atau sesuatu yang berharga lainnya. dunia bisnis sangat berhubungan dengan gaji dan menggaji sehingga pengaturan gaji ini sangat diperhatikan dalam dunia bisnis untuk mencapai data yang sesuai agar seseorang mendapat hasil yang sesuai dengan jerih payahnya.

Program perhitungan gaji ini masih sederhana dan merupakan dasar yang akan dikembangkan menjadi aplikasi untuk menghitung gaji seseorang dengan mengambil hitungan jam kerja atau berapa jam kerja yang telah dipakai untuk bekerja. jadi program ini cocok untuk menghitung seseorang yang bekerja dengan sistem gajian harian. Menentukan gaji yang didapat setelah bekerja dengan memperhitungkan jam kerjanya.

baca juga : Download Turbo Pascal

Berikut scriptnya menggunakan aplikasi Turbo Pascal.

Program gaji_karyawan;
Uses wincrt;

var
j:integer;{j=jam  kerja karyawan}
procedure upah(a:real);
var
uk:real;{uk=Upah Karyawan}
begin
uk:=a*3000;
writeln('Upah untuk Anda sebesar Rp. ',uk:0:0);
end;
begin
writeln('                  Program Gaji Karyawan');
writeln('========================================================');
writeln;
write('Masukkan berapa jam Anda bekerja = ');readln(j);
upah(j);
readln;
end.

Hasil Running.

Demikian contoh program sederhana menggunakan turbo pascal untuk menghitung gaji seseorang berdasarkan jam kerjanya. Semoga Bermanfaat. Wassalam

Bagikan ke:

Facebook Google+ Twitter