Contoh program menghitung nilai tegangan dengan menggunakan Bahasa Pemrograman Turbo Pascal

Program Menghitung_Nilai_Tegangan;
var v,i,r : Integer
Write('Masukkan nilai kuat arus dalam ampere=');
readln(i);
Write('Masukkan nilai hambatan dalam ohmr=');
readln(r);
v := i*r
Writeln('Nilai Tegangan adalah=',v,'volt');
readln(v);
end.

Contoh program menghitung luas persegi panjang dengan Pascal

Program Menghitung_Luas_Persegi_Panjang;
uses crt;
var
p,l, L : Integer
       Write('Masukkan ukuran panjang=');readln(p);
       Write('Masukkan ukuran lebar=');readln(l);
       L := p*l
       Writeln('Luas Persegi Panjang adalah=',L);writeln
end.

Contoh program sederhana menggunakan Turbo Pascal

Progam Menampilkan_Nama_Anda;
begin
        writeln('Tulis Nama Anda');
end.

Setelah di compile dan di run, maka pada user screen akan tampak tulisan :
Tulis Nama Anda

Jika "Tulis Nama Anda" diganti dengan nama anda, maka setelah program di compile dan di run, pada user screen akan menampilkan nama anda.