Тесты по Visual Basic

@romalex · Регистрация: 08.05.2010

Author24 — интернет-сервис помощи студентам

Уважаемые форумчане!
Очень прошу, кому не лень, нужны два решенных варианта простейших тестов по VB, представленных ниже. Буду очень благодарен за помощь, возможна оплата (эквивалент одного доллара по ЯД). Заранее спасибо.

Тест по Visual Basic
10 класс
Вариант 1
1. В состав основных элементов управления интерфейса Visual Basic входит:
окно Результатов;
окно Панель инструментов;
окно Программный код;
панель задач;
окно Конструктор форм;
окно формул.
2. Укажите типы числовых переменных, принимающих только целые значения:
integer;
string;
Long;
Double;
byte;
Single;
Boolean.
3. Определите, в каких случаях цикл выполнится более 3-х раз:

Visual Basic

for j=10 to 15 step 10 … next j
m=2 : n=7 : t=3 : for k=m to n step t … next k
for i=10 to 20 … next i
for i=5 to 1 step -1 … next i
for k=2 to 5 step 2 … next k
for j=10 to 8 step -1 … next j

4. Среди приведенных понятий укажите объекты Формы, используемые при создании проекта:
PictureBox;
Name;
Label;
String;
TextBox;
Button.
5. Как вы думаете, какие из приведенных записей могут быть операторами присваивания:

Visual Basic

Sngxyz = 171.543
Intx + inty = ints1 + ints2
strA1 = ”126”
intA * 3 = intB
sngs = sngs + sngt * (snga + 2)
lngM = |L|
sngb * 2 – 4 * snga * sngc = 0

6. Укажите свойства, которые можно присваивать объектам формы:
Dim
BackColor
Case
Name
Visible
Label
Text

7. Среди приведенных записей укажите те, которые могут быть именами переменных:
sngSum
Dim
intX124
B&
inta*a
EK.VED
B4
8. Укажите тип алгоритма.

Visual Basic

intA = 2 : intB = 3
IF intA> intB THEN
IntX = intA * 2
ELSE
intX = intB * 2
END IF
Label1.Caption = Str(intX)

циклический
линейный
вспомогательный
разветвляющийся
9. Каково будет значение переменной после выполнения операций присваивания:
intX = 5
intX = intX + intX

5
15
25
10
10. Что будет напечатано в результате выполнения программы?

Visual Basic

intX = -3 : intY = 10
IF intX * intY >10 THEN
intX = intY * intX
ELSE 
IF  intX * intY<0 THEN
intY = intY-5
End if
End if
intS = intY - intX
Label1.Text=Str( intS)

8
2
-25
35

11. Что изменяет операция присваивания?

значение переменной
имя переменной
тип алгоритма
тип переменной
не изменяет ничего
12. Как правильно записать выражение по правилам языка программирования ?
3*x+y/SQRT(x)-y
(3*x+y)/(x*x-y)
3*x+y/(x*x-y)
(3*x+y)/(x-y)
13. Выбрать последовательность команд, меняющих местами две величины X и Y.
X =Y: Y =X
X =A: X =Y: A =Y
X =Y
A =X: X =Y : Y =A
14. Что будет напечатано в результате работы следующей блок-схемы при заданном входном потоке данных?

15. Какое значение переменной intS будет напечатано после выполнения фрагмента программы?

Visual Basic

intS = 1
For intN=1 To 3
intS=intS*intN
Next  intN
Label1.Text = Str(intS)

2
3
4
6

16. В программе, записанной на объектно-ориентированном языке Visual Basic

Visual Basic

Dim intA, intB, intC as Integer
Sub Button1_Click  ()
intA=2
intB=3
intC=intA/intb
ListBox1.Items.Add=Str( intC)
End Sub

методом объекта является:

ListBox1
Add
Button1_Click ()
intC
Items

17. Данный фрагмент программы

Visual Basic

bytI = 4
bytS = 0
Do While bytI > -5
bytS = bytS + bytI
bytI = bytI - 2
Loop
Label1.Text=Str(bytS)

вычисляет:
Сумму всех целых чисел в диапазоне от –5 до 4.
Произведение всех четных чисел от –4 до 4.
Сумму всех четных чисел в диапазоне от –5 до 4.
Сумму всех нечетных чисел от –4 до 4.

18. Что будет напечатано в результате работы следующей программы?

Visual Basic

intS = -1 : intP = 1
intI = -3
Do While  intI < 0
intP = intP * intI
intS = intS + intP 
intI = intI + 2
Loop
intS = intS + intP
Label1.Text=Str(intS)

-7;
2;
0;
-1

Добавлено через 13 секунд

1. В состав основных элементов управления интерфейса Visual Basic входит:
окно Результатов;
окно Формул;
окно Программный код;
окно Свойства объектов;
окно Графический интерфейс;
окно Проводник проекта.

2. Укажите типы числовых переменных, принимающих вещественные значения:
integer;
string;
Long;
Double;
byte;
Single;
Boolean.

3. Определите, в каких случаях цикл выполнится 2 раза:

Visual Basic

for j=10 to 11 step 2  … next j
m=2 : n=7 : t=3 : for k=m to n step t … next k
for i=10 to 20 step 5… next i
for i=5 to 1 step -2 … next i
for k=6 to 2 step -3 … next k
for j=10 to 8 step -1 … next j

4. Среди перечисленных свойств укажите свойства общие для объектов: Form, Button, Label.
BackColor;
Name;
DrawWidth;
Caption;
Text;
Font.

5. Как вы думаете, какие из приведенных записей могут быть операторами присваивания:

Visual Basic

intxyz = 171 * 543
stry = ints1 + ints2
strA1 = ”126”
intS + 3 = intB
sngs = Abs(sngs + sngt * (snga + 2))
lngM = -L
sngb * 2 – 4 * snga * sngc = sngD

6. Укажите объекты, которые можно располагать на форме:
Loop
ListBox
PictureBox
Properties
Caption
Label

7. Среди приведенных записей укажите те, которые могут быть именами переменных:
lngPr
For
124int
strBB
intC+C
bytA12
srt”S”
8. Укажите тип алгоритма.

Visual Basic

intX = 0
for  intA = 2 to 10 step 2
IntX = intX + intA * 2
Next intA
Label1.Text = Str(intX)

циклический
линейный
вспомогательный
разветвляющийся
9. Каково будет значение переменной после выполнения операций присваивания:
intX = 3 + Abs(-5)
intX = intX + intX

4
16
9
8

10. Что будет напечатано в результате выполнения следующего фрагмента программы?

Visual Basic

intX = -2 : intY = 8
IF intX > intY THEN
intX = 2 * intX * intY
intY = (intX + intY)/2
ELSE
intY = 2 * intX * intY
intX = (intX - intY)/2
ENDIF
intS = intY + intX
Label1.Text=Str( intS)

a) -17; b) 15; c) -5; d) 0

11. Какая переменная является параметром цикла?

Visual Basic

Byti = 10 : bytst = 2 : bytk = 1
For bytj = bytk to byti step bytst
bytS = bytj
Label1.Text=Str( bytS)
Next bytj

bytS
bytk
bytj
bytst
byti
12. Как правильно записать арифметическое выражение по правилам языка программирования?
x-y*y/5/x/y;
(x-y)*(x-y)/(5*x*y);
(x-y*y)/(5*x*y);
x-y*y/(5*x*y).

13. Какой из приведенных ниже алгоритмов находит наибольшее из трех заданных чисел a, b, c?

a)

PureBasic

MAX=A
IF B>A THEN
MAX=B
END IF
IF C>A THEN
MAX=C
END IF
PRINT MAX

b)

PureBasic

MAX=A
IF B>MAX THEN
MAX=B
ELSE 
MAX=C
END IF
PRINT MAX

c)

PureBasic

MAX=A
IF B>MAX THEN
MAX=B
END IF
IF C>MAX THEN
MAX=C
END IF
PRINT MAX   d) IF A>B AND A>C THEN
MAX=A
END IF
IF B>A AND B>.C THEN
MAX=B
ELSE 
MAX=C
END IF
PRINT MAX

14. Что будет напечатано в результате работы следующей блок-схемы при заданном входном потоке данных?

15. Какое значение переменной intS будет напечатано после выполнения фрагмента программы?

Visual Basic

intS = 1
For intN=1 To 3
intS=intS + intN
Next  intN
Label1.Text = Str(intS)

5
7
9
12

16. В программе, записанной на объектно-ориентированном языке Visual Basic

Visual Basic

Dim intA, intB, intC as Integer
Sub Button1_Click  ()
intA=2
intB=3
intC=intA/intb
ListBox1.Items.Add (intC)
End Sub

объектом является:

ListBox1
Add
Button1_Click ()
intC
Items

17. Данный фрагмент программы

Visual Basic

intP = 1 : intI = 1
Do While  intI <= 10
intP = intP * intI
intI = intI + 1
Loop
Label1.Text=Str(intP)

вычисляет:
Произведение натуральных чисел от 1 до 10.
Сумму натуральных чисел до 10 включительно.
Произведение нечетных натуральных чисел до 10.
Сумму всех целых чисел в диапазоне от 1 до 10.

18. Что будет напечатано в результате работы следующей программы?

Visual Basic

intP = -1
intI = 3
Do While intP < 0
intP = intP * intI
intI = intI - 1
Loop
intP = intP - intI
Label1.Text=Str( intP)

P=-3;
P=-1;
P=1;
P=0.

@YuraAAA · 08.05.2010, 20:54

"Простейшие" тесты...) Обращайтесь с личку

@YuraAAA 1605 / 1337 / 291 Регистрация: 25.10.2009 Сообщений: 3,487 Записей в блоге: 2
	08.05.2010, 20:54	2
	"Простейшие" тесты...) Обращайтесь с личку 0