Урок 52. Алгоритми з розгалуженням.

Додано: 2 квітня 2020
Предмет: Інформатика, 8 клас
Тест виконано: 67 разів
7 запитань
Запитання 1

Який оператор відповідає поданій блок-схемі?

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

If A<5 Then A := A-1 Else A := A+1; 

If A<5 Then A := A+1;

If A<5 Then A := A+1 Else A := A-1; 

If A<5 Then A := A-1; 

Запитання 2

Який оператор відповідає поданій блок-схемі?

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

If A<5 Then A := A-1 Else A := A+1; 

If A<5 Then A := A+1; 

If A<5 Then A := A+1 Else A := A-1; 

If A<5 Then A := A-1; 

Запитання 3

Який оператор реалізує дію:

Якщо ціле число А парне, поділити його на 2, в протилежному випадку помножити на 10.

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

If A mod 2 = 0 Then A := A div 2;

If A mod 2 = 0 Then A := A div 2 Else A:=10*A;

If A mod 2 = 0 Then A := A / 2 Else A:=10*A;

If A div 2 = 0 Then A:=A mod 2 Else A:=10*A;

Запитання 4

Який оператор реалізує дію: 

Змінній К: Boolean присвоїти значення True, якщо числа А, В, С упорядковані за зростанням, і значення False в протилежному випадку?

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

K := (A < B) And (B < C); 

K := (A < B) Or (B < C); 

If (A < B) And (B < C) Then K := True Else K := False; 

If (A < B< C) Then K := True Else K := False; 

Запитання 5

Який оператор реалізує дію:

Якщо А - від’ємне число, змінити його знак на протилежний.

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

If A < 0 Then A := Abs(A);

If A < 0 Then A := -A; 

If A > 0 Then A := -A; 

If A < 0 Then A := -A Else A := 0; 

Запитання 6

Для чого використовують даний порядок виконання операторів програми?

a := StrToInt(Edit1.Text); b := StrToInt(Edit2.Text); c := StrToInt(Edit3.Text); 

If a > b Then Мax := a Else Мax := b; 

If c > max Then max := c; 

Edit4.Text := IntToStr(max); 

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

Для визначення більшого з трьох чисел a, b, c.

Для визначення меншого з трьох чисел a, b, c.

Для визначення суми трьох чисел a, b, c.

Для визначення добутку трьох чисел a, b, c.

Запитання 7

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

var A, B, C, Max: Integer;

begin

A := 13; B := 12;

If A > B*B Then B := A-B;

If B > A-1 Then begin B := B-A; 

A:= A-B end

Else begin A := A-B;

B := B-A end;

{…}

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

11

25

1

10

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

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