Реферат: Програмирование на языке Паскаль

fil:boolean; {способ вывода результата true – в файл, false– на экране в окне }

implementation

procedure readmas; { очистка матрицы }

var

i,j:integer;

s:string;

sr:string[3];

begin

s:='';

for i:=1 to n do

begin

for j:=1 to m do

begin

str(mxx[i,j],sr);

s:=s+sr+' ';

end;

matr_v[i]:=s;

s:='';

end;

end;

{_______________________________________________}

constructor tinterior.init;{инициализация }

begin

tscroller.init(bounds,hs,vs);

growmode:=gfgrowhix+gfgrowhiy;

setlimit(8000,7000);

end;

{_______________________________________________}

procedure tinterior.handleevent(var event:tevent); {движение мыши }