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


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

Ответы

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

Сергей Викторович

от 0 p.
Сейчас на сайте
Читать ответы

Елена Васильевна

от 80 p.
Читать ответы

С.З.Карамов - Excel

от 0 p.
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
1 ответ
12.12.20
Вопрос задан анонимно
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store