Конструктор тестів
- Всеосвіта›
- Бібліотека тестів›
- Інформатика›
- Алгоритми з розгалуженнями для опрацювання величин.
Тест:
Алгоритми з розгалуженнями для опрацювання величин.
05.03.2023
Вміст тесту:
1
2
3
4
5
6
7
1
1 з 15 балів
Який оператор відповідає поданій блок-схемі?
2
1 з 15 балів
Який оператор відповідає поданій блок-схемі?
3
2 з 15 балів
Який оператор реалізує дію:
Змінній К: Boolean присвоїти значення True, якщо числа А, В, С упорядковані за зростанням, і значення False в протилежному випадку?
4
2 з 15 балів
Який оператор реалізує дію:
Якщо А - від’ємне число, змінити його знак на протилежний.
5
4 з 15 балів
Встановіть порядок виконання операторів програми для визначення більшого з трьох чисел а, b, с.
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);
6
4 з 15 балів
Встановіть відповідність між операторами і діями, які вони реалізують
1
If A mod 2 = 0 Then A := A div 2 Else A := 10*A;
А
Від більшого з чисел А і В відняти менше.
2
If A mod 2 = 0 Then A := A div 2;
Б
Змінній Мах присвоїти значення більшого з чисел А і В.
3
If A > B Then A := A-B Else B := B-A;
В
Якщо ціле число А парне, поділити його на 2.
4
If A > B Then Мах := A Else Мах:= B;
Г
Якщо ціле число А парне, поділити його на 2, в протилежному випадку помножити на 10.
7
1 з 15 балів
Визначте, якого значення набуває змінна В після виконання фрагмента програми.
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;
{…}
Рефлексія від 0 учнів
Сподобався:
0
Так: 0
Ні: 0
Зрозумілий:
0
Так: 0
Ні: 0
Потрібні роз'яснення:
0
Ні: 0
Так: 0