Mi a gond a programal?

Az alábbi Pascal programot találtam, ami a sin(x) függvényt rajzolja ki a képernyőre:

program Pelda28;

uses graph, wincrt;

var gd,gm: integer;

i:integer;

function IntToStr(szam:integer):string;

var szoveg:string;

begin

str(szam,szoveg);

IntToStr:=szoveg;

end;

begin

{grafika inicializalasa}

gd := d4bit;

gm := m640x480;

initgraph(gd,gm,'');

{ha hiba tortent, akkor a program leallitasa}

if graphresult<>grok then

begin

writeln('Hiba a grafika inicializalasanal.');

halt;

end;

{tengelyek kirajzolasa}

setcolor(blue);

line(100,50,100,350);

line(100,200,500,200);

settextjustify(centertext,toptext);

for i:=1 to 4 do

begin

line(90*i+100,198,90*i+100,202);

outtextxy(90*i+100,205,IntToStr(i*90));

end;

settextjustify(righttext,centertext);

for i:=-1 to 1 do

begin

line(98,90*i+200,102,90*i+200);

outtextxy(95,90*i+200,IntToStr(-i))

end;

{sin(x) kirajzolasa}

setcolor(yellow);

moveto(100,200);

for i:=0 to 360 do

lineto(i+100,trunc(sin(i*PI/180)*90+200));

{grafikus mod bezarasa}

readkey;

closegraph;

end.

Mikor futtatni akarom, az alábbi hibaüzenetet írja ki:

Fatal: Can't find unit graph used by pelda28

Free Pascalt használok. az lehet a gond, hogy maga a kompilláló a C meghajtón van, a program pedig a D-n? Máshol nem volt ilyen gond, crt unitot gond nélkül felismeri, pedig minden programot ugyanaban a mappában tárolok(és azon belül almappákban) A választ előre is köszönöm szépen.