Program Menentukan Bilangan Prima


Bilangan prima adalah sebuah bilangan yang hanya bisa di bagi 2 angka saja, yaitu angka 1 dan angka itu sendiri, di bilangan genap yang termasuk bilangan prima hanya angka 2 saja, sedangkan untuk ganjil banyak sekali, tapi bukan berarti semua bilangan ganjil termasuk bilangan prima, contohya 9, 15, 21, dan angka lainya.
Untuk tutorial kali ini kita akan membuat sebuah program, di mana program tersebut akan menampilkan bilangan prima sebanyak jumlah baris yang kita inginkan, dan di mulai dengan 2 di baris pertama, baiklah berikut tutorialnya.

Pertama jalankan VB dengan project Standar EXE
Lalu tambahkan 1 command button, 1 label, 1 text box, dan, 1 list box, atur tampilannya
Di sini saya hanya mengubah properties captionsnya saja, yaitu untuk label = "Jumlah Baris", text box = kosongkan saja, dan command button = "BIL PRIMA", atau ganti captionya sesuai keinginan anda.

Jika sudah tambahkan script berikut :

Private Sub Command1_Click()
n = Val(Text1) 'Nilai n tergantung dari text1

List1.Clear 'Mengkosongkan area list 1
k = 0 
bil = 2
While k < n 'Kondisi = Nilai K lebih kecil dari N
prima = True 'Maka prima = True (Bilangan prima)
For pembagi = 2 To bil - 1 'Nilai pembagi = di awali dengan 2 dan di akhiri dengan nilai bil dengan pengurangan -1
If bil Mod pembagi = 0 Then prima = False 'Jika nilai dari bilangan bisa di bagi nilai dari pembagi maka prima = false (bukan prima)
Next pembagi
If prima Then 'Jika bilangan prima (True), maka

List1.AddItem bil 'List 1 ditambahkkan item /nilai dari bilangan
k = k + 1 'Nilai K selanjutnya adalah pertambahan nilai sebelumnya dengan 1

End If
bil = bil + 1 'Nilai Bil selanjutnya adalah pertambahan nilai sebelumnya dengan 1
Wend
End Sub
Lalu coba jalankan programnya,
Ketika kita menuliskan sebuah angka di text box, misalnya 8, maka otomatis ketika di klik command button, akan tampil 8 baris bilangan prima,


Itulah tutorial mengenai program bilangan prima,
Sekian tutorial kali ini, selamat mencoba


Bantu kembangkan Blues Pedia yuk, caranya share artikel ini :

G+



0 Response to "Program Menentukan Bilangan Prima"

Post a Comment