Program Pascal Untuk Menampilkan Bilangan Prima ke-n

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.

Sebelumnya kita sudah pernah membuat dengan menggunakan bahasa PHP kali ini kita akan membuat program untuk menampilkan bilangan prima dengan pascal. untuk lebih jelasnya kita langsung saja menuju scriptnya.

program matrik_x; var a,b,c,d,e:longint; begin write('Input Bilangan Prima Sampai Nilai : '); readln(c); writeln('2':7); for a:=3 to c do begin for b:= 2 to a-1 do begin if a mod b = 0 then begin d:=a ; end else begin e:=a; end;end; if a=d then begin b:= a-1; end else writeln(e:7); end; readln; end.

Maka hasilnya akan seperti gambar di atas: