come mai mi da errore su read(kbd, opzione) ????????
codice:
program Graf1(input, output);
uses crt, graph3;
var x, y, x1, y1: integer;
opzione: char;
begin
graphcolormode;
gotoxy(5,24);
write('Premi esc per uscire');
repeat
begin
x:=random(319);
y:=random(150);
x1:=random(319);
y1:=random(150);
plot(x+1, y+1, 2);
draw(x, y, x1, y1, 3);
end;
read(kbd, opzione);
until (opzione=#27);
textmode(co80);
end.
e come posso correggere????????
help me! please...
ah... come compilatore sto usando il TurboPascal7
GRAZIE!