Вариант 2: операторы: if и case
Вариант 3: краткая и полная формы условного оператора if
Вариант 4: оператор выполнения цикла по условию и оператор if
Вопрос 55. Могут ли операторы if быть вложенными?
Вариант 1: да, могут; в этом случае последнее " else" относится к ближайщему незанятому " if"
Вариант 2: нет, не могут
Вариант 3: не уверен
Вариант 4: не знаю
Вопрос 56. Какое по типу выражение вычисляется в условии оператора if ?
Вариант 1: числовое
Вариант 2: логическое выражение; тип boolean ; имеет значения: true или false
Вариант 3: неравенство
Вариант 4: равенство
Вопрос 57. Логическое выражение
(N Mod 10 Mod 2) Or (N Div 10 Mod 10 Mod 2 = 0) Or (N Div 100 Mod 2 = 0)
должно принимать значение TRUE тогда и только тогда, когда истинно высказывание
1) в трёхзначном натуральном числе все цифры чётные;
2) в трёхзначном натуральном числе одна чётная цифра;
3) в трёхзначном натуральном числе две чётных цифры;
В трёхзначном натуральном числе хотя бы одна чётная цифра;
5) в трёхзначном натуральном числе нет чётных цифр.
Вопрос 58. Ошибку "Structure too large" (структура превышает максимально допустимый объём статической памяти) вызовет описание
1) Type Vector = Array[Byte] Of Integer; Var C : Array[1..10] Of Vector;
2) Var T : File Of String;
3) Type A = Record S : String; A, B, C : Array[10..20] Of Real End;
Var M : Array[1..5, 1..8] Of A;
4) Var K : Array [Byte, Byte] Of String[6];
5) Var S : Array[–10000..10000] Of Sring[2].
Вопрос 59. К процедурам для работы с динамическими переменными не относится
|
|
|
1) Mark;
2) New;
3) Release;
Seek;
5) Dispose.
Вопрос 60. Имеется описание
Type A = Array[0..100] Of Real; B = ^A; Var M : Array[1..5] Of B;
Для хранения массива M необходим объём памяти (байт)
1) 606; 2) 4; 3) 20; 4) 12120; 5) 6.
Вопрос 61. Фрагмент программы
K := 0;
While Not Eof(F) Do
Begin ReadLn(F, S); I := 1;
While I <= Length(S) Do
Begin If S[I] In ['А'..'Я', 'а'..'п', 'р'..'я']
Then Begin K := K + 1;
Delete(S, I, 1); I := I – 1
End;
I := I + 1
End
End;
выполняет следующее действие:
1) удаляет из текстового файла F все русские буквы;
Определяет в текстовом файле количество символов, являющихся русскими буквами;
3) определяет в текстовом файле количество символов, не являющихся русскими буквами; 4) определяет в текстовом файле количество символов;
5) удаляет из текстового файла F все символы, не являющиеся русскими буквами.
Вопрос 62. В фрагменте программы (здесь Var F : File Of Integer; I, K, Vsp : Integer;)
Reset(F); K := FileSize(F) – 1;
For I := 0 To K Do
Begin Seek(F, I); Read(F, Vsp); Seek(F, FileSize(F)); Write(F, Vsp) End;
выполняется
|
|
|
1) сортировка файла;
2) изменение порядка следования элементов на обратный;
Дописывание в конец исходного файла полную его копию с сохранением порядка следования элементов;
4) дописывание в конец исходного файла полную его копию с изменением порядка следования элементов на противоположный;
5) не выполняется никаких действий по изменению файла.
Вопрос 63. Имеется описание
Type Dn = (pn, vt, sr, cht, ptn, sb, vs); Mn = Set Of Dn; Var V : Mn;
и фрагмент программы
V := [pn..ptn] * [sr, ptn..vs] – [sb];
После исполнения этого фрагмента переменная V имеет значение
1) [pn..vs];
2) [sr, ptn];
3) [sb];
4) [pn..ptn].
Вопрос 64. Алгоритм какого типа изображен на блок-схеме?
1) циклический;
2) разветвляющийся; 3
) вспомогательный;
4) линейный;
5) комбинация развилки и цикла.
Вопрос 65. После исполнения фрагмента программы, изображенного на блок-схеме,
при A = 5, B = 4 значение X будет равно
1) 20;
2) 9;
3) 5;
4) 4;
5) 1.
Вопрос 66. В приведенном фрагменте программы (N типа LongInt, N > 0)
P := 1;
While P <= N Do
Begin
Left := N Div (P * 10) * (P * 10);
Right := N Mod P;
K := ((N Mod (P * 10) Div P + 1) Mod 10) * P;
N := Left + K + Right; P := P * 10
End;
|
|
|
натуральное число N изменяется по следующему правилу
1) не изменяется;
2) в каждый разряд прибавляется 1;
3) из каждого разряда вычитается 1;
4) в каждый разряд прибавляется 1, если значение в разряде — не девять, иначе заменяется на нуль;
5) каждая девятка в десятичной записи числа заменяется на нуль.
Вопрос 67. Цикл с предусловием выполняется так:
1) выполняется тело цикла, изменяется параметр цикла, проверяется условие продолжения выполнения цикла;
2) изменяется параметр цикла, проверяется условие продолжения выполнения цикла, выполняется тело цикла;
3) проверяется условие продолжения выполнения цикла, выполняется тело цикла;
4) тело цикла выполняется N раз (N — натуральное);
5) определяется, сколько раз должен быть выполнен цикл, и далее цикл с предусловием сводится к циклу с параметром.
Вопрос 68. В текстовом файле каждая строка заканчивается
1) числами 10 и 13; 2) символами с кодами 10 и 13; 3) символом с кодом 13; 4) числом 0; 5) символом с кодом 10.
Вопрос 69. Процедуры ReadLn и WriteLn можно использовать при работе с
1) типизированными файлами;
2) нетипизированными файлами;
3) типизированными и нетипизированными файлами;
Текстовыми файлами;
5) любыми файлами.
|
|
|
Вопрос 70. Значение выражения
Ord(x > y) + Ord(Ord(z = 'F'))
при x = 7, y = 0, z = 'F' равно
1) TRUE;
2) FALSE;
3) 0;
4) 1;
5) 2.
Вопрос 71. Идентификатор в Turbo Pascal не может начинаться с
1) латинской буквы;
2) заглавной латинской буквы;
Цифры;
4) знака подчёркивания;
5) латинской буквы, а затем знака подчёркивания.
Вопрос 72. В приведенном фрагменте программы (First — ссылка на первый элемент списка; список объявлен следующим образом: Type SS = ^List; List = Record A : LongInt; Next : SS End;)
P := First; S := 0; While Not (P = Nil) Do Begin S := S + 1; P := P^.Next End;
определяется
1) первый элемент списка;
2) сумма элементов списка;
3) сумма первого и последнего элементов списка;
Количество элементов списка;
5) количество звеньев списка, где указатель на следующее звено не Nil.
Вопрос 73. При исполнении фрагмента программы
Var C : Integer;
Procedure R1(Var A : Integer; C : Boolean);
Procedure R2;
Var C : String;
Begin A := 1 End;
Begin C := True; R2 End;
Begin C := 100; R1(C, False); WriteLn(C) End.
будет напечатано значение переменной C
1) True;
2) 1;
3) 100;
4) неизвестно что, поскольку значение переменной C не определено;
5) False.
Вопрос 74. Цикл в фрагменте программы
P := 4; Repeat P := P * 0.1 Until P < 0.0001;
будет исполнен
1) 0 раз;
2) 1 раз;
3) 4 раза;
Раз;
5) бесконечное число раз.
Вопрос 75. Кодируется шестнадцатибитовое целое со знаком (тип Integer). 11111111111100002 — это код числа
1) –15;
2) 15;
3) 16;
4) –16;
5) –30000.
Вопрос 76. Свойством алгоритма является
Результативность;
2) цикличность;
3) возможность изменения последовательности выполнения команд;
4) возможность выполнения алгоритма в обратном порядке;
5) простота при записи на языках программирования.
Вопрос 77. Из перечисленных ниже в программе обязателен
1) раздел Var;
2) раздел Const;
3) раздел Type;
4) раздел Label;
5) раздел Begin … End.
Вопрос 78. Ввод данных — это
1) процесс передачи данных из оперативной памяти на внешний носитель;
2) процесс ввода с клавиатуры каких-либо значений;
Дата добавления: 2020-12-12; просмотров: 259; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!