Главная / Программирование /
Visual Basic / Тест 2
Visual Basic - тест 2
Упражнение 1:
Номер 1
Используя полный синтаксис условной инструкции If…Then…Else
создать пример нахождения минимального из двух значений а1
и а2
Ответ:
 (1) If a1 = a2 Then Min = a2 Else: Min = a1 End If
 
 (2) If a1 < a2 Then Min = a2 Else Min = a1 End If
 
 (3) If a1 < a2 Then Min = a1 Else: Min = a2 End If
 
Номер 2
Используя краткий синтаксис условной инструкции If...Then...Else
создать пример нахождения максимального из двух значений b1
и b2
Ответ:
 (1) If b1 > b2 Then Max = b1 Else: Max = b2 End If
 
 (2) If b1 < b2 Then Max = b2 Else: Max = b1 End If
 
 (3) If b1 < b2 Then Max = b1 Else Max = b2 End If
 
Номер 3
Какое из утверждений является верным?
Ответ:
 (1) условная инструкция If…Then…Else
обеспечивает единственый выбор 
 (2) наличие ElseIf
позволяет анализировать дополнительные условия 
 (3) Else
используется для обработки противоположных ситуаций 
 (4) если нужно проверять некоторое условие при наличии другого условия, то используются вложенные инструкции 
Упражнение 2:
Номер 1
Создать массив целых (использовать цикл For…Next
) из 40 элементов; m(i) = i^4 + 11
Вычислить сумму первых 28 элементов. Выбрать правильный ответ
Ответ:
 (1) 2721819 
 (2) 3142370 
 (3) 3098566 
Номер 2
Создать массив целых (использовать цикл For…Next
) из 30 элементов; m(i) = i^3 + 15
. Вычислить сумму первых 18 элементов. ация массива начинается с 0. Выбрать правильный ответ
Ответ:
 (1) 23679 
 (2) 18981 
 (3) 23765 
Номер 3
Создать массив целых (использовать цикл For…Next
) из 21 элементов; m(i) = i^2 + 17, i=0,...20
Вычислить сумму последних 15 элементов. Выбрать правильный ответ
Ответ:
 (1) 3528 
 (2) 3070 
 (3) 3112 
Упражнение 3:
Номер 1
Создать массив целых (использовать цикл For…Next
) из 21 элемента; m(i) = i^3 + 17
. Вычислить сумму первых 16 элементов. Выбрать правильный ответ
Ответ:
 (1) 13984 
 (2) 14526 
 (3) 14672 
Номер 2
Создать масив случайных вещественных чисел m(i) = Rnd()
. Использовать инструкцию Randomize(3)
. (Инструкция Randomize(number)
использует некоторое число для инициализации генератора случайных чисел функции Rnd()
). Сравнить, равны ли с точностью 0,001 элемент m(1)
и число 0.859
Ответ:
 (1) False 
 (2) True 
Номер 3
Создать массив данных типа String
из 20 элементов; m(i) = Chr(97 + i)
Является ли символ "g" элементом массива?
Ответ:
 (1) False 
 (2) True 
Упражнение 4:
Номер 1
В каком случае используется цикл Do Until…Loop
с завершением:
Ответ:
 (1) если цикл продолжает повторяться все время, пока некоторое условие остается истинным 
 (2) если вместо условия продолжения вычислений формулируется условие его завершения 
Номер 2
Создать массив из 50 элементов m(i) =i
Вычислить сумму его элементов с использованием Do While…Loop и Do Until…Loop
Ответ:
 (1) сумма есть 1195 
 (2) сумма есть 1275 
Номер 3
Создать массив из 5 целых m(i) = i^2
. Вычислить сумму, используя Do While…Loop
и Do Until…Loop
. Как формулируется условие для Do While
и для Do Until
?
Ответ:
 (1) Do While i > 5
 
 (2) Do While i < 5
 
 (3) Do While i < 6
 
 (4) Do Until i = 5
 
 (5) Do Until i = 6
 
Упражнение 5:
Номер 1
Какие из записей при использовании структуры выбора Select Case
являются верными?
Ответ:
 (1) Case Is > 0
 
 (2) Case = 0
 
Номер 2
Какие из записей при использовании структуры выбора Select Case
являются верными?
Ответ:
 (1) Case Is > "c"
 
 (2) Case [a – d]
 
 (3) Case RED
 
Номер 3
Какие из записей при использовании структуры выбора Select Case
являются верными?
Ответ:
 (1) Case "Madrid"
 
 (2) Case Is = 2
 
 (3) Case 1a
 
Упражнение 6:
Номер 1
Отметить, где правильно проводится вызов процедуры Proc1
?
Ответ:
 (1) If k > 70 Then Proc1
 
 (2) Call Proc1(20, 15)
 
Номер 2
Отметить, где правильно проводится вызов процедуры Proc1
?
Ответ:
 (1) Call Proc1 21, 32
 
 (2) Call Proc1
 
Упражнение 7:
Номер 1
Какая из процедур Property
присваивает значение свойству?
Ответ:
 (1) Property Let
 
 (2) Property Get
 
Номер 2
Синтаксис вызова какой из процедур Property
представлен здесь:
Переменная = [объект].свойство
?
Ответ:
 (1) Property Let
 
 (2) Property Get
 
Номер 3
Описание какой из процедур Property
дано ниже:
Property имя_процедуры() As тип_данных
Ответ:
 (1) Property Let
 
 (2) Property Get
 
Упражнение 8:
Номер 1
Что возвращает выражение:
Chr(Asc(ch) + 1)
здесь Dim ch As String ch = "kk"
Ответ:
 (1) значение типа Integer
, представляющее код символа  
 (2) значение типа String
, содержащее символ,
соответствующий указанному коду 
Номер 2
Что возвращает выражение:
Chr(Asc(ch1) + 2)
здесь Dim ch1 As String
Ответ:
 (1) значение типа Integer
, представляющее код символа 
 (2) значение типа String
, содержащее символ,
соответствующий указанному коду 
Номер 3
Что возвращает выражение:
Asc(ch1)
здесь Dim ch1 As String
Ответ:
 (1) значение типа Integer
, представляющее код символа  
 (2) значение типа String
, содержащее символ,
соответствующий указанному коду 
Упражнение 9:
Номер 1
Каков должен быть вывод в поле списка элементов массива, элемент которого определяется как: m(j) = Int(Rnd*1000)
, сформированного в процедуре For … Next (j =1 To 25)
Ответ:
 (1) List1.List(j) = m(j)
 
 (2) List1.List(j – 1) = m(j)
 
 (3) m(j) = List1.List(j)
 
Номер 2
Где должны быть присвоены значения переменной х1
для обеспечения старта процедуры Private Sub Timer1_Timer():
Image1.Left = Int(80*Rnd()*x1)
End Sub
Ответ:
 (1) в процедуре Timer1_Timer()
 
 (2) в любой процедуре проекта 
Номер 3
Где соблюден синтаксис использования метки?
Ответ:
 (1) Label44 = "Spanien"
 
 (2) Label44.Caption = "Spanien"
 
Упражнение 10:
Номер 1
Функция Fac
вычисляет значение факториала числа. Какая инструкция является правильной?
Ответ:
 (1) x = Fac(Val(Text1.Text))
 
 (2) x = Fac(Text1.Text)
 
Номер 2
Может ли инструкция If…Then…Else
реализовать:
Ответ:
 (1) единственный выбор 
 (2) двойной выбор 
 (3) множественный выбор 
Номер 3
Куда попадает элемент массива mass(1)
после выполнения фрагмента:
For j =1 To 5
List1(1).List(j-1) = mass(j)
…
Next
Ответ:
 (1) в нулевой элемент массива списка на 1 позицию списка 
 (2) в первый элемент массива списка на 1 позицию списка 
 (3) в первый элемент массива списка на нулевую позицию списка