Конструктор тестів
- Всеосвіта›
- Бібліотека тестів›
- Інформатика›
- Опрацювання одновимірних масивів (Lazarus)
Тест:
Опрацювання одновимірних масивів (Lazarus)
15.03.2024
Вміст тесту:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
1
1 з 24 балів
Процедура для одновимірного масиву, елементи якого мають номери від 1 до 10, буде виглядати так:
2
1 з 24 балів
Процедура для одновимірного масиву, елементи якого мають номери від 0 до 9, буде виглядати так:
3
1 з 24 балів
Для позначення суми елементів вводиться змінна s.
Якого значення може набувати ця змінна?
4
1 з 24 балів
Для позначення лічильника кількості елементів, які задовільняють умову задачі, вводиться змінна k. Якого значення може набувати ця змінна?
5
1 з 24 балів
var a: array [0..21] of real; i: integer;
Визначте кількість елементів даного масиву
6
1 з 24 балів
Знайдіть рядок без помилок, якщо і - порядковий номер елемента масиву, а масив містить 12 елементів
7
1 з 24 балів
Відмітьте на малюнку компонент, який для даної процедури не потрібний.
procedure TForm1.Button1Click(Sender: TObject);
var a: array [1..10] of real; i: integer;
begin
for i := 1 to 10 do a[i] := StrToFloat(Memo1.Lines[i-1]);
for i := 1 to 10 do a[i] := a[i]*a[i];
Memo2.Clear;
for i := 1 to 10 do Memo2.Lines.Append(FloatToStr(a[i]));
end;
8
5 з 24 балів
Відновіть правильний запис процедури
for i := 0 to 7 do a[i] := StrToInt(Memo1.Lines[i]);
for i := 0 to 7 do a[i] := a[i] + і;
var a: array [0..7] of integer; i: integer;
begin
Memo2.Clear;
for i := 0 to 7 do Memo2.Lines.Append(IntToStr(a[i]));
end;
9
1 з 24 балів
Відмітьте на малюнку компонент, який для даної процедури не потрібний.
Procedure TForm1.Button1Click(Sender: TObject);
var a: array [0..9] of real; i: integer; s: real;
begin
for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]);
s := 0;
for i := 0 to 9 do s := s + a[i];
Label1.Caption := FloatToStr(s);
end;
10
1 з 24 балів
Серед введених змінних оберіть ті, що є цілими числами.
var a: array [0..9] of real; i, k: integer; s, m: real;
11
1 з 24 балів
Серед введених змінних оберіть ті, що можуть не бути цілими числами.
var a: array [0..9] of real; i, k: integer; s, m: real;
12
2 з 24 балів
Вкажіть на правильно записані оператори для масиву з 15 елементів
13
3 з 24 балів
Які компоненти необхідно було створити для даної процедури?
procedure TForm1.Button1Click(Sender: TObject);
var a: array [1..10] of real; i: integer;
begin
for i := 1 to 10 do a[i] := StrToFloat(Memo1.Lines[i-1]);
for i := 1 to 10 do a[i] := a[i]*a[i];
Memo2.Clear;
for i := 1 to 10 do Memo2.Lines.Append(FloatToStr(a[i]));
end;
14
1 з 24 балів
Скільки елементів містить даний масив?
var a: array [0..19] of real; i, k: integer;
15
1 з 24 балів
Скільки елементів містить даний масив? Відповідь запишіть числом
var a: array [1..19] of real; i, k: integer;
16
1 з 24 балів
Якою змінною позначено порядковий номер елемента масиву?
var a: array [0..19] of real; i: integer;
17
1 з 24 балів
Знайдіть запис із помилкою
Рефлексія від 4 учнів
Сподобався:
0
Так: 2
Ні: 2
Зрозумілий:
0
Так: 2
Ні: 2
Потрібні роз'яснення:
0
Ні: 2
Так: 2