Tunjangan Anak

Pemerintah hanya memberikan tunjangan anak dari PNS maksimal sampai 3 anak saja. Setiap anak diberikan tunjangan sebesar 10% dari gaji pokok.

Tulis program untuk menghitung total tunjangan anak, bila gaji pokok dan jumlah anak diINPUT oleh user.

Contoh Masukan dan Keluaran:

Jumlah anak	Gaji Pokok	Tunjangan Anak
0	1.000.000	0
1	1.000.000	100.000
3	1.000.000	300.000
5	1.000.000	300.000

Jawab:

uses crt;

VAR

        gajipokok, tunjangan: real;

        jmlanak: integer;

BEGIN

clrscr;

        writeln('Masukkan Gaji Pokok: ');

        readln(gajipokok);

        writeln('Masukkan Jumlah Anak: ');

        readln(jmlanak);

        if (jmlanak <= 3) then

                tunjangan := jmlanak * 0.1 * gajipokok

        else

                tunjangan := 300000;

                writeln('Tunjangannya adalah: ', tunjangan:2:0);

                readln;

END.