Какой результат будет выведен на форму в результате выполнения фрагмента программы?
Dim x As Integer
Dim y As Integer
Private Sub Command1_Click()
For x = 2 To 10 Step 2
y = x ^ 2
Next x
Print x; y
EndSub
Результат:
а) 12 100 б) 10 100 в) 2 4
4 16
6 36
8 64
10 100
В массив А последовательно вводятся значения: 115, 176, 17, 14, 19. Какой результат будет выведен на форму в результате выполнения фрагмента программы?
Dim A(1 To 5) As Integer
Dim j As Integer
Dim i As Integer
Dim m As Integer
Private Sub Command1_Click()
For j = 1 To 5
A(j) = Val(InputBox("Введите элемент массива"))
Next j
m = 17
For i = 1 To 5
If A(i) = m Then Print i; m + 2
Next i
End Sub
Результат:
а) 3 19; б) 3 17; в) 5 19.
Как на эти задачи правильно смотреть и как их скомпилировать в Basic, спасибо.
Какой результат будет выведен на форму в результате выполнения фрагмента программы?
Dim x As Integer
Dim y As Integer
Private Sub Command1_Click()
For x = 2 To 10 Step 2
y = x ^ 2
Next x
Print x; y
EndSub
Результат:
а) 12 100 б) 10 100 в) 2 4
4 16
6 36
8 64
10 100
В массив А последовательно вводятся значения: 115, 176, 17, 14, 19. Какой результат будет выведен на форму в результате выполнения фрагмента программы?
Dim A(1 To 5) As Integer
Dim j As Integer
Dim i As Integer
Dim m As Integer
Private Sub Command1_Click()
For j = 1 To 5
A(j) = Val(InputBox("Введите элемент массива"))
Next j
m = 17
For i = 1 To 5
If A(i) = m Then Print i; m + 2
Next i
End Sub
Результат:
а) 3 19; б) 3 17; в) 5 19.
Как на эти задачи правильно смотреть и как их скомпилировать в Basic, спасибо.
Dim x As Integer
Dim y As Integer
Private Sub Command1_Click()
For x = 2 To 10 Step 2
y = x ^ 2
Next x
Print x; y
EndSub
Результат:
а) 12 100 б) 10 100 в) 2 4
4 16
6 36
8 64
10 100
В массив А последовательно вводятся значения: 115, 176, 17, 14, 19. Какой результат будет выведен на форму в результате выполнения фрагмента программы?
Dim A(1 To 5) As Integer
Dim j As Integer
Dim i As Integer
Dim m As Integer
Private Sub Command1_Click()
For j = 1 To 5
A(j) = Val(InputBox("Введите элемент массива"))
Next j
m = 17
For i = 1 To 5
If A(i) = m Then Print i; m + 2
Next i
End Sub
Результат:
а) 3 19; б) 3 17; в) 5 19.
Как на эти задачи правильно смотреть и как их скомпилировать в Basic, спасибо.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Для выполнения данных фрагментов программы в Basic нужно воспользоваться IDE (средой разработки), например, Visual Basic.
Чтобы запустить эти программы, вам нужно создать новый проект, добавить форму (Form), добавить кнопку на форму (CommandButton) и связать код с событием нажатия на кнопку.
Код первого фрагмента программы может быть помещен в обработчик события "Click" кнопки Command1.
Код второго фрагмента программы также может быть помещен в обработчик события "Click" кнопки Command1.
После этого, запустив программу и нажав на кнопку, вы получите результат выполнения соответствующего фрагмента программы.
Если у вас возникнут дополнительные вопросы по работе с Basic или компиляции программ, не стесняйтесь задавать их.