Program Daftar Gaji

Soal:
1.input terdiri dari NIP,NAMA,STATUS,GAJI POKOK
2.proses berakhir jika NIP berisi simbol /*
3.untuk gaji pokok <= 500000 maka tidak dikenakan pajak
4.untuk gaji pokok > 500000 dikenakan pajak dihitung berdasarkan 10% * (gaji pokok - 500000)
5.bagi karyawan dengan status "kawin" diberikan tambahan tunjangan keluarga 100000
6.Gaji bersih dihitung = gaji pokok - pajak + tunjangan keluarga
7.Diakhir laporan hitung total gaji bersih
Buatlah flowchart dan program basic beserta outputnya!

Untuk flowchartnya seperti ini:

Dibawah adalah program basicnya :

5 CLS

10 PRINT TAB(30); "DAFTAR GAJI"

20 PRINT TAB(2); "_____________________________________________________________________"

30 PRINT TAB(2); "NO"; TAB(6); "NIP"; TAB(16); "NAMA"; TAB(30); "STATUS"; TAB(38); "GAJI POKOK"; TAB(50); "PAJAK"; TAB(60); "GAJI BERSIH"

40 PRINT TAB(2); "_____________________________________________________________________"

50 NO = 0: PJ = 0: GB = 0: TB = 0

60 READ NIP$, NAMA$, STAT$, GP

70 NO = NO + 1

80 IF NIP$ = "/*" THEN PRINT TAB(2); "TOTAL GAJI BERSIH"; TAB(60); TGB: END

90 IF GP <= 500000 THEN PJ = 0 ELSE PJ = 10 / 100 * (GP - 500000)

100 IF STAT$ = "MENIKAH" THEN TJ = 100000 ELSE TJ = 0

110 GB = GP - PJ + TJ

120 TGB = TGB + GB

130 PRINT TAB(2); NO; TAB(6); NIP$; TAB(16); NAMA$; TAB(30); STAT$; TAB(38); GP; TAB(49); PJ; TAB(60); GB

140 PRINT TAB(2); "_____________________________________________________________________"

155 GOTO 60

160 DATA 1A,BUDI,MENIKAH,2000000,1B,WAHYU,LAJANG,3000000,1C,DIAN,LAJANG,2500000,/*,C,MENIKAH,1000000

untuk file BASnya bisa download disini

kemudian outputnya adalah :