PSEUDOCODE PROGRAM MESIN KASIR (lanjutan)

while(status=true){

write("Masukkan Kode Barang : ")

read(kode3)

if((kode3!=001)&&(kode3!=002)&&(kode3!=404)&&(kode3!=405)&&(kode3!=406)&&(kode3!=407)&&(kode3!=302))

writeln("Anda Salah Memasukkan Kode")

status=true

endif

else if(kode3==001)

nama3 = "Buku Tulis"

hrgsatuan3 = 2500

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

else if(kode3==002)

nama3 = "Buku Gambar"

hrgsatuan3 = 4000

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

else if(kode3==404)

nama3 = "Pensil"

hrgsatuan3 = 2000

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

else if(kode3==405)

nama3 = "Pulpen"

hrgsatuan3 = 3500

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

else if(kode3==406)

nama3 = "Penghapus"

hrgsatuan3 = 1500

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

else if(kode3==407)

nama3 = "Penggaris"

hrgsatuan3 = 3000

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

else if(kode3==302)

nama3 = "Tempat Pensil"

hrgsatuan3 = 5000

write("Masukkan Jumlah Barang : ")

read(jumlah3)

hrg3 = hrgsatuan3*jumlah3

status=false;break

endif

endwhile

total = hrg1+hrg2+hrg3

writeln("Total Bayar : " +total )

write("Masukkan Nilai Tunai : ")

read(tunai)

read(spasi)

kembali = tunai-total

if(kembali<=0){

           writeln("Maaf, Anda Perlu Menambahkan Nilai Tunai sebesar "+kembali)

           write("Masukkan Nilai Tunai Tambahan : ")

           read(uangtambah)

           tunai = tunai+uangtambah

           kembali = tunai-total

endif

writeln("TOKO ALAT TULIS GRAMEDIA")

writeln("Jalan Pandanaran Simpang Lima")

writeln("SEMARANG")

writeln("No.     : " +no)

writeln("Kasir   : " +kasir.toUpperCase())

writeln("Tanggal : " +tanggal)

writeln(nama1.toUpperCase()+"                              "+jumlah1+"      "+hrgsatuan1+"                                "+hrg1)

writeln(nama2.toUpperCase()+"                              "+jumlah2+"      "+hrgsatuan2+"                                "+hrg2)

writeln(nama3.toUpperCase()+"                              "+jumlah3+"      "+hrgsatuan3+"                                "+hrg3)

writeln ("HARGA JUAL = " +total)

writeln("TOTAL      = " +total)

writeln("TUNAI      = " +tunai)

writeln("KEMBALI    = " +kembali)