Sabtu, 08 Oktober 2011

Tugas Algoritma dan Pemograman 1B

Kelompok 10 :
  • ZULVAN NOVEO NAZELA - 1711175
  • YUSRI ABDUL MAJID - 18111748
  • MOHAMMAD RADIYANSYAH - 14111584
  • HABIY ADZANJIV KEBAR - 13111129
  • RIKA DAMAYANTI - 16111200
  • CLAUDIA ALFELINE - 11111681

Jika A total belanja sepatu nya Rp 1200000, berapa poin dan bonus hadiah yang didapat??

CLS
10 REM "PROGRAM PENJUALAN TOKO THE BETTER SHOES"
20 PRINT "Poin Belanja dan Bonus Pembelian"
30 INPUT "Masukkan Harga Total : Rp"; TOTAL
40 IF TOTAL >= 400000 AND TOTAL <= 600000 THEN
50 PRINT "Poin Belanja :"; 15
60 ELSEIF TOTAL > 600000 AND TOTAL <= 800000 THEN
70 PRINT "Poin Belanja :"; 25
80 ELSEIF TOTAL > 800000 AND TOTAL <= 1000000 THEN
90 PRINT "Poin Belanja :"; 45
100 ELSEIF TOTAL > 1000000 AND TOTAL <= 1500000 THEN
110 PRINT "Poin Belanja :"; 80
120 ELSEIF TOTAL > 1500000 AND TOTAL <= 2000000 THEN
130 PRINT "Poin Belanja :"; 100
140 ELSEIF TOTAL >= 2500000 OR TOTAL >= 4000000 THEN
150 PRINT "Poin Belanja :"; 200
160 END IF
170 PRINT
180 INPUT "Masukkan Poin Anda :"; POIN
190 IF POIN >= 10 AND POIN <= 15 THEN
200 PRINT "Bonus :"; "Kaos New Adidas"
210 ELSEIF POIN >= 16 AND POIN <= 30 THEN
220 PRINT "Bonus :"; "Tas Ransel Nike"
230 ELSEIF POIN >=31 AND POIN <= 50 THEN
240 PRINT "Bonus :"; "Voucher Belanja Seharga Rp.200000.-"
250 ELSEIF POIN >= 51 AND POIN <= 70 THEN
260 PRINT "Bonus :"; "Voucher Fitness selama 2 jam"
270 ELSEIF POIN >= 71 OR POIN <= 100 THEN
280 PRINT 'Bonus :"; "Voucher Spesial Dinner Couple di Bandar Jakarta"
290 ELSEIF POIN >= 120 OR POIN <= 300 THEN
300 PRINT "Bonus :"; "Voucher Jalan-Jalan for Couple ke Bali"
310 END IF
320 PRINT
330 PRINT "Silahkan Ambil Bonus di Counter Pintu Keluar Utama"
340 PRINT
350 PRINT "Poin Tidak Berlaku untuk Kelipatan"
360 PRINT
370 PRINT "Terima Kasih Telah Belanja di Tempat Kami :)"






Tidak ada komentar:

Posting Komentar