PROGRAM MENGHITUNG GAJI HARIAN PEGAWAI MENGGUNAKAN IF

PROGRAM MENGHITUNG GAJI HARIAN PEGAWAI MENGGUNAKAN IF
Berikut ini adalah program menhitung gaji harian pegawai menggunakan if

1.Programnya

 program MenghitungGajiHarianPegawai;
uses crt;
var
   JJK,Gaji_Harian,Gaji : real;
begin
     clrscr;
     writeln('Program Menghitung Gaji Harian Pegawai');
     write('Input Jumlah Jam Kerja :');readln(JJK);

     Gaji:=500;
     if JJK>7 then
        Gaji_Harian :=Gaji*7+(Gaji*1.5*(JJK-7))
     else
         Gaji_Harian :=Gaji*JJK;

         writeln('Gaji Harian               Rp.:',Gaji_Harian:0:0);
         readln;

     end.

2.Program dalam pascal

3.Hasilnya







Komentar

Posting Komentar

Postingan populer dari blog ini

MENGHITUNG VOLUME TABUNG DENGAN PASCAL

Gambar
MENGHITUNG VOLUME TABUNG DENGAN PASCAL Berikut adalah cara menghitung volume tabung menggunakan pascal. 1.Programnya program volume_tabung; uses crt; const phi=3.14; var    r,t,v:real; begin      clrscr;      writeln('Program Hitung Volume Tabung');      write('Masukkan jari jari alas tabung=');readln(r);      write('Masukkan tinggi tabung=');readln(t);      V :=phi*r*r*t;      writeln('Volume tabung    =',V:2:2);      readln; end. 2.Gambarnya 3.Hasilnya
Baca selengkapnya

TABEL DISTRIBUSI FREKUENSI DATA JAMAK, NILAI MEAN, ,MEDIAN, MODUS, QUARTIL DAN DESIL

  TABEL DISTRIBUSI FREKUENSI DATA JAMAK, NILAI MEAN, ,MEDIAN, MODUS, QUARTIL DAN DESIL Cari Tabel Distribusi Frekuensi Data Jamak, Nilai Mean, Median, Modus, Quartil dan Desil dari Soal dibawah ini! Soal NPM Ganjil 37    35   39   25   18   16   33   38    52   59   67 79    82   78   82   43   26   29    77   19   18   23 53   67   24   76   45   44   46     77    70   85   82 34   49   79   38   33   39   32      39    29   45   51 21   20    44   48 37   36   59      75    54   43   33 Penyelesaiannya :  Lihat di PDF yak kawan-kawan:'))
Baca selengkapnya

MENCARI LUAS LAYANG LAYANG DENGAN MENGGUNAKAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE

MENCARI LUAS LAYANG LAYANG DENGAN MENGGUNAKAN KALIMAT DESKRIPTIF DAN PSEUDO-CODE Berikut Kalimat Deskriptif dan Pseudo-code mencari Luas Layang- layang Kalimat Deskriptif               Mulai               Masukkan nilai d1               Masukkan nilai Luas =1/2*d1*d2               Tampilan nilai Luas               Selesai Pseudo-code              Start              Variabel                          d1        : Integer                          d2        : Integer                          Luas...
Baca selengkapnya