Bilangan prima adalah bilangan asli yang lebih besar dari angka 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.

 Sekarang kita akan membuat program pencari bilangan prima dengan bahasa pemrograman pascal.


Berikut adalah script untuk membuat program pencari bilangan prima dengan pascal.

program bilangan_prima;
Uses winCrt;
Var
a,b,c,x:integer;

begin
write ('Masukkan Bilangan Prima sampai:');
read(x);
for a:=1 to x do
begin
c:=0;
for b:=1 to a do
begin
if a mod b=0 then
c:=c+1;
end;

if c=2 then
begin
write(a);
write(' ');
end;
end;

readln;
end.

Setelah mengetikan script di atas, maka jika dijalankan hasilnya adalah sebagai berikut
 Program ini akan meminta user untuk memasukan batas angka yang akan dicari bilangan prima-nya. Angka maksimal dari contoh di atas adalah 50, sehingga program hanya akan mencari bilangan prima yang kurang atau sama dengan angka 50.

Download file pascal-nya di sini.

Sekian tutorial pascal kali ini, semoga berguna.

 

「Dani Kustiawan」