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 PascalBerikut scriptnya menggunakan aplikasi Turbo Pascal.
Program gaji_karyawan;
Uses wincrt;
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.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.
Demikian contoh program sederhana menggunakan turbo pascal untuk menghitung gaji seseorang berdasarkan jam kerjanya. Semoga Bermanfaat. Wassalam
- Pemrograman Pascal : Contoh Coding Pemrograman Dasar Pascal Perulangan While Do
- Pascal : Cara membuat Program Generator Tulisan Terbalik
- Aplikasi Free Pascal Download Gratis disertai Cara Download dan Cara Instal Lengkap
- Program Pascal : Cara Membuat Program Mencari Nilai Luas Trapesium
- Program Pascal : Contoh penggunaan PROCEDURE dan perulangan IF ELSE membuat piramid Bilangan
- Program Pascal : Contoh program pascal menggunakan Array
- Mempelajari Array Penyimpanan data dalam Pemrograman dunia IT
- Program Pascal : Membuat program untuk menghitung Nilai berpangkat dengan Procedure
- Pascal : Contoh Program menggunakan Perulangan For To Do, DIV dan MOD
- Program Pascal : Kalkulator Mencari Nilai rata-rata contoh kode Procedure dan Array
- Pascal : Menentukan Tahun Kabisat yang mengirimkan sebuah Boolean dengan Function
- Pemrograman Pascal : Mengenal Nilai Genap dengan Array
- Pascal : Membuat Perhitungan Gaji dengan Turbo Pascal
- Pemrograman Pascal : Contoh Array 1 dimensi
- Pascal : Menghitung nilai Jajar Genjang dengan Turbo Pascal For Windows (TPW 1.5)
- Pascal : Penggunaan script Repeat Until dan Case Break
- Pascal : Membuat Program Menghitung detik menggunakan DIV MOD
- Pascal : Program Konversi Suhu menggunakan Case
- Mempelajari Algoritma Pemrograman Berorientasi Objek dikenal OOP
- Web : Cara mengatur Paragraf html code menjadi lebih teratur
No comments:
Post a Comment
Silahkan isi komentar, jika ada yang ingin ditanyakan...