Menghitung Gaji Pegawai Berdasarkan Jam Kerja

Buatlah sebuah algoritma yang menerima masukan nama dan jumlah jam kerja pegawai. Kemudian menghitung honor pegawai tersebut jika upah perjamnya adalah Rp 5000.

Contoh:
Masukkan nama: Adi
Masukkan jumlah jam kerja: 20

Hasil:
Upah Adi = Rp 100000

Jawaban:

program Project1;

const
  upahperjam : real = 5000;

var
  nama       : string;
  jamkerja   : integer;
  upah       : real;

begin
  write('Masukkan nama = '); readln(nama);
  write('Masukkan jumlah jam kerja = '); readln(jamkerja);
  upah := jamkerja * upahperjam;
  writeln('Upah ',nama,' = ',upah:2:0);
  readln;
end.