- Код: Выделить всё
var
a,b: array of byte;
begin
setlength(a,10);
setlength(b,10);
b:=a; //после этой строки, проблемы и начинаются
writeln('a[2]=',a[2],' b[2]=',b[2]);
a[2]:=100;
writeln('a[2]=',a[2],' b[2]=',b[2]);
b[3]:=50;
writeln('a[3]=',a[3],' b[3]=',b[3]);
end.
Выхлоп:
- Код: Выделить всё
a[2]=0 b[2]=0
a[2]=100 b[2]=100
a[3]=50 b[3]=50
Использовал динамические массивы вместо простых из-за того что их можно сравнивать целиком, но оказалось что они склеиваются и данные потом самопроизвольно перетекают из одного в другой. Это баг или фича?