pascal , grafika

gersiu [ Pretorianin ]

pascal , grafika

mam pytanko . Pisze jakieś najprostsze programiki w turbo pascalu . Nie ma w niech błędów literówek a jak daje run program nie odpala . Normalne programy idą , natomiast jeśli robie graficzne , np. jakis narysowany prostokąt to nie wyjdzie . Od czego to zależy ?? Tutaj mam np. kod źródłowy z jakiejś strony :

Program Waz;

Uses Crt, Graph;

Var
a,b,x,y: Integer;
z: Boolean;

BEGIN
InitGraph(a,b,'c:\progra~1\bp\bgi');
x:=0;
y:=5;
z:=True;
repeat
x:=x+2;
If z=True Then y:=y+1
Else y:=y-1;
If y<5 Then z:=True;
If y>30 Then z:=False;
SetColor(Random(15));
Circle(x,round(sin(x*0.015)*50)+240,y);
circle(x,round(-sin(x*0.015)*50)+240,y);
Until x>640;
Readln;
END.

24.10.2007

22:49

[2]

eLJot [ a.k.a. księgowa ]

Co to znaczy "to nie wyjdzie"?