[Elka123]

Я не совсем понимаю и знаю как написать программу для вывода одномерного массива не консоль , а формы. Напишите пожалуйста код для вывода рандомного заполнения массива .

[Bargest]

Я не совсем понимаю и знаю как написать программу для вывода одномерного массива не консоль , а формы.

[Alegun]

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 a: array of integer;
 i: integer;
begin
 Randomize;
 SetLength(a, Random(10)+10);
 for i := Low(a) to High(a) do a[i]:= Random(10);
end;

Хоть куда вывод-то делать, не ведомо

[lmikle]

Сообщение от Alegun

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 a: array of integer;
 i: integer;
begin
 Randomize;
 SetLength(a, Random(10)+10);
 for i := Low(a) to High(a) do a[i]:= Random(10);
end;

Хоть куда вывод-то делать, не ведомо

Да в Memo1 выведи:

Код:

for i := Low(a) to High(a) do Memo1.Lines.Add(IntToStr(a[i]));