
THE LARGEST WEB DEVELOPER SITE ON THE NET Full Web Building Tutorials - ALL FREE! |

THE LARGEST WEB DEVELOPER SITE ON THE NET Full Web Building Tutorials - ALL FREE! |
Diposting oleh kang andi 1 komentar
Diposting oleh kang andi 2 komentar
program Binary_Search;
uses crt;
const
x = 10;
Var
arr : array [1..x] of integer;
i, kiri,tengah,kanan,cari :integer;
ketemu :boolean;
Begin
clrscr;
writeln('List Angka : ');
for i := 1 to x do
begin
arr[i] := i;
write(arr[i],' ');
end;
writeln;
write('Masukan data yang dicari (dgn Binary Serach) : ');
readln(cari);
kiri:=x;
kanan:=1;
ketemu:=false;
while not(ketemu) do
begin
tengah:=(kiri + kanan) div 2;
If arr[tengah]=cari then
begin
ketemu:=true;
writeln('Kunci yang di cari berada pada index ke ',tengah);
end
else if (cari < arr[tengah]) then
kiri := tengah - 1
else
kanan:= tengah+1;
if (kanan > kiri) then
begin
ketemu:=true;
writeln('Data yang Anda cari tidak ada !');
end;
end;
readln;
end.
Diposting oleh kang andi 5 komentar
Label: C/Pascal, Kuliah, Programing
Ini sebenernya algoritma pas mata kuliah Struktur Data, tapi di tagih lagi ma dosen pas Mata Kuliah Analisis dan Strategi Algoritma, ya udah deh tinggal buka file yang telah di buat... sekalian aja q posting, barang kali ntar filex ilang kan dah tak posting.., jadi tinggal buka lagi..., mudah2an juga bermanfaat buat kamu juga... ya wes nih langsung aja Binary Search pake bahasa C-nya,#define BENAR 0Algoritma Binary search sangat berguna jika melakukan pencarian pada suatu nilai yang berurutan, ini lebih efisien daripada Squensial Search ato pencarian yang melakukan pengecekan dari depan... tapi antara squensial ma binary tergantung di mana kita menerapkannya... kalo kamu ga percaya knp binary lebih efisien di pencarian yang nilai nya berurutan coba souce berikut ini, source ini mengasumsikan bahwa nilai array bersifa random, berikut sourcenya :
#define SALAH 1
int main(void) {
int array[10] = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10};
int kiri = 0;
int kanan = 10;
int tengah = 0;
int Nomor = 0;
int bsearch = SALAH;
int i = 0;
printf("ARRAY: ");
for(i = 1; i <= 10; i++) printf("[%d] ", i); printf("\nNomor yang di cari: "); scanf("%d", &Nomor); while(bsearch == SALAH && kiri <= kanan) { tengah = (kiri + kanan) / 2; if(Nomor == array[tengah]) { bsearch = BENAR; printf("** Nomor Ditemukan **\n"); } else { if(Nomor < kanan =" tengah"> array[tengah]) kiri = tengah + 1;
}
}
if(bsearch == SALAH)
printf("-- Nomor Tidak Ditemukan --\n");
return 0;
}
#includeNah beres kan??
#include
#define BENAR 0
#define SALAH 1
int main(void) {
int array[10];
int kiri = 0;
int kanan = 10;
int tengah = 0;
int Nomor = 0;
int bsearch = SALAH;
int i = 0;
for(i = 1; i<=10; i++) array[i] = rand() % 10; printf("ARRAY: "); for(i = 1; i <= 10; i++) printf("[%d] ", i); printf("\nNomor yang di cari: "); scanf("%d", &Nomor); while(bsearch == SALAH && kiri <= kanan) { tengah = (kiri + kanan) / 2; if(Nomor == array[tengah]) { bsearch = BENAR; printf("** Nomor Ditemukan **\n"); } else { if(Nomor < kanan =" tengah"> array[tengah]) kiri = tengah + 1;
}
}
if(bsearch == SALAH)
printf("-- Nomor Tidak Ditemukan --\n");
return 0;
}

Diposting oleh kang andi 1 komentar
Label: C/Pascal, Kuliah, Programing
Diposting oleh kang andi 12 komentar
Label: EBook
| Are You Student ?? | ya |
| How old Are You ?? 10-15 16-20 21-25 | |
< html>
< head>
< title> No 1< /title>
< /head>
< body>
< form>
< table cellpadding="0" cellspacing="0">
< tr>
< td> < b> Are You Student ??< /b> < /td>
< td> < input type="checkbox"> ya< /td>
< /tr>
< tr>
< td> < b> How old Are You ??< /b> < br/>
< input type="radio" name="umur" value="10-15"> < b> 10-15< /b> < br/>
< input type="radio" name="umur" value="16-20"> < b> 16-20< /b> < br/>
< input type="radio" name="umur" value="21-25"> < b> 21-25< /b> < br/>
< /td>
< /tr>
< tr>
< td> < input type="submit" name="send" value="send">
< input type="reset" name="reset" value="clear"> < /td>
< /tr>
< /table>
< /form>
< /body>
< /html>
| Nama | |
| Warna Faforit Anda ?? | MerahHitamPutih |
| Assisten Pemrograman web Faforit Anda ?? | RahmiBudiLia |
< html>Nah Pertemuan kuliah hari ini cuma itu... sambung di pertemuan kuliah lainnya ok...
< head>
< title> No 2< /title>
< /head>
< body>
< form>
< table cellpadding="0" cellspacing="0">
< tr>
< td> < b> Nama< /b> < /td>
< td> < input type="text" size="25" Value="Nama Anda.."> < /td>
< /tr>
< tr>
< td> < b> Warna Faforit Anda ??< /b> < /td>
< td>
< input type="checkbox"> Merah
< input type="checkbox"> Hitam
< input type="checkbox"> Putih
< /td>
< /tr>
< tr>
< td> < b> Assisten Pemrograman web Faforit Anda ??< /b> < /td>
< td>
< input type="radio" name="assisten" value="Rahmi"> Rahmi
< input type="radio" name="assisten" value="Budi"> Budi
< input type="radio" name="assisten" value="Lia"> Lia
< /td>
< /tr>
< tr>
< td> < /td>
< td style="text-align:center;"> < input type="submit" name="submit" value="submit">
< input type="button" name="reset" value="reset"> < /td>
< /tr>
< /table>
< /form>
< /body>
< /html>
Diposting oleh kang andi 0 komentar
Label: Kuliah, Programing, WEB
public class LuasSegitiga {
public static void main(String[] args) {
double a = 9.12;
double t = 12.89;
System.out.println("Alas Segitiga = "+a);
System.out.println("Tinggi Segitiga = "+t);
System.out.println("Luas Segitiga Adalah : "+(0.5*a*t));
}
}
public class LuasSegitiga {Gampang kan??, Ada yang lain???
public static void main(String[] args) {
double a = 9.12;
double t = 12.89;
System.out.println("Alas Segitiga = "+a);
System.out.println("Tinggi Segitiga = "+t);
a = 0.5*a*t
System.out.println("Luas Segitiga Adalah : "+a);
}
}

Diposting oleh kang andi 0 komentar
Label: Kuliah, Programing
Pengen punya Netbook seharga 2 jutaan?? Ini neh Netbook yang memiliki rekomendasi kuat untuk di beli... HP Mini Note ( Netbook ) seri 210-1014TU, sebelum u beli komputer atau laptop mending pikir-pikir dolo deh mau buat apa kedepannya, kalo u orangnya sibuk g sempet duduk di depan PC dan terus dikejar-kejar tugas kuliah (kalo masih kuliah), netbook cocok bgt buat kamu, soalnya nih uda ringan (1,07 kg) lumayan gede pula harddisknya (160 MB), tapi kalo u seorang desain grafis, kaya'nya netbook bukan rekomendasi untuk diplih, coz masih agak berat tuk desain grafis.. tapi ya ga berat-berat amat... Mendingan rakit PC dengan spec grafis tinggi... Kembali lagi ke masalah Netbook. Harga laptop ini cuma 299 USD (Rp. 2.810.600 assumsi dolar 9.400), ini netbook import eropa termurah diantara netbook2 yg lain di awal tahun 2010, tapi sayang OSnya masih under DOS dan Baterainya masih 3 cell (2 jam ++ dalam pemakainan normal), tapi dengan baterai 3 cell netbook ini terlihat ramping dan elegan, aq dah 2 kali saranin temen-temen buat beli neh netbook, dan mereka beli semua, bahkan adek q sendiri dah tak beliin netbook ini, busyet senengnya minta ampun.. he..., Pokonya ga rugi deh dengan netbook ini kalo kamu emang menginginkan semuanya serba cepat... untuk info lainnya tinggal googling aja di google... cari dengan keyword HP 210-1014TU, ato cari di gerai HP terdekat atau di toko-toko laptop di sekitarmu...
Diposting oleh kang andi 0 komentar
Label: Laptop
Wah,,, keren banget ya kalo bisa nampilin emoticon di blogger... [<<-- Mode lebay ON] emoticon tu apa seh??, beneran ga tau emoticon??, emoticon itu biasanya berupa gambar atau icon yang diam maupun bergerak yang biasa di gunain pas kita chating, komentar, bahkan posting (atau tread kalo di forum...) biar keliatan seru dan keren... coba bayangin kalo posting kita tuh tulisan semua ga ada gambarnya mesti bosenin banget,,, apa lagi kali ga ada tulisannya.. malah tambah bosenin... he.. sekarang dah tau emoticon kan??, kalo blom tau juga.. PARAH... googling aj deh... kalo kamu pengen punya emoticon pas kamu mau posting... seperti gambar dibawah ini, q akan kasih tau caranya.. img.emoticon {
padding: 0;
margin: 0;
border: 0;
}

Diposting oleh kang andi 4 komentar
Sebenernya nyari key kaspersky itu gampang-gampang susah, kamu langsung aja nyarinya di 4shared.com, ga usah googling, di tulisan ini lebih gampang tinggal klik link yang ada di akhir tulisan ini, langsung deh u tak bawa ke TKP, dan kalo dah di TKP pilih 3 yang teratas...Dah langsung aja dari pada ke banyak cincong yuk berangkat... (klik KE TKP)
Diposting oleh kang andi 0 komentar
Label: Virus
Diposting oleh kang andi 1 komentar
Diposting oleh kang andi 6 komentar
Perusahaan raksasa, Google Inc. , telah menambahkan sejumlah fitur jejaring sosial ke dalam produk surat elektronis kenamaannya, Gmail. Langkah perusahaan yang terkenal dengan mesin pencari di internet itu dimaksudkan untuk memungkinkan Gmail bersaing dengan situs jejaring sosial populer dunia, Facebook dan Twitter.Kalo bosen dengan facebook, seperti saya ini... hehehe, kita bisa beralih ke "Google Buzz", Kalo menurutku seh fasilitasnya lengkap. Bayangin aja kalo kita dah punya gmail kamu ga perlu daftar lagi untuk Buzz tinggal masuk aja ke gmail kamu, terus tinggal aktifin deh Buzznya... Layaknya di facebook di Buzz kita bisa update status dan bisa nambah pengikut layaknya di twitter... Kaya penggabungan 2 buah Social Networking jadi satu.., Tau sendiri di Gmail kita bisa apa aja selain terima email.. bisa juga chating dengan Gtalk, sekarang ditambah pake Buzz dengan update statusnya... ga ribet kalo mau cek email, kirim email, chating, de el el, aq saranin kamu nyoba aja dari pada ane jelasi panjang lebar.. ga da ruginya wong gratis ini... neh Screen Shotnya :
Dengan adanya produk baru yang dinamakan “Google Buzz” itu, para pemakai Gmail dapat dengan cepat berbagi pesan, link situs, dan foto dengan rekan mereka sesama pengguna Gmail. Google juga memperkenalkan sejumlah produk baru yang didesain khusus agar fitur-fitur jejaring sosial barunya cocok bagi peralatan selular, seperti “telepon pintar”, berbasis sistim operasi Android.

Diposting oleh kang andi 0 komentar
Label: Ngenet
![]() | Jangan Lupa Tulis Comment/Kritik/Saran.. |
|
|
