fill string

7 Aug 2005

      hi
This used to work:

program fil;
var
   i : integer;
   s : string( 500 );
begin
   for i := 1 to 500 do
     s[ i ] := ' ';
   writeln("ok");
end.

Now I get "Value out of range"

Is it me or it?
   Russ

fill string

Russell Whitaker