WorksheetsМасив. Створення, сума, пошук (Lazarus)
Total questions: 12
Worksheet time: 16mins
Яким службовим словом в програмі позначається масив?
array
const
button
memo
Який об'єкт використовують в програмі Lazarus для введення та виведення масиву?
array
const
button
memo
Яка команда використовується при заповнені масиву випадковими цілими числами в межах 40?
randomize
const
random (40)
random
array
Який елемент є корисним для введення та виведення як лінійних масивів, так і двовимірних?
Підказка: він міститься на вкладці Additional.
StringGrid
Edit
TPanel
TShape
На малюнку зображено розв'язок задачі. Знайдіть умову цієї задачі.
Від'ємні елементи масиву А замінити числом 25.
Знайти добуток всіх елементів масиву А[1..N].
Знайти суму додатних елементів масиву A[1..N].
Елементи масиву А, що мають парні індекси, замінити нулем.
На малюнку зображено розв'язок задачі. Знайдіть умову цієї задачі.
Від'ємні елементи масиву А замінити числом 25.
Знайти добуток всіх елементів масиву А[1..N].
Знайти суму додатних елементів масиву A[1..N].
Визначити індекс найбільшого числа в масиві А[1..N].
На малюнку зображено розв'язок задачі. Знайдіть умову цієї задачі.
Від'ємні елементи масиву А замінити числом 25.
Знайти добуток всіх елементів масиву А[1..N].
Знайти суму додатних елементів масиву A[1..N].
Визначити кількість додатних елементів масиву А.
Яким елементом у середовищі Lazarus можна задати багаторядкове текстове поле?
Memo
Edit
Button
Label
Які значення властивостей задані для елемента StringGrid, зображеного на рисунку?
(виберіть декілька правильних варіантів)
StringGrid1.RowCount = 4
StringGrid1.FixedRows = 1
StringGrid1.FixedCols = 0
StringGrid1.ColCount = 6
Що виконує дана програма?
begin
a[i]:= StrToInt(Memo1.Lines[0]);
for i:=1 to 15 do
a[i+1]:= StrToInt(Memo1.Lines[i]);
end;
Вводить 16 елементів до поля Мемо1
Вводить 15 елементів до поля Мемо1
Рахує кількість елементів у полі Мемо1
Виводить суму 15 елементів з поля Мемо1
Що виконує даний фрагмент програми?
procedure TForm1.Button1Click(Sender:
TObject);
begin
s:=0;
a[i]:= StrToInt(Memo1.Lines[0]);
for i:=1 to 9 do
begin
a[i+1]:= StrToInt(Memo1.Lines[i]);
S:=S+a[i];
end;
edit1.Text:=IntToStr(S);
end;
Рахує кількість додатніх елементів масиву
Рахує додатні елементи масиву
Рахує суму елементів масиву
Рахує кількість парних елементів масиву
Як називається елемент 2 ?
Edit1
StringGrid1
Memo1
Button1
