Berikut ini adalah sintak untuk membuat program sederhana menghitung akar persamaan kuadrat dengan menggunakan Turbo Pascal for Windows.
program akar_persamaan_kuadrat;
uses wincrt;
var
nama : string;
coba: char;
a,b,c,d : integer;
x1,x2 : real;
program akar_persamaan_kuadrat;
uses wincrt;
var
nama : string;
coba: char;
a,b,c,d : integer;
x1,x2 : real;