Berikut adalah ketentuan dari program ini :
Seorang yang ikut tour harus membayar biaya untuk 7 hari, meskipun hanya pergi kurang dari 7 hari, jika seseorang ingin peergi lebih dari 7 hari dikenakan biaya tambahan sesuai dengan biaya tambahan tiap paket.
berikut ini adalah listing programmnya :
loop = 1
pil = 0
lama = 0
def satu():
if Lama <= 7 :
waktu = 7
else :
waktu = lama
harga = waktu*800
...
Minggu, 13 Mei 2012
Program Kalkulator Sederhana Pada Python
loop = 1
pil=0
while loop == 1 :
print ""
print ""
print ""
print "Selamat Datang Di Program Kalkulator"
print ""
print "1) Penjumlahan"
print "2) Pengurangan"
print "3) Perkalian"
...
Belajar Algoritma & Pemrograman
AlgoritmaTahap pengembangan program terbagi atas :1. Tentukan Masalahnya2. Perencanaan Algoritma3. Analisa Algoritma4. Coding5. Pengujian Program6. Implementasi7. DokumentasiAlgoritma adalah urutan...
Selasa, 08 Mei 2012
Program Input Data Mahasiswa
{PROGRAM LAPORAN Mahasiswa}{Created By Yongki}uses crt;var NAMA : Array[1..20] of String[20]; NPM : Array[1..20] of String[8]; FAK : Array[1..20] of String[2]; ANGK : Array[1..20] of String[2]; BPP : Array[1..20] of LONGINT; I,N : Byte; Total : LONGINT; ...
Program Perpangkatan Pada Pascal
{Program Perpangkatan}
uses crt;VarX, x2, x3 : integer;Seperx : real;Beginclrscr;WriteLn('---------------------------------');WriteLn(' x x*x x*x*x 1/x');WriteLn('---------------------------------');FOR x:= 1 to 10 DOBeginX2 := x*x;X3 := X*X*X;Seperx := 1/x;WriteLn(x:3,x2:8,x3:8,seperx:12:3);End;WriteLn('---------------------------------');delay(2000);End.
berikut ini adalah output programnya...
Program Faktorial Pada Pascal
{Program Faktorial}Uses Crt;
Vara,z,c : integer;b : longint;
begin writeln('Masukkan Nilai Awal : '); readln (c); writeln('Masukkkan Nilai Akhir : '); readln(z); writeln('============='); ...
Jumat, 04 Mei 2012
Contoh Cara Pembuatan Games Pada Visual Basic
Componen pada Toolbox yang kita gunakan adalah :1. OptionButton(3 Buah)2. Label(5 Buah)3. Shape(3 Buah)4. CommandButton(3 Buah)5. Timer (3 Buah)
Langkah Pembuatannya :Klik 2 kali pada bagian form yang kosong. Lalu jika ada tulisan seperti dibawah ini, hapus tulisan itu.Private Sub Form_Load()End subLalu ketikkan syntax dibawah ini :Private Sub Command1_Click()a = Option1b = Option2c = Option3
If...
Langganan:
Postingan (Atom)
