2015-12-28 14:25:15 +03:00
|
|
|
// Использование динамического массива.
|
2015-05-14 22:35:07 +03:00
|
|
|
var a: array of integer;
|
|
|
|
|
|
|
|
|
|
begin
|
2015-12-28 14:25:15 +03:00
|
|
|
writeln('SetLength при повторном вызове не портит старые элементы:');
|
2015-05-14 22:35:07 +03:00
|
|
|
SetLength(a,5);
|
|
|
|
|
for var i:=0 to a.Length-1 do
|
|
|
|
|
a[i] := i+1;
|
|
|
|
|
for var i:=0 to a.Length-1 do
|
|
|
|
|
write(a[i],' ');
|
|
|
|
|
writeln;
|
|
|
|
|
|
|
|
|
|
SetLength(a,10);
|
|
|
|
|
for var i:=0 to a.Length-1 do
|
|
|
|
|
write(a[i],' ');
|
|
|
|
|
writeln;
|
|
|
|
|
end.
|
