B. Program Game
B1. Program ini merupakan program permainan dengan menuliskan nama, tanggal, bulan anda dengan pasangan anda. Tujuan program ini untuk menghibur para penggunanya.
B1. Program ini merupakan program permainan dengan menuliskan nama, tanggal, bulan anda dengan pasangan anda. Tujuan program ini untuk menghibur para penggunanya.
B2. Algoritma
1. Pseudocode
PSEUDOCODE
GAME KALKULATOR CINTA
Algoritma Game_Kalkulator_Cinta
(program ini dibuat untuk bermain
game tentang perhitungan cinta dengan pasangan)
nama1, nama2 : string
cinta : integer
tl1, tl2 : byte
bulan1: byte ß 0;
bulan2: byte ß 0;
Begin
Write("Tulis nama anda:
");
Read(nama1);
Do(
Write("Tanggal
lahir anda: ");
Read(tl1));
While (tl1<1 atau
tl1>31);
Do (
Write(“bulan
lahir anda:”)
Read(bulan1);
While(bulan1<1
atau bulan1>12);
Write("Tulis nama pasangan
anda: ");
Read(nama2);
Do(
Write("Tanggal
lahir pasangan: ");
Read(ttl2);
While (tl1<1 atau
tl1>31);
Do(
Write(“Bulan
lahir pasangan:”);
Read(bulan2);
While(bulan1<1
atau bulan1>12);
cinta = ((ttl1*bulan2)+(ttl2*bulan1));
Writeln("Maka Kadar cinta
kalian berdua : " );
if (cinta <= 100)
Writeln("27%");
elseif
(cinta >= 101 dan cinta <= 200)
Writeln("75%");
elseif
(cinta >= 201 dan cinta <= 350)
Writeln("94%");
elseif
(cinta >= 351 dan cinta <= 460)
Writeln("19%");
elseif
(cinta >= 461 dan cinta <= 670)
Writeln("80%");
else
Writeln("100%
SEGERA LARI KE KUA !!!!!!");
Writeln("Mau
coba lagi?? [YA/TIDAK]");
Read(coba);
if(coba="TIDAK")
Writeln("~~TERIMAKASIH
TELAH MEMAINKAN KALKULATOR CINTA~~");
while(coba="YA")
Write("Tulis nama anda:
");
Read(nama1);
Do(
Write("Tanggal
lahir anda: ");
Read(tl1));
While (tl1<1 atau
tl1>31);
Do (
Write(“bulan
lahir anda:”)
Read(bulan1);
While(bulan1<1
atau bulan1>12);
Write("Tulis nama pasangan
anda: ");
Read(nama2);
Do(
Write("Tanggal
lahir pasangan: ");
Read(ttl2);
While (tl1<1 atau
tl1>31);
Do(
Write(“Bulan
lahir pasangan:”);
Read(bulan2);
While(bulan1<1
atau bulan1>12);
cinta = ((ttl1*bulan2)+(ttl2*bulan1));
Writeln("Maka Kadar cinta
kalian berdua : " );
if (cinta <= 100)
Writeln("27%");
elseif
(cinta >= 101 dan cinta <= 200)
Writeln("75%");
elseif
(cinta >= 201 dan cinta <= 350)
Writeln("94%");
elseif
(cinta >= 351 dan cinta <= 460)
Writeln("19%");
elseif
(cinta >= 461 dan cinta <= 670)
Writeln("80%");
else
Writeln("100%
SEGERA LARI KE KUA !!!!!!");
Writeln("Mau
coba lagi?? [YA/TIDAK]");
Read(coba);
if(coba="TIDAK")
Writeln("~~TERIMAKASIH
TELAH MEMAINKAN KALKULATOR CINTA~~");
End.
2. Flowchart
B3. Gambaran Program Game
B4. Langkah Penggunaan
3.
Ketikkan bulan lahir anda(1-12)
4.
Ketikkan nama pasangan anda
5.
Ketikkan tanggal lahir pasangan anda(1-31)
6.
Ketikkan bulan lahir pasangan anda (1-12), maka
akan muncul kadar persen cinta kalian dan pilihan untuk mengulang game.
7.
Jika anda ingin mengulangi ketik “YA”, maka akan
kembali menu awal (mengetik nama anda). Dan ulangi langkah selanjutnya.
8.
Jika tidak ketik “TIDAK” maka akan berhenti dan
muncul “TERIMA KASIH TELAH MEMAINKAN KALKULATOR CINTA”