#include<iostream.h>
#include<stdio.h>
#include"conio.h"
main()
{
char kode,nmpembeli[25],judul[25];
long diskon,total,jumbay;
int jumbel,harga;
cout<<"Cinema 21"<<endl;
cout<<"===================="<<endl;
cout<<"Masukkan Nama Pembeli :";cin>>nmpembeli;
cout<<"Masukkan Kode Studio[A/B] :";cin>>kode;
cout<<"Masukkan JUmlah Beli :";cin>>jumbel;
switch (kode)
{
case 'A':
case 'a':
{
strcpy(judul,"Harry Potter");
harga=20000;
break;
}
case 'B':
case 'b':
{
strcpy(judul,"Final Destinations");
harga=30000;
break;
}
default:
{
cout<<"Kode tidak ada";
}
}
total=harga*jumbel;
if (jumbel>=4)
{
diskon=0.1*total;
}
else
if (jumbel>=2)
{
diskon=0.05*total;
}
else
{
diskon=0;
}
jumbay=total-diskon;
cout<<endl;
cout<<"Cinema 21"<<endl;
cout<<"==================="<<endl;
cout<<"Nama Pembeli ="<<nmpembeli<<endl;
cout<<"kode teathre ="<<kode<<endl;
cout<<"Judul Film ="<<judul<<endl;
cout<<"Harga ="<<harga<<endl;
cout<<"Jumlah Beli ="<<jumbel<<endl;
cout<<"Totalharga ="<<total<<endl;
cout<<"Diskon ="<<diskon<<endl;
cout<<"Jumlah bayar ="<<jumbay<<endl;
getch();
}
Rabu, 19 Oktober 2011
Tugas Pertemuan 7-8
Diposting oleh
1st Specta's Blog
05.06
Popular Posts
- MENGHITUNG SELISIH TANGGAL DI DELPHI 7
- Aplikasi Peminjaman Menggunakan Visual Foxpro 9.0
- Contoh Array + Fungsi
- LATIHAN DELPHI PRA UAS
- Materi Foxpro Untuk hari Kamis 6 Januari 2011
- Assalamualaikum Wr. Wb.
- Games Ramalan Cinta Sederhana
- Materi & Tugas Delphi Pert.7
- Membuat Menu Utama dan File .Exe pada Visual Foxpro 9.0
- Lesson 4th create database design with SQL Language in Ms.Access 2003
Watch IT....
HIT COUNTER
Total Tayangan Halaman
Pengikut
Visitor
Arsip Blog
Labels
- delphi (2)
- materi (3)
- SQL (1)
- Visual Basic (1)