Program jam kerja
Download as DOCX, PDF0 likes1,628 views
Program ini merupakan algoritma pembuatan jam kerja kantor yang menghitung upah pegawai berdasarkan jam masuk dan jam pulang kerja. Program menerima input jam masuk dan jam pulang, kemudian menghitung upah normal, upah lembur, dan total upah sesuai ketentuan jam kerja normal dan lembur.
Program jam kerja
- 1. Tugas ALPROG 1 Pembuatan Jam Kerja Kantor Nama: Muhammad Faisol Salafi NIM : 3113100868 SEKOLAH TINGGI ILMU KOMPUTER PGRI BANYUWANGI 2013
- 2. Analisa Masalah Input : Jam Masuk Kerja(JMK), Jam Pulang Kerja(JPK) Konstanta ; Upah Kerja Perjaml(UKP)=6000, Upah Normal(UN)=UKP*6 Proses: -------‘Seleksi Inputan > If JMK > 8 And JMK <= 24 Then Output("Anda Telat!!") Else Output("Anda datang tidak terlambat!!!") Input(Jam Pulang Kerja) End If ‘Seleksi Proses > If JPK = 14 Then Output(Upah Normal) ElseIf JPK > 14 And JPK <= 20 Then L=JPK - 14 UKL=L*UKP*2 TU=UN+UKL Output(Upah Normal) Output(Upah Kerja Lembur) Output(Total Upah) ElseIf JPK >= 21 And JPK <= 24 Then L=6 UKL=L*UKP*2 TU=UN+UKL Output(Upah Normal) Output(Upah Kerja Lembur) Output(Total Upah ElseIf JPK >8 And JPK < 14 Then Output ("Anda dianggap bolos kerja") End If Output:Upah Normal(UN), Upah Kerja Lembur(UKL), TU, -> Deklarasi=Jam Masuk Kerja(JMK), Jam Pulang Kerja(JPK), Upah Kerja Perjam(UKP), Upah Normal(UN), Lembur(L), Upah Kerja Lembur, UN+UKL
- 3. Algoritma Deskriptif: Masukkan Jam Anda Masuk Kerja Jika Anda Masuk lebih dari Jam 8 dan kurang dari sama dengan 24 maka o Tampilkan Anda Telat Kerja o Tampilkan Tidak diperbolehkan Masuk Kerja Selain itu o Tampilkan Anda tidak Terlambat kerja o Silahkan Masukkan Jam Pulang Kerja Anda Akhir Jika Jika Jam Pulang Kerja adalah 14 maka o Tampilkan Upah KerjaNormal Jika Selain itu Jam Pulang Kerja lebih dari 14 dan kurang dari sama dengan 20 maka o o o o o o Hitung Nilai Lembur yaitu Jam Pulang Kerja dikurangi 14 Hitung Nilai Upah Kerja Lembur yaitu Lembur dikalikan Upah Kerja Perjam dikalikan 2 Hitung Nilai Total Upah yaitu Upah Norma ditambah Upah Kerja Lembur Tampilkan Upah Kerja Normal Tampilkan Upah Kerja Lembur Tampilkan Total Upah Jika Selain itu Jam Pulang Kerja lebih dari 21 dan kurang dari 24 maka o o o o o o o Nilai Lembur adalah 6 Hitung Nilai Upah Kerja Lembur yaitu Lembur dikalikan Upah Kerja Perjam dikalikan 2 Hitung Nilai Total Upah yaitu Upah Norma ditambah Upah Kerja Lembur Tampilkan Anda melebihi Jam Kerja Tampilkan Upah Kerja Normal Tampilkan Upah Kerja Lembur Tampilkan Upah Total Upah Jika Selain itu Jam Pulang Kerja lebih dari 8 dan Kurang dari 14 maka o Tampilkan Anda dianggap Bolos Kerja Akhir Jika Selesai
- 4. Pseudocode Judul Program > Program Jam Kerja Kantor Narasi > // Input: Jam Masuk Kerja Merupakan Bilangan Positif dengan Rentang 0-24 maka tipe data yang tepat yaitu Byte > // Input: Jam Pulang KerjaMerupakan Bilangan Positif dengn Rentang 0-24 maka tipe data yang tepat yaitu Byte > // Output: Upah Normal Merupakan bilangan Positif dengan Rentang 0-36000 maka tipe data yang tepat yaitu UInt32 > // Output: Upah Kerja Lembur Merupakan bilangan Positif dengan Rentang 0-72000 maka tipe data yang tepat yaitu UInt64 > // Output: Total Upah Merupakan bilangan Positif dengan Rentang 0-108000 maka tipe data yang tepat yaitu UInt64 > > > > > > Kamus Jam Masuk Kerja Jam Pulang Kerja Upah Normal Upah Kerja Lembur Total Upah : Byte : Byte : UInt32 : Byte : Byte
- 5. Input(Jam Masuk Kerja) If JMK > 8 And JMK <= 24 Then Output("Anda Telat!!") Else Output("Anda datang tidak terlambat!!!") Input(Jam Pulang Kerja) End If If JPK = 14 Then Output(Upah Normal) ElseIf JPK > 14 And JPK <= 20 Then L UKL JPK - 14 L*UKP*2 TU UN+UKL Output(Upah Normal) Output(Upah Kerja Lembur) Output(Total Upah) ElseIf JPK >= 21 And JPK <= 24 Then L6 UKLL*UKP*2 TU UN+UKL Output(‘Anda melebihi Jam Kerja Lembur) Output(Upah Normal) Output(Upah Kerja Lembur) Output(Total Upah ElseIf JPK >8 And JPK < 14 Then Output ("Anda dianggap bolos kerja") End If Deskripsi
- 6. Flowchart START Input(JMK) JMK >8 And JMK <=24 Ya Output( Bolos Kerja ) Tidak Input(JPK) JPK =14 Ya Tidak L=JPK – 14, UKL=L*UKP*2, TU=UN+UKL Ya Tidak Output(UN), Output(UKL), Output(TU) L=6, UKL=L*UKP*2, TU=UN+UKL Output( Anda melenihi Jam Kerja), Output(UN), Output(UKL), Output(TU) JPK >14 And JPK <=20 Ya JPK >14 And JPK <=20 Tidak JPK >8 And JPK <14 Ya Output( Anda Dianggap Bolos ) END Output(UN)
- 7. Coding ' ' Created by SharpDevelop. ' User: eF ' Date: 11/6/2013 ' Time: 5:11 PM ' ' To change this template use Tools | Options | Coding | Edit Standard Headers. ' Module Program Sub Main() Dim JMK, JPK, L As Byte Dim UKL, TU As Integer Dim Tanggal As DateTime = DateTime.Now Const UKP=6000 Const UN=UKP *6 ' Dim Ulang="Y" ' While(Ulang="Y") 'Judul Console.Clear Console.ForegroundColor=ConsoleColor.Cyan Console.WriteLine("=================================================") Console.WriteLine("= Program Perhitungan Jam Kerja Kantor =") Console.WriteLine("= PT eF Mcheasa =") Console.WriteLine("= =") Console.WriteLine("= By: eF =") Console.WriteLine("=================================================") Console.WriteLine("=> Today "& Tanggal &" ") Console.WriteLine() 'Inputan Console.ForegroundColor=ConsoleColor.yellow Console.WriteLine("--> Jam Masuk Kerja 8 Pagi") Console.WriteLine("--> Jam Pulang Kerja 14 Siang") Console.WriteLine("--> Jam Tutup Kerjaan 20 Malam") Console.WriteLine() Console.ForegroundColor=ConsoleColor.Cyan Console.Write("=> Masukkkan Jam Masuk Kerja Anda ") JMK=Convert.ToByte(Console.ReadLine()) 'Seleksi Inputan If JMK > 8 And JMK <= 24 Then Console.ForegroundColor=ConsoleColor.green Console.WriteLine("------> Anda Telat!!") Console.WriteLine("------> Anda tidak diperbolehkan Masuk Kerja") Else Console.WriteLine("->") Console.WriteLine("--> Anda tepat waktu!!!") Console.WriteLine("----------------------------------") Console.Write("=> Silahkan, Memasukkan Jam Pulang Kerja Anda ")
- 8. JPK=Convert.ToByte(Console.ReadLine()) Console.WriteLine() End If 'Seleksi Proses If JPK = 14 Then Console.ForegroundColor=ConsoleColor.green Console.WriteLine("--> Hari ini Anda Mendapat Upah Normal Rp "& UN) ElseIf JPK > 14 And JPK <= 20 Then L=JPK - 14 UKL=L*UKP*2 TU=UN+UKL Console.ForegroundColor=ConsoleColor.green Console.WriteLine("--> Upah Kerja Normal Anda Hari ini Rp "& UN) Console.WriteLine("--> Upah Kerja Lembur Anda Hari ini Rp "& UKL) Console.WriteLine("---------------------------------------------") Console.WriteLine("--> Total Upah Kerja Anda Hari ini Rp "& TU) ElseIf JPK >= 21 And JPK <= 24 Then L=6 UKL=L*UKP*2 TU=UN+UKL Console.ForegroundColor=ConsoleColor.green Console.WriteLine("=> Anda Melebihi Jam Kerja ") Console.WriteLine("=> Dan Upah Kerja Anda Hari ini") Console.WriteLine() Console.WriteLine("--> Upah Kerja Normal Anda Hari ini Rp "& UN) Console.WriteLine("--> Upah Kerja Lembur Anda Hari ini Rp "& UKL) Console.WriteLine("---------------------------------------------") Console.WriteLine("--> Total Upah Kerja Anda Hari ini Rp "& TU) ElseIf JPK >8 And JPK < 14 Then Console.ForegroundColor=ConsoleColor.green Console.WriteLine("=> Anda dianggap bolos kerja") End If Console.ForegroundColor=ConsoleColor.Yellow Console.WriteLine() Console.WriteLine() Console.WriteLine("-----------------------------------") Console.WriteLine("| Nama : Muhammad Faisol Salafi |") Console.WriteLine("| NIM : 3113100868 |") Console.WriteLine("-----------------------------------") Console.ForegroundColor=ConsoleColor.Cyan Console.Write("Tekan apa saja untuk keluar.....!") Console.ReadKey(True) ' Console.Write("Apakah Anda Ingin Mengulang Y/N ? :") ' Ulang=Console.ReadLine() ' Ulang=Ulang.ToUpper() ' Console.WriteLine() ' End While End Sub End Module