Конструктор тестів
- Всеосвіта›
- Бібліотека тестів›
- Інформатика›
- 8 клас Вказівка розгалуження Lazarus
Тест:
8 клас Вказівка розгалуження Lazarus
22.01.2021
Вміст тесту:
1
2
3
4
5
6
7
8
1
1 з 16 балів
Який оператор відповідає поданій блок-схемі?
2
1 з 16 балів
Який оператор відповідає поданій блок-схемі?
3
2 з 16 балів
Який оператор реалізує дію:
Змінній К: Boolean присвоїти значення True, якщо числа А, В, С упорядковані за зростанням, і значення False в протилежному випадку?
4
2 з 16 балів
Який оператор реалізує дію:
Якщо А - від’ємне число, змінити його знак на протилежний.
5
4 з 16 балів
Встановіть порядок виконання операторів програми для визначення більшого з трьох чисел а, b, с.
If c > max Then max := c;
Edit4.Text := IntToStr(max);
If a > b Then Мax := a Else Мax := b;
a := StrToInt(Edit1.Text); b := StrToInt(Edit2.Text); c := StrToInt(Edit3.Text);
6
4 з 16 балів
Встановіть відповідність між операторами і діями, які вони реалізують
1
If A > B Then Мах := A Else Мах:= B;
А
Якщо ціле число А парне, поділити його на 2, в протилежному випадку помножити на 10.
2
If A mod 2 = 0 Then A := A div 2 Else A := 10*A;
Б
Змінній Мах присвоїти значення більшого з чисел А і В.
3
If A mod 2 = 0 Then A := A div 2;
В
Від більшого з чисел А і В відняти менше.
4
If A > B Then A := A-B Else B := B-A;
Г
Якщо ціле число А парне, поділити його на 2.
7
1 з 16 балів
Визначте, якого значення набуває змінна В після виконання фрагмента програми.
var A, B: Integer;
begin
A := 10; B := 5;
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;
8
1 з 16 балів
Визначте, якого значення набуває змінна А після виконання фрагмента програми.
var A, B: Integer;
begin
A := 5; B := 1;
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;
Рефлексія від 64 учнів
Сподобався:
0
Так: 45
Ні: 19
Зрозумілий:
0
Так: 41
Ні: 23
Потрібні роз'яснення:
0
Ні: 47
Так: 17