Hallo Sahabat Blogger , Ketemu lagi dengan saya Bang
nifqi18 , yang lucu , imut , tapi tidak kaya marmut , Topik kali ini adalah Membahas Bilangan Prima dari matematika
Sedikit tentang pengertian bilangan prima ,
Bilangan prima
Dalam matematika,
bilangan prima adalah bilangan asli
yang lebih besar dari 1, yang faktor pembaginya adalah 1 dan bilangan
itu sendiri. 2 dan 3 adalah bilangan prima. 4 bukan bilangan prima
karena 4 bisa dibagi 2. Sepuluh bilangan prima yang pertama adalah 2, 3,
5, 7, 11, 13, 17, 19, 23 dan 29.
----------------------
potong disini -------------------------
sumber : wikipedia.org
Nah dari Pengertian di atas bahwa kita tahu , kita ambil algoritmanya ( mulai pusing nih ) >.<
algoritma yang di dapet
1. Bilangan Asli yang Lebih besar dari 1
2. Bahwa Angka 1 bukan angka prima
3. Bilangan yang hanya habis di bagi bilangan itu sendiri adalah bilangan prima
nah dari data di atas kita ketemu , atau bisa membuat aturan simple dari algoritmanya ( Algo kui opo ) , Mari kita rancang codingnya satu persatu
'kita ibaratkan data yang selalu kita cek adalah text1.text
if text1.text <= "0" then
msgbox "Angka yang anda masukan harus lebih besar dari 0" ' algo pertama
End if
If text1.text = 1 then
msgbox "angka 1 bukan bilangan prima" ' Algo Kedua
End IF
dim nilai as string ' Deklarasi nilai
For i = 2 to (val(text1.text) - 1) ' Mengapa menggunakan For ? Sebagai pengecekan
nilai = Val(text1.text) mod val(i) ' Fungsi mod adalah untuk ?
if nilai = "0" then
x = x + 1
exit for ' Sebagai Pengulangan Pengecekan
End IF
ext i
'Algoritma Final nya
If x > 0 then
msgbox "Bilangan Prima"
Else
msgbox "Bukan Bilangan Prima"
End If
saya rasa saya sudah capek nuli artikel ini , dengan jelasin sampe ke akar akar nya . . sudah dulu akh , capek ,
Upssssssssssss , Heh Bang , Koding Lengkapnya gmana ? , dari tadi di tungguin malah algo algo mlulu >.<
Lha Itu masih kurang paham juga kah ?
aaaaaaaaaaaaaaaaagkhhhhhhhhhhhhhhh >.<
dasar Endonesia Loe :P , Mau nya yang simpel saja :D , nooh koding nya di bawah aye