Member baru? Bingung? Perlu bantuan? Silakan baca panduan singkat untuk ikut berdiskusi.
0 Anggota dan 1 Pengunjung sedang melihat topik ini.
Salam kenal adminrumus untuk bilangan prima ya...?Bukankah jawaban dari pertanyaan ini ada hadiahnya. yaitu 1 juta dollar.......kalo aku masih bisa menemukan rumus untuk bilangan prima yang kurang dari 100caranya gini1. bilangan tersebut harus ganjil tentunya2. bilangan tersebut tidak rangkap (33, 55, dsb)3.jumlahkan angka tersebut sampai menjadi 1 digit, apabila hasilnya tidak sama dengan 3,6,9. maka dia pasti prima
Salam kenal adminrumus untuk bilangan prima ya...?Bukankah jawaban dari pertanyaan ini ada hadiahnya. yaitu 1 juta dollar.......
hum.. kalau menggenerate nya bisa dengan Sieve of Eratosthenes. caranya gini :1. Tulis daftar angka dari 2 sampai bilangan terbesar yang ingin di cek primanya. Kita sebut daftar A.2. Angka 2 adalah bilangan prima yang pertama, tulis angka 2 di daftar angka kedua ( kita sebut daftar B ). daftar B ini nanti isinya bilangan yang prima.3. Pada daftar A, coret angka 2 dan semua angka yang habis dibagi 2.4. Setelah itu, angka pertama pada daftar A yang tidak tercoret merupakan bilangan prima, maka tambahkan pada daftar B.5. Pada daftar A, coret angka tersebut dan semua angka yang habis dibagi angka tersebut. Pencoretan bisa dimulai dari kuadrat angka tersebut. Misalkan angka yang dicoret adalah 3, maka coret semua kelipatan 3 mulai dari 9. lalu kalau 5 bisa langsung mulai coret dari angka 25.6. Ulangi langkah tersebut sampai semua daftar A tercoret.kalau kurang jelas, ini sumbernnya : http://en.wikipedia.org/wiki/Sieve_of_Eratosthenes
Algoritma Bilangan Prima===========================procedure BilPrima(num: Integer);var i, max: integer;begin if num=0 then exit; max := 2000; for i:= 2 to max do begin if ((i=2) or (i=3) or (i=5) or (i=7)) then begin Tambahkan ke penyimpanan num := num-1; if num=0 then exit; end; if ((i mod 2<>0) and (i mod 3 <> 0) and(i mod 5<>0) and (i mod 7<>0)) then begin Tambahkan ke peyimpanan num := num-1; if num=0 then exit; end; end; end;Souce Lengkap dengan delphi dapat di Download www.sumbawanews.com
if ((i=2) or (i=3) or (i=5) or (i=7)) then begin Tambahkan ke penyimpanan num := num-1; if num=0 then exit; end; if ((i mod 2<>0) and (i mod 3 <> 0) and(i mod 5<>0) and (i mod 7<>0)) then begin Tambahkan ke peyimpanan num := num-1; if num=0 then exit; end;
nah..dengan kerendahan hati saya telah membuat teori matematika dan algoritmanya tentang bilangan prima tentu waktu yg di butuhkan bukan tahun bukan bulan atau jam...untuk 200 digit dibutuhkan hanya beberapa menit saja. sy memakai program VB6.0..
Berarti 33 ntar dimasukin ke dalam bilangan prima (pembagianya cuma sampe angka 7, padahal 11 x 3 = 33 (bukan prima)
Ada gak teknik menghitung bil prima dengan mudah??Sebutkan bilangan prima ke-1000??
nah..dengan kerendahan hati saya telah membuat teori matematika dan algoritmanya tentang bilangan prima tentu waktu yg di butuhkan bukan tahun bukan bulan atau jam...untuk 200 digit dibutuhkan hanya beberapa menitsaja. sy memakai program VB6.0..nah..temen2 sy sudah email ke claymath.org beberapa kali tapi ndak ada tanggapan. tolong dong temen2 kasih masukan buat sy...thankschow bun how