SERIBUPOST, Hallo sobat SP bagaimana kabarnya? Semoga dalam keadaan baik ya. Pada artikel kali ini saya akan memberikan script program untuk menampilkan gaji bersih seorang pns, adapun program yang akan saya tulis adalah program Bahasa Pascal, saya yakin anda sudah tau apa itu Bahasa Pascal, jika belum mengetahuinya anda bisa mencari tau di situs lain hehe. Untuk lebih jelasnya saya tuliskan contoh soalnya dibawah ini.

SOAL : Buatlah program untuk menampilkan gajih bersih seorang pns dengan ketentuan sebagai berikut

Golongan 1 Gajih Pokok Rp. 3.000.000 Tunjangan Rp. 7.000.000
Golongan 2 Gajih Pokok Rp. 2.500.000 Tunjangan Rp. 6.000.000
Golongan 3 Gajih Pokok Rp. 2.000.000 Tunjangan Rp. 6.000.000

*Tunjangan isteri jika sudah menikah sebesar Rp. 500.000,- , dan jika memiliki anak maka setiap anak mendapat tunjangan sebesar Rp. 250.000,-
Jawab:
Dalam penulisan scriptnya saya menggunakan deklarasi konstanta, karena disana sudah ditentukan nilainya (sudah pasti). Berdasarkan soalnya kita hanya diminta menampilkan sajah, sehingga tidak ada sebuah proses. Langsung sajah kepada scriptnya :

PASCAL
uses crt;
const
g1=3000000;
t1=700000;
g2=2500000;
t2=600000;
g3=2000000;
t3=500000;
t_isteri=500000;
t_anak=250000;
begin
clrscr;

writeln(‘Gajih Bersih Seorang PNS’)
writeln(‘*******************’)
writeln(‘* Gaji Pokok *’);
writeln(‘Golongan 1 = Rp. ‘, g1);
writeln(‘Golongan 2 = Rp. ‘, g2);
writeln(‘Golongan 3 = Rp. ‘, g3);
writeln(‘========================’);
writeln(‘* Tunjangan *’);
writeln(‘Golongan 1 = Rp. ‘,t1);
writeln(‘Golongan 2 = Rp. ‘,t2);
writeln(‘Golongan 3 = Rp. ‘,t3);
writeln(‘Tunjangan Isteri = Rp. ‘,t_isteri);
writeln(‘Tunjangan Anak = Rp. ‘,t_anak);
readln;
end.

Hasil Run Program diatas :

Komentar Post :

ARTIKEL TERKAITDARI PENULIS