Знаходження сум і кількостей значень елементів одновимірного масиву, що відповідають певним умовам (Лазарус)

Тести Інформатика 9 клас Тест
Парило Р.
Додано: 20 квітня 2023
Предмет: Інформатика, 9 клас
Тест виконано: 2055 разів
Домашня робота
В реальному часі
Тестування
Відповідності
Флеш-картки
Роздрукувати
10 запитань
Запитання 1

Виберіть команду, яка дозволяє дані з рядка багаторядкового текстового поля перевести в дійсне число і присвоїти елементу одновимірного масиву 

варіанти відповідей

for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]); 

var a: array [0..9] of real; i: integer; s: real; 

for i := 0 to 9 do s := s + a[i];

Label1.Caption := FloatToStr(s);

Запитання 2

Виберіть команду, яка здійснює додавання до змінної s значення чергового елемента одновимірного масиву

варіанти відповідей

for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]); 

var a: array [0..9] of real; i: integer; s: real; 

for i := 0 to 9 do s := s + a[i];

Label1.Caption := FloatToStr(s);

Запитання 3

Виберіть команду, яка здійснює  виведення результату в напис

варіанти відповідей

for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]); 

var a: array [0..9] of real; i: integer; s: real; 

for i := 0 to 9 do s := s + a[i];

Label1.Caption := FloatToStr(s);

Запитання 4

Виберіть відповідь, де здійснюється оголошення змінних, які використовуються у процедурі

варіанти відповідей

for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]); 

var a: array [0..9] of real; i: integer; s: real; 

for i := 0 to 9 do s := s + a[i];

Label1.Caption := FloatToStr(s);

Запитання 5

Виберіть відповідь, де здійснюється збільшення на 1 значення лічильника, якщо значення чергового елемента одновимірного масиву дорівнює заданому числу

варіанти відповідей

if a[i] = x then k := k + 1;

Label1.Caption := IntToStr(k) + ‘ разів’;

x := StrToFloat(Edit1.Text);

for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]);

Запитання 6

Виберіть відповідь, де здійснюється введення заданого дійсного числа

варіанти відповідей

if a[i] = x then k := k + 1;

Label1.Caption := IntToStr(k) + ‘ разів’;

x := StrToFloat(Edit1.Text);

for i := 0 to 9 do a[i] := StrToFloat(Memo1.Lines[i]);

Запитання 7

Виберіть фрагмент проєкту для визначення, чи є дане число серед значень елементів одновимірного масиву:

варіанти відповідей

k := 0; for i := 1 to 10 do

if a[i] = x then k := k + 1;

f := false;

for i := 1 to 10 do

if a[i] = x then

begin

f := true; break;

end;

max := a[1];

for i := 2 to 10 do

if a[i] > max then max := a[i];

s := 0;

for i := 1 to 10 do s := s + a[i];

Запитання 8

Виберіть фрагмент проєкту для знаходження суми значень всіх елементів одновимірного масиву

варіанти відповідей

k := 0; for i := 1 to 10 do

if a[i] = x then k := k + 1;

f := false;

for i := 1 to 10 do

if a[i] = x then

begin

f := true; break;

end;

max := a[1];

for i := 2 to 10 do

if a[i] > max then max := a[i];

s := 0;

for i := 1 to 10 do s := s + a[i];

Запитання 9

Виберіть фрагмент проєкту для знаходження кількості значень елементів одновимірного масиву, що дорівнюють заданому числу

варіанти відповідей

k := 0; for i := 1 to 10 do

if a[i] = x then k := k + 1;

f := false;

for i := 1 to 10 do

if a[i] = x then

begin

f := true; break;

end;

max := a[1];

for i := 2 to 10 do

if a[i] > max then max := a[i];

s := 0;

for i := 1 to 10 do s := s + a[i];

Запитання 10

Для введення даних в одновимірний масив використовують елемент керування...

варіанти відповідей

Edit

Memo

Label

Button

Створюйте онлайн-тести
для контролю знань і залучення учнів
до активної роботи у класі та вдома

Створити тест