pascal probje voor school!

[shardphoenix]

deze procedure moet een file aanmaken met de naam inttext en deze moet daarna gevuld worden met een random hoeveel heid getallen (1-100) met allemaal random getallen tussen de -1000 en de 1000

PROCEDURE createfile(inttext:string);
VAR ft: FILE OF INTEGER;
I,n: INTEGER;

BEGIN
ASSIGN (ft,'i:\inttext.txt');
REWRITE(ft);
n:=50+RANDOM(51);
FOR I:=1 TO n DO
WRITE(ft,RANDOM((2001)-1000));
CLOSE (ft);
END;

krijg de foutmelding...invalid varriable reference

[Creepy]

En op welke regel krijg je die foutmelding?

Plaats trouwens je code eens tussen

code:

. Leest een stuk makkelijker.

[Soultaker]

Zeur zeur, moppper mopper, FAQ, zucht, steun, wat heb je zelf al geprobeerd, blabla, code tussen code tags, topic title, yadayada, vraag, etc.

[D2k]

zie Soultaker (hoef ik het iig niet te herhalen )