Sabtu, 28 April 2012

Program Pascal (Menjumlahkan Dua Bilangan)


Contoh program PASCAL:
program TAMBAH_00; { Menjumlahkan dua
bilangan yang nilainya diberikan dalam perintah}
var X, Y, Z: integer; { Deklarasi variabel X,Y dan Z
sebagai bilangan bulat }
BEGIN { Program Utama Mulai }
X := 50; { Perintah memberikan nilai 50 pada var. X
}
Y := 25; { Perintah memberikan nilai 25 pada var. Y
}                            
Z := X + Y; { Perintah menjumlahkan X dan Y serta
menyimpan hasilnya ke Z}
END. { Akhir Program Utama } 

Contoh Program 2
program TAMBAH_01; { Menjumlahlan dua buah
bilangan yang dibaca dari default input }
var X, Y, Z: integer; { Deklarasi variabel X,Y dan Z
sebagai bilangan bulat }
BEGIN { Program Utama Mulai }
read(X); { Membaca nilai X lewat key-board }
read(Y); { Membaca nilai Y lewat key-board }
Z := X + Y; { Menjumlahkan X dan Y serta
menyimpan hasilnya ke Z }
write(Z); { Menyajikan Z ke layar monitor }
END. { Akhir Program Utama }

0 komentar:

Posting Komentar