Algorithma Bilangan Prima dengan Pascal

Screenshot Pascal Compiler di OnlineGDB

Kangen dengan bahasa pemrograman Pascal, yang merupakan salah satu bahasa pemrograman awal-awal penulis belajar tentang bahasa dan algorithma komputer, dalam tulisan ini, penulis mencoba mengimplementasikan kembali algorithma bilangan prima dengan menggunakan bahasa Pascal.

Berbeda dengan jaman dahulu yang penulis harus menginstal compiler Pascal terlebih dahulu di komputer penulis, saat tulisan ini ditulis, ternyata telah banyak ditemukan Pascal Compiler Online, seperti di https://www.onlinegdb.com/online_pascal_compiler.

Dengan compiler online tersebut, tentunya akan semakin mempermudah dalam belajar bahasa pemrograman, khususnya Pascal.

Berikut ini kode Pascal yang dapat digunakan untuk menampilkan bilangan prima sampai batas input yang diberikan.

program BilanganPrima; 
Var 
    i,j,batas,p:Integer; 
begin 
    write('Ketik Batas : '); 
    readln(batas); 
    for i:=2 to batas do 
    begin 
        p:=0; 
        for j:=2 to i-1 do 
        begin 
            if i mod j=0 then p:=1; 
        end; 
        if p=0 then 
        begin 
            if i>2 then write(','); 
            write(i); 
        end; 
    end; 

end. 

Terkait

Komentar



Postingan populer dari blog ini

Kumpulan Source Code Greenfoot

Game TicTacToe dengan Greenfoot

Algorithma Coretan Abstrak dengan HTML5 Canvas

Cara Membuat Halaman HTML Sederhana

Honeycomb Style Wallpaper dengan HTML5 Canvas

Ganti Kartu ATM BNI yang Rusak

Mencoba Submit Theme di Wordpress.org

Cara Menentukan Arah Kiblat Menggunakan Google Maps

Selamatan Latar Glundengan Bubuk Banyuwangi

Kode Greenfoot Game Snake Sederhana