Уроки 105 - 107
§4.9. Процедуры и функции
Содержание урока
4.9.1. Процедуры
4.9.2. Функции
Проект «Функция»
Контрольные вопросы. Компьютерный практикум
4.9.2. Функции
Проект «Функция»
Создать проект, в котором определяется функция (например, умножения двух чисел F = х * y), выводится на надпись значение выражения, в которое входит функция (например, √ F2 + F).
Создание графического интерфейса проекта на языках Visual Basic .NET, Visual С#, Visual J# и Turbo Delphi
1. Разместить на форме (рис. 4.20):
• для ввода значений аргументов функции два текстовых поля TextBox1 и TextBox2 (Edit1 и Edit2 в Turbo Delphi);
• для вывода значения функции надпись Label1;
• для создания обработчика события кнопку Button1.
Создание программного кода на языке программирования Visual Basic .NET
2. Создать код вызываемой функции:
Function F(ByVal X, ByVal Y) As Integer
F = X * Y
End Function
3. Импортировать ветвь пространства имен System.Math, которая необходима для использования математических функций, объявить переменные и создать код вызывающей процедуры-обработчика события:
Imports System.Math
...
Dim X, Y As Integer
Private Sub Button1_Click(ByVal sender As System. Object, ByVal e As System.EventArgs) Handles Button1.Click X = Val(TextBox1.Text)
Y = Val(TextBox2.Text)
Label1.Text = Str (Sqrt (Pow (F (X, Y) , 2) + F(X, Y) ) )
End Sub
Создание программного кода на языке программирования Visual C#
2. Создать код вызываемой функции:
public int F(int X, int Y)
{int result;
result = X * Y;
return result;
}
3. Объявить переменные и создать код вызывающей процедуры-обработчика события:
int X, Y;
private void button1_Click(object sender, System. EventArgs e)
{X = Convert.ToInt32(textBoxl.Text);
Y = Convert.ToInt32(textBox2.Text);
label1.Text = Convert.ToString(Math.Sqrt(Math. Pow(F(X,Y),2)+F(X,Y)));
}
Создание программного кода на языке программирования Visual J#
2. Создать код вызываемой функции:
public int F(int X, int Y)
{int result;
result = X * Y;
return result;
}
3. Объявить переменные и создать код вызывающей процедуры-обработчика события:
int X, Y;
private void button1_Click (Object sender, System. EventArgs e)
{X = System.Convert.ToInt32(textBox1.get_Text());
Y = System.Convert.ToInt32(textBox2.get_Text());
label1.set_Text(System.Convert.ToString(System. Math.Sqrt(System.Math.Pow(F(X, Y),2) +F(X, Y))));
}
Создание программного кода на языке программирования Turbo Delphi
2. Создать код вызываемой процедуры:
function F(X,Y:integer): int64;
begin F := X*Y;
end;
3. Импортировать модуль Math, который необходим для использования математических функций, объявить переменные и создать код вызывающей процедуры-обработчика события:
uses Math;
...
var
X, Y: integer;
procedure TForml.Button1Click(Sender: TObject);
begin
X := StrToInt(Edit1.Text);
Y := StrToInt(Edit2.Text);
Label1.Caption := FloatToStr(Sqrt(Power(F(X, Y),
2) + F(X, Y)));
end;
Запуск проекта на языках Visual Basic .NET, Visual C#, Visual J# и Turbo Delphi
4. Запустить проект на выполнение и ввести в текстовые поля значения переменных (например, 2 и 3).
На надписи будет выведено вычисленное значение выражения (см. рис. 4.20).
Рис. 4.20. Проект «Функция»
Следующая страница 
Контрольные вопросы. Компьютерный практикум
Cкачать материалы урока
