Bentuk umum program pascal

Contoh Sederhana: Program Menghitung Luas Persegi Panjang
Program Menghitung_Luas_Persegi_Panjang_Ani;
Var
Panjang:Integer;
Lebar:Integer;
Luas:Integer;
Begin
Write('Masukkan Nilai Panjang = ');read(Panjang);
write('Masukkan Nilai Lebar = ');read(Lebar);
Luas:=Panjang*Lebar;
writeln('Hasil Luas Persegi Panjang = ',Luas);
readkey;
End.
PENJELASAN
* Judul Program:
Program Menghitung_Luas_Persegi_Panjang_Ani;
Tulisan Menghitung Luas Persegi Panjang Ani diketik tanpa menggunakan spasi, boleh menggunakan underscore.
* Deklarasi Variabel
Panjang:Integer;
Lebar:Integer;
Luas:Integer;
karena data yang akan diinput dan diproses berupa data angka kita gunakan tipe data Integer, jika data berupa data teks atau karakter gunakan tipe data String.
Karena sama-sama bertipe data Integer penulisan di atas diubah seperti di bawah ini:
Panjang,Lebar,Luas:Integer;
* INPUT
Write('Masukkan Nilai Panjang = ');read(Panjang);
write('Masukkan Nilai Lebar = ');read(Lebar);
Untuk Memasukkan Data dalam program digunakan WRITE, anda bisa menuliskan teks diantara tanda kutip satu (boleh menggunakan spasi.
Untuk membaca data input digunakan READ, isi di dalam read harus sama dengan yang ada di deklarasi VAR
* PROCESS
Tuliskan rumus anda dengan memperhatikan deklarasi pada VAR (tulisan yang anda buat dalam rumus harus sama dengan deklarasi variabel) dan terdapat tanda titik dua, sama dengan dan diakhiri tanda titik koma
Luas:=Panjang*Lebar;
* OUTPUT
Dibuat dengan menggunakan WRITELN dengan menambahkan tanda koma ( , ) untuk memanggil rumus yang sudah dibuat pada PROCESS
writeln('Hasil Luas Persegi Panjang = ',Luas);
readkey;