[Kopik]

Чувствую, этот вопрос уже не раз поднимался, но...
Есть задача разбить отрезок на N частей с шашом h и записать его значения в массив x[i]=x[i-1]+h*N;

Но потом в задании указано, чтобы N задавалось на форме. Получается, я уже не задам массив как
var x[i]: array [1..20] of real;
ведь N произвольное. Как задавать количество элементов уже в процессе выолнения?

[Страдалецъ]

Если вопрос только по работе с динамическим массивом, то так:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13

Var  A: Array of Real;  ArrSize,i: Integer; begin  ArrSize := 20;  SetLength(A, ArrSize);  for i := 0 to ArrSize  do A[i] := Random(10);  ArrSize := 40;  SetLength(A, ArrSize);  for i := 0 to ArrSize  do A[i] := Random(10); end;

[Kopik]

Сообщение от Страдалецъ

Если вопрос только по работе с динамическим массивом, то так:

Код:

Да, спасибо большое.