Главная / Программирование /
Язык программирования Perl / Тест 4
Язык программирования Perl - тест 4
Упражнение 1:
Номер 1
Что такое терм?
Ответ:
 (1) символ "точка с запятой", заканчивающий предложение 
 (2) литерал или переменная, выступающая операндом в выражении 
 (3) простое предложение (оператор) 
Номер 2
Чем в синтаксисе Perl является "точка с запятой"?
Ответ:
 (1) символом, разделяющим два предложения 
 (2) символом, превращающим выражение в предложение 
 (3) символом начала комментария  
Номер 3
Чем является голый блок?
Ответ:
 (1) последовательностью предложений в фигурных скобках 
 (2) циклом, выполняющимся один раз 
 (3) операндом в выражении 
Номер 4
Что такое прагма?
Ответ:
 (1) указание компилятору выполнить действия или установить режим 
 (2) все, что может служить операндом в выражении 
 (3) непосредственная запись данных в программе 
Упражнение 2:
Номер 1
Какая запись условного оператора корректна в Perl?
Ответ:
 (1) if $a >= $b then $x = 0;
 
 (2) if ($a >= $b) $x = 0;
 
 (3) if ($a >= $b) { $x = 0; }
 
Номер 2
Как можно задать условное выполнение действий?
Ответ:
 (1) оператором if-elsif-else
 
 (2) оператором unless-elsif-else
 
 (3) оператором switch
или do-case
 
 (4) условным выражением типа or
или and
 
 (5) модификатором if
или unless
 
Номер 3
Какое из этих условных предложений правильное?
Ответ:
 (1) if ($x != 0) { $z = $y / $x ; } elsif { $z = 0; }
 
 (2) until ($x != 0) { $z = $y / $x ; } else { $z = 0; }
 
 (3) unless ($x == 0) { $z = $y / $x ; } else { $z = 0; }
 
 (4) elsif ($x > 0) { $z = $y / $x ; } else { $z = 0; }
 
Упражнение 3:
Номер 1
Какие из этих циклических конструкций допустимы в Perl?
Ответ:
 (1) do ($n > 0) { print --$n; }
 
 (2) do { print --$n; } until ($n == 0);
 
 (3) until ($n == 0) { print --$n; }
 
 (4) while ($n > 0) { print --$n; }
 
Номер 2
Какой из этих операторов last
недопустим в Perl?
Ответ:
 (1) do { last if $n == 0; $n++; } until ($n == 10);
 
 (2) until ($n == 10) { last if $n == 0; $n++; }
 
 (3) while ($n < 10) { last if $n == 0; $n++; }
 
 (4) for (;$n < 10;) { last if $n == 0; $n++; }
 
 (5) { last if $n == 10; $n++; redo; }
 
Номер 3
Какие из этих циклов for
неправильно оформлены?
Ответ:
 (1) for ($i = 0; $i < 10; $i++) { }
 
 (2) $i = 0; for {; $i < 10; $i++} { }
 
 (3) for ($i = 0; $i < 10;) { $i++; }
 
 (4) $i = 0; for (;$i < 10;) { $i++; }
 
 (5) $i = 0; for (;++;) { last if $i == 10; $i++; }
 
Упражнение 4:
Номер 1
укажите предложения с условными модификаторами
Ответ:
 (1) if ($x != 0) { $z = $y / $x }
 
 (2) ($z = $y / $x) if $x != 0;
 
 (3) $z = $y / $x if ($x != 0);
 
 (4) $z = $y / $x; if ($x != 0) {}
 
 (5) do { $z = $y / $x } if ($x != 0);
 
 (6) $z = do { $y / $x } if $x != 0;
 
Номер 2
Какие ключевые слова могут применяться в модификаторах выражений?
Ответ:
 (1) do
 
 (2) foreach
 
 (3) if
 
 (4) unless
 
Номер 3
Какие ключевые слова не применяются в модификаторах выражений?
Ответ:
 (1) eval
 
 (2) redo
 
 (3) until
 
 (4) use
 
 (5) while
 
Упражнение 5:
Номер 1
Что делает конструкция do
с блоком?
Ответ:
 (1) выполняет блок в цикле 
 (2) превращает блок в выражение  
 (3) выполняет блок, изолируя возможные ошибки 
Номер 2
Что делает конструкция eval
с блоком?
Ответ:
 (1) выполняет блок в цикле 
 (2) выполняет блок при заданном условии 
 (3) выполняет блок, изолируя возможные ошибки выполнения 
Номер 3
Что делает конструкция eval
с выражением?
Ответ:
 (1) вычисляет значение выражения, изолируя ошибки выполнения 
 (2) вычисляет значение выражения при заданном условии 
 (3) вычисляет значение выражения в цикле 
Упражнение 6:
Номер 1
Какие операторы выхода из цикла допустимы в Perl?
Ответ:
 (1) break
 
 (2) goto
 
 (3) last
 
Номер 2
Какие операторы повторения цикла допустимы в Perl?
Ответ:
 (1) continue
 
 (2) redo
 
 (3) next
 
Номер 3
Какой оператор перехода имеется в Perl?
Ответ:
 (1) break
 
 (2) goto
 
 (3) continue