Процедури і функції

Задана функція:

Function Mynumber(a, b)

         Mynumber = a + 2 * b

End Function

Обчисліть, чому дорівнює

Mynumber (3, 4)

Задана функція:

Function Mynumber(a, b)

         Mynumber = a + 2 * b

End Function

Обчисліть, чому дорівнює

5 * Mynumber(2, 3)

Що буде надруковано в результаті виконання програми?

Private Sub Pr1(ByVal X As Integer, ByVal Y As Integer)

       Y = X + 5

   End Sub

   Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

       Dim a, b As Integer

       A = 5 : B = 1

       Call Pr1(a, b)

       TextBox2.Text = "B=" & Str(b)

   End Sub

Що буде надруковано програмою?

Private Sub Pr1(ByVal X As Integer, ByRef Y As Integer)

    Y = X + 5

  End Sub

  Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

    Dim a, b As Integer

    A = 5 : B = 1

    Call Pr1(a, b)

    TextBox2.Text = "B=" & Str(b)

  End Sub

Що означає службове слово Private?

Що означає службове слово Public?

Що означає службове слово ByVal?

Що означає службове слово ByRef?

Для розв'язку якої задачі призначена дана підпрограма?

Function F11(ByVal X As Byte, ByVal Y As Byte, ByVal Z As Byte) As Byte

 If X >= Y And X >= Z Then F11 = X ElseIf Y >= Z Then F11 = Y Else F11 = Z 

End Function

Для розв'язку якої задачі призначена дана підпрограма?

Function F12(ByVal X As Byte) As Long

    Dim I As Byte, P As Long

    P = 1

    For I = 1 To X

      P = P * I

    Next I

    F12 = P

End Function

Маємо функцію

Function Sum(ByVal A As Integer, ByVal B As Integer) As Integer

    Sum = A + B

  End Function

В якому випадку виклик функції Sum виконаний неправильно?

Заголовок функції має вигляд

Private Function Sum(ByVal A As Integer, ByVal B As Integer) As Integer

В яких випадках виклик функції Sum виконано правильно?

Функція має вигляд

Sub S(ByVal X As Integer, ByVal Y As Integer, ByRef Z As Integer)

    Z = X + Y

  End Sub

В яких випадках виклик функції Sum виконано правильно?

Код, який має власну назву, записується окремо від основного коду, його можна використовувати один або багато разів з метою вирішення певної підзадачі.

Змінна, через яку дані вводяться в підпрограму, називається

Дане, яке вводиться в процедуру, називається

Для вирішення якої задачі призначена дана підпрограма?

Sub Pr(ByVal t() As Integer, ByVal n As Integer, ByRef M As Integer)

    Dim i As Integer

    M = t(0)

    For i = 1 To n

      If t(i) < M Then M = t(i)

    Next i

End Sub

Для вирішення якої задачі призначена дана підпрограма?

Sub Pr(ByVal Maxt As Integer, ByVal Mint As Integer, ByRef Otvet As Integer)

    Otvet = Maxt - Mint

End Sub

Для вирішення якої задачі призначена дана підпрограма?

Sub MyProc_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.Click, TextBox2.Click, TextBox3.Click

    TextBox1.Text = ""

    TextBox2.Text = ""

    TextBox3.Text = ""

    TextBox4.Text = ""

  End Sub

Для вирішення якої задачі призначена дана підпрограма?

Function Sa(ByVal a As Single, ByVal b As Single, ByVal c As Single) 

Return (a + b + c) / 3 

End Function