Завдання #1
Запитання:
Який оператор відповідає поданій блок-схемі?
Тести оператор розгалуження
Виберіть один з 4 варіантів відповіді:
1) If A<5 Then A := A-1 Else A := A+1;
2) If A<5 Then A := A+1;
3) If A<5 Then A := A+1 Else A := A-1;
4) If A<5 Then A := A-1;
Завдання #2
Запитання:
Який оператор відповідає поданій блок-схемі?
Тести оператор розгалуження 2
Виберіть один з 4 варіантів відповіді:
1) If A<5 Then A := A-1 Else A := A+1;
2) If A<5 Then A := A+1;
3) If A<5 Then A := A+1 Else A := A-1;
4) If A<5 Then A := A-1;
Завдання #3
Запитання:
Який оператор реалізує дію:
Змінній К: Boolean присвоїти значення True, якщо числа А, В, С упорядковані за зростанням, і значення False в протилежному випадку?
Виберіть декілька з 4 варіантів відповіді:
1) K := (A < B) And (B < C);
2) K := (A < B) Or (B < C);
3) If (A < B) And (B < C) Then K := True Else K := False;
4) If (A < B< C) Then K := True Else K := False;
Завдання #4
Запитання:
Який оператор реалізує дію:
Якщо А – від’ємне число, змінити його знак на протилежний.
Виберіть декілька з 4 варіантів відповіді:
1) If A < 0 Then A := Abs(A);
2) If A < 0 Then A := -A; 3) If A > 0 Then A := -A;
4) If A < 0 Then A := -A Else A := 0; Завдання #5 Запитання: Встановіть порядок виконання операторів програми для визначення більшого з трьох чисел а, b, с. Вкажіть послідовність всіх 4 варіантів відповіді: __ 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 варіантів відповіді:
1) Від більшого з чисел А і В відняти менше.
2) Змінній Мах присвоїти значення більшого з чисел А і В.
3) Якщо ціле число А парне, поділити його на 2.
4) Якщо ціле число А парне, поділити його на 2, в протилежному випадку помножити на 10.
__ If A mod 2 = 0 Then A := A div 2 Else A := 10*A;
__ If A mod 2 = 0 Then A := A div 2;
__ If A > B Then A := A-B Else B := B-A;
__ If A > B Then Мах := A Else Мах:= B;
Завдання #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;
{…}
Запишіть число:
___________________________
Умаляю треба відповідь на всіі питання
275
276
Ответы на вопрос:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ЦветокЛотоса23.02.2020 18:31
-
MrMixa00807.01.2023 21:11
-
rtydykov18.01.2023 13:58
-
Sofwork22.05.2022 17:18
-
stic2016Аринааа13.12.2022 07:28
-
bogodist6830.05.2021 00:04
-
ninja2005xxx19.05.2023 17:25
-
HGRM10.04.2023 04:02
-
ealembi503.03.2023 03:44
-
zozoshcka1724.01.2023 22:04
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.