Главное меню
Каталог
13212
13212
Главная
Скачать
Статьи
Контакты
FAQ
Соглашение
Поиск
Вход
Регистрация
VIP - доступ
Организация выбора в языке Паскаль
Проверка знаний по теме "Организация выбора в программах на языке Паскаль" - назначение, принцип работы, структура оператора в теле программы.
Информатика 10 класс | Автор: Чиримпей Е.Е. | ID: 16369 | Дата: 22.2.2022
0 0
Помещать страницу в закладки могут только зарегистрированные пользователи
Зарегистрироваться
Вопрос № 1

Какой оператор позволяет выбрать группу действий из произвольного числа имеющихся вариантов?

IF ... THEN ... ELSE
CASE ... OF ... ELSE ... END
REPEAT ...UNTIL ...
FOR ... TO ... DO
WHILE ... DO ...
Вопрос № 2

Какой оператор позволяет выбрать одну из двух альтернатив?

CASE ... OF ... ELSE ... END
REPEAT ...UNTIL ...
WHILE ... DO ...
IF ... THEN ... ELSE
Вопрос № 3

Дана программа:

program Day_Week;
var Day: byte;
begin
Write (`Введите номер дня недели (от 1 до 7) :`);
Readln (Day);
case Day of
1: Writeln (`Понедельник`);
2: Writeln (`Вторник`);
3: Writeln (`Среда`);
4: Writeln (`Четверг`);
5: Writeln (`Пятница`);
6: Writeln (`Суббота`);
else
Writeln (`Воскресенье`);
end;
end.
Укажите выражение-селектор оператора выбора

Введите ответ:
Вопрос № 4

Дана программа, в которой не хватает строки. Напишите пропущенную строку.

program Day_Week;
var Day: byte;
begin
Write (`Введите номер дня недели (от 1 до 7) :`);
Readln (Day);
1: Writeln (`Понедельник`);
2: Writeln (`Вторник`);
3: Writeln (`Среда`);
4: Writeln (`Четверг`);
5: Writeln (`Пятница`);
6: Writeln (`Суббота`);
else
Writeln (`Воскресенье`);
end;
end.
Укажите первую строку блочного оператора выбора

Введите ответ:
Вопрос № 5

К каким типам данных может относиться значение выражения-селектора?

булевскому
литерному
пользовательскому
вещественному
Вопрос № 6

При использовании оператора выбора case должны .выполняться следующие правила:

Значения выражения-селектора должны принадлежать вещественному типу
Значения выражения-селектора должны принадлежать дискретному типу
Для целого типа выражения-селектора его значения должны лежать в диапазоне integer
Все константы, предшествующие операторам альтернатив, должны иметь тип, совместимый с типом выражения-селектора
Константы, предшествующие операторам альтернатив, могут иметь разный тип
Все константы в альтернативах должны быть уникальны в пределах оператора варианта (т. е. повторения констант в альтернативах не допускаются)
Константы в альтернативах могут повторяться в пределах оператора варианта
Диапазоны не должны пересекаться и не должны содержать констант, указанных в данной или других альтернативах
Константы в разных диапазонах могут повторяться
Вопрос № 7

Какого типа селектор имеет приведенная форма записи оператора выбора:
case I of
1..10 : Writeln (`число `, I:4, ` в диапазоне 1 - 10`);
11..20 : Writeln (`число `, I:4, ` в диапазоне 11 - 20`);
21.. 30 : Writeln (`число `, 1:4, ` в диапазоне 21 - 30 `)
else Writeln (`число`, I:4, ` вне пределов контроля`)
end;

Целочисленного
Вещественного
Интервального
Перечисляемого
Булевского
Символьного
Вопрос № 8

Какого типа селектор имеет приведенная форма записи оператора выбора:
case I of
1: Z := I + 10;
2: Z := I + 100;
3: Z := I + 1000
end;

Вещественного
Целочисленного
Перечисляемого
Булевского
Интервального
Символьного
Вопрос № 9

Какого типа селектор имеет приведенная форма записи оператора выбора:
var
Season: (Winter, Spring, Summer, Autumn);
begin

case Season of
Winter : Writeln (`Winter`);
Spring : Writeln (`Spring`);
Summer : Writeln (`Summer`);
Autumn : Writeln (`Autumn`)
end;
end;

Булевского
Интервального
Перечисляемого
Целочисленного
Вещественного
Символьного
Вопрос № 10

Дана программа, в которой не хватает строки. Напишите пропущенную строку.
program Cifra;
begin
Readln (Chis);
Case Chis of
0: Writeln(`Ноль`);
1,3,5,7,9: Writeln(`Нечетное`);
2,4,6,8: Writeln(`Четное`)
else
Writeln(`Не цифра`);
end;
end.

Введите ответ:
Вопрос № 11

Дана программа. Каков будет результат на выходе, если ввести значение N=8?
Program razniza;
Var N: integer;
Begin
Write (`Введите число от 1 до 10 :`);
Readln (N);
Case N of
1, 2, 5: writeln (`a`);
7 .. 10: writeln (`b`);
end;
end.

1, 2, 5
a
7 .. 10
b
результата не будет
Вопрос № 12

Дана программа. Каков будет результат на выходе, если ввести значение N=3?
Program razniza;
Var N: integer;
Begin
Write (`Введите число от 1 до 10 :`);
Readln (N);
Case N of
1, 2, 5: writeln (`a`);
7 .. 10: writeln (`b`);
end;
end.

1, 2, 5
a
7 .. 10
b
3, 4
результата не будет
Получение сертификата
о прохождении теста
Доступно только зарегистрированным пользователям