Учеба и наука

Опишите функции, выполняемые данной программой: var Form1: TForm1; a: array [0..4] of String; n,i:integer; procedure TForm1.Button1Click(Sender: TObject); - вопрос №3428234


begin
for i=0 to 4 do
a [i]:=(Memo1.lines[i]);
n:=Random(5);
Label2.Caption:=a[n];
end;
end.

сентябрь 8, 2019 г.

  • Всего ответов: 1

  • HFS - аватарка

    HFS

    5-й в

    присваивает метке Label2, на форме Form1, случайное текстовое значение из списка Memo1

    сентябрь 8, 2019 г.

Похожие вопросы

Решено

Ответьте на вопросы, используя графики функций:

Вопрос задан анонимно май 1, 2024 г.

Учеба и наука