Программирование в среде Turbo Pascal / Pascal / 7_3
.htmlTurbo Pascal | Глава 7 a:link {TEXT-DECORATION: none} a:visited {TEXT-DECORATION: none} a:active {TEXT-DECORATION: none} a:hover {COLOR: #007EFF;} A.menu:link { Color:#FFFFFF; } A.menu:visited { Color:#EEEEEE; } A.menu:hover { Color:#CCDDFF; } .glow { FILTER: DropShadow(Color=#000000, OffX=1, OffY=1, Positive=1)FILTER: Glow(Strength=1, Color=#454545); } .logot { color:#FFFFFF; }
В в е д е н и е / О г л а в л е н и е / О т а в т о р а
М е н ю
1. Интегрированная среда разработки программ Turbo Pascal 7.0 2. Лексические основы языка Pascal 3. Программирование алгоритмов линейной структуры 4. Алгоритмы и программы ветвящейся структуры 5. Алгоритмы и программы циклической структуры 6. Регулярные типы данных. Массивы 7. Подпрограммы в Turbo Pascal 7.1 Понятие подпрограммы. Разновидности подпрограмм в Turbo Pascal
7.2 Описание, определение и вызов процедур
7.3 Описание, определение и вызов функций
7.4 Передача параметров в подпрограммы
7.4.1 Передача параметров по значению
Описание, определение и вызов функций
Оформляется функция аналогично процедуре. Отличительной особенностью функции является то, что она возвращает только один результат выполнения. Этот результат обозначается именем функции и возвращается (передается) в основную программу (место вызова). Функция состоит из заголовка, раздела описаний и раздела операторов.
Function <Name>(<Список формальных параметров>):<Type>;
… {Раздел описаний}
Begin
…{Раздел операторов процедуры}
Name:=<выражение соответствующего типа&;
…
End;
где Function - служебное слово; Name - произвольный идентификатор, определяющий имя функции. В отличии от процедур в разделе операторов тела функции обязательно должен быть хотя бы один оператор присвоения имени функции выражения или значения соответствующего типа. После работы функции результат присваивается имени функции.
Таким образом, алгоритм можно оформить в виде функции в том случае, если в качестве результата получается одно единственное значение. Для вызова функции достаточно указать ее имя (с фактическими параметрами) в любом выражении, где тип результата функции будет приемлем. Имя функции можно использовать в арифметических выражениях и других командах.
Пример 7.1. Разработать функцию, определяющую по двум катетам гипотенузу прямоугольного треугольника.
Function Gepoten(a,b:real):real;
Begin
Gepoten:=Sqrt(Sqr(a)+Sqr(b))
End;
Вызов функции из основной программы может выглядеть следующим образом:
z:=Gepoten(x, y); {z присваивается значение гипотенузы}
или
WriteLn('Значение гипотенузы', Gepoten(x, y));
Учебно-познавательный сайт по программированию в среде Turbo Pascal
Мирошниченко Марина, Краснодар, 2003