Вы на НеОфициальном сайте факультета ЭиП

На нашем портале ежедневно выкладываются материалы способные помочь студентам. Курсовые, шпаргалки, ответы и еще куча всего что может понадобиться в учебе!
Главная Контакты Карта сайта
 
Где мы?

Реклама


ответы к тесту циклы - буслаева

Просмотров: 2559 Автор: admin

ответы к тесту циклы - буслаева 

1. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer
intN = 0
For intR = 1 To 5 Step -1
intN = intN + intR
Next intR
lblOut.Caption = "N=" & intN


Ни разу; N=0


2. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 10
Do While intN > 4
intA = intA + intN
intN=intN-1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


6 раз; N=4 A=45

3. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 8
Do
intA = 0
intN = intN-1
intA = intA + intN^2
Loop While intN > 4
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=16


4. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 1
intN = 6
Do Until intN < 4
intN = intN - 1
intA = intA + intN
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=3 A=13


5. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = -1
Do Until intA > 1
intN = intN^2
intA = intA + intN
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=1 A=2


6. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intR As Integer
intN = 0
For intR = 4 To 1
intN = intN + intR
intR = intR - 1
Next intR
lblOut.Caption = "N=" & intN


Ни разу; N=0


7. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer, intA As Integer
intA = 0
intN = 0
For intR = 0 To 6 Step -2
intN = intN + intR
intR = intR + 2
intA = intA + 1
Next intR
lblOut.Caption = "N=" & intN & "; =" & intA


Ни разу; N=0

8. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 1
intN = 6
Do Until intN < 4
intA = intA + intN
intN = intN - 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=3 A=16


9. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 1
intN = 0
Do
intA = intA + intN
intN=intN+1
Loop While intN < 4
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=45


10. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 8
Do
intA = intA + intN^2
intN=intN-1
Loop While intN > 4
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=174


11. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 5
intN = 0
Do
intA = intA - intN
intN = intN + 1
Loop Until intA = 0
lblOut.Caption = "N=" & intN & " A= " & intA



Бесконечное число раз; сообщения нет


12. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer, intA As Integer
intA = 1
intN = 0
For intR = 0 To 5
intN = intN + intR
intA = intA + 2
intR = intA
Next intR
lblOut.Caption = "N= " & intN & "А= " & intA


2 раза; N=4 А=5


13. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 4
Do
intA = intA + intN
intN=intN-1
Loop While intN < 4
lblOut.Caption = "N=" & intN & " A= " & intA


Бесконечное число раз; сообщения нет


14. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 4
intN = 0
Do
If intA < 6 Then Exit Do
intA = intA + intN ^ 2
intN = intN - 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=0 A=4


15. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer
intN = 0
For intR = 1 To 5 Step 2
intN = intN + intR
intR = intR + 2
Next intR
lblOut.Caption = "N=" & intN


2 раза; N=6


16. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 5
intN = 0
Do Until intA < 0
intA = intA - ( intN + 1)
intN = intN + 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=3 A= -1


17. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer
intN = 0
For intR = 10 To 5 Step -1
intN = intN + intR
intR = intR + 2
Next intR
lblOut.Caption = "N=" & int
N

Бесконечный цикл


18. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 0
Do
intA = intA + 2
intN = intN + 1
Loop Until intN > 3
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=8


19. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 1
intN = 0
Do While intN < 4
intA = intA + intN
intN = intN + 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


4 раза; N=4 A=7


20. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 1
Do While intN < 4
intA = intA + intN
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


Бесконечное число раз; сообщения нет


21. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 5
intN = 0
Do
intA = intA - intN
intN = intN + 1
Loop Until intA < 0
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=-1


22. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 4
intN = 0
Do
intA = intA + intN ^ 2
intN = intN - 1
If intA >= 6 Then Exit Do
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=-3 A=9


23. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 1
Do Until intN < 4
intA = intA + intN
intN = intN + 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=1 A=0


24. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 4
intN = 0
Do
If intA > 6 Then Exit Do
intA = intA + intN ^ 2
intN = intN - 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=-3 A=9


25. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 5
Do Until intN < 4
intA = intA + intN
intN = intN + 1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


Бесконечное число раз; сообщения нет


26. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intR As Integer
intN = 0
For intR = 4 To 1 Step -1
intN = intN + intR
Next intR
lblOut.Caption = "N=" & intN


4 раза; N=10


27. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 0
Do
intA = intA - intN
intN = intN + 1
Loop Until intA <= 5
lblOut.Caption = "N=" & intN & " A= " & intA


N=1 A=0


28. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intR As Integer
intN = 0
For intR = 4 To 1 Step -2
intN = intN + intR
Next intR
lblOut.Caption = "N=" & intN


2 раза; N=6


29. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer
intN = 0
For intR = 1 To 5
intR = intR + 1
intN = intN + intR
Next intR
lblOut.Caption = "N=" & intN &



3 раза; N=12


30. Чему будет равно значение переменной I после завершения цикла
Dim I As Integer, X As Integer
For I = 1 То 100 Step 5
X = I * 10
If X > 100 Then
Exit For
End If
Next I


11


31. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intA As Integer, intN As Integer, intR As Integer
intA = 1
intN = 0
For intR = 4 To 1
intN = intN + intA
Next intR
lblOut.Caption = "N=" & intN


Ни разу; N=0


32. Чему будет равно значение параметра I после завершения цикла
Dim I As Integer, X As Integer
For I = 0 То 100 Step 5
X = I * 10
If X > 40 Then
Exit For
End If
Next I


5


33. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 0
Do
intA = 0
intA = intA - intN ^ 2
intN = intN + 1
Loop Until intN >= 3
lblOut.Caption = "N=" & intN & " A= " & intA


N=3 A=-4


34. Чему будет равно значение переменной Х после завершения цикла
Dim J As Integer, X As Integer
X=0
For J = 1 То 10
X = X + 1
Next J


10


35. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 1
Do While intN < 4
intA = intA + intN
intN=intN-1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA



Бесконечный цикл


36. Чему будет равно значение переменной I после завершения цикла
Dim I As Integer, X As Integer
For I = 7 То 50 Step 10
X = I * 10
If X > 140 Then
Exit For
End If
Next I



17


37. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 0
Do
intA = intA + 2
intN = intN + 1
If intA > 6 Then Exit Do
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=8


38. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 0
Do
intA = intA - intN ^ 2
intN = intN + 1
Loop Until intN > 3
lblOut.Caption = "N=" & intN & " A= " & intA



N=4 A=-14


39. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer
For intR = 1 To 5
intN = 0
intR = intR + 1
intN = intN + intR
Next intR
lblOut.Caption = "N=" & intN


3 раза; N=6


40. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 1
Do While intN > 4
intA = intA + intN
intN=intN+1
Loop
lblOut.Caption = "N=" & intN & " A= " & intA


Ни разу; N=1 A=0


41. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 5
intN = 0
Do
intA = intA - intN
intN = intN + 1
Loop Until intA > 0
lblOut.Caption = "N=" & intN & " A= " & intA


N=1 A=5


42. Какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intN As Integer, intA As Integer
intA = 0
intN = 1
Do
intA = intA + intN^2
intN=intN+1
Loop While intN < 4
lblOut.Caption = "N=" & intN & " A= " & intA


N=4 A=14


43. Сколько раз выполнится цикл и какое сообщение будет выведено на экран в результате выполнения программного кода?
Dim intR As Integer, intN As Integer
intN = 0
For intR = 1 To 5 Step 1
intN = intN + intR ^ 2
intR = intR + 1
Next intR
lblOut.Caption = "N=" & intN


3 раза; N=35

скачать cikly.rtf [38,72 Kb] (cкачиваний: 22)


Информация

Комментировать статьи на нашем сайте возможно только в течении 60 дней со дня публикации.

Популярные новости

Статистика сайта



Rambler's Top100



 
Copyright © НеОфициальный сайт факультета ЭиП