Program Bilangan Prima dengan Menggunakan Bantuan Array


Contoh program :

Program Mencari_Bilangan_Prima_Dengan_Array;
Uses Crt;
Var
  Prima : Array[1..100] of Integer;
  i,j : Integer;
  bil : Integer;
Begin
  ClrScr;
  For i := 2 to 100 Do
  Begin
    Prima[i]:=i;
    For j:= 2 to i-1 Do
    Begin
      bil := (i mod j); {* i dibagi j dicek apakah 0*}
      If bil = 0 then Prima[i]:=0; {*jika habis dibagi,berarti bkn prima*}
    End;
    If Prima[i] <> 0 Then Write(Prima[i],' '); {*cetak array yg prima*}
  End;
  Readln;
End.

26 responses to “Program Bilangan Prima dengan Menggunakan Bantuan Array”

  1. saiaa mau tanya, kalau buat program menyimpan bilangan genap ke dalam suatu stray sebanyak input user (10)..
    bagaimana penyelesaiannya?????

    terimaa kasiih..

  2. @ushy
    rubah baris ke empat

    Prima : Array[1..100] of Integer;

    menjadi

    Prima : Array[1..1000] of Integer;

    rubah juga baris ke sembilan

    For i := 2 to 100 Do

    menjadi

    For i := 2 to 1000 Do

    Semoga tercerahkan… :)

  3. Kak Nu,

    aku mau nanya nie, Kalau Program yang menggunakan Array dalam Record ada gk contohnya?
    Kalau ada dikasih tau ya…! hari rabu aku mau ujian dengan materi tersebut…! Please dikasih tau ya?

  4. bagaimana membuat program pascal dengan soal sebagai berikut:diterima input dari keyboard sebanyak 3 buah bil pecahan(boleh negatif atau positif)jjika bil pertama adalah positif, maka bil tersebut dikurangi dgn bil prima diantara yg terdekat dgn bil kedua tersebutjjka bil kedua adalah negatif, maka bil tersebut ditanbahkan dgn nilai hasil sisa bagi 3 bil tesebuttentukan mana bil terbesar dan terkecil dari ketiga bil tadi, kemudian jumlahkan ketiga bil tersebut dan hasinya ditampilkan.

  5. kalo program C++ bisaa gak gan ??? ane perlu sangat nii…
    temukan berapa digit bilangan prima dari 1 sampai 2 miliar,??
    gmn gan bisa gak :D

  6. mas mau tanya,kalo caranya membuat program function rata-rata n bilangan random (menggunakan fungsi proc. Randomize dan fungsi random) tu gmna ? makasih :)

  7. tolongin q doch …. ada soal diberikan sebuah array integer A yg berukuran N elemen array A sudah terdefinisi elemen2nya. buatlah procedur untuk menghitung jumlah elemen array yg negetif……. itu soalnya mohon bantuannya yah makasih……………….

Leave a Reply