Процедуры

Подпрограммы.

ПРОЦЕДУРЫ. ФУНКЦИИ.

Автономная часть программы, с помощью которой можно производить одни и те же вычисления, с разными исходными данными и в различных местах программы, многократно, называется подпрограммой. Виды подпрограмм: процедуры и функции.

Процедура (подпрограмма) – многократно повторяющаяся часть программы, оформленная отдельно от основной программы.

Место расположения процедур в программах - Раздел описаний, за описанием переменных.

Преимущества использования процедур - уменьшение объем программы, сокращение времени на отладку.

Принцип работы процедуры:

Выполнение программы начинается с выполнения основной части программы. Как только появляется необходимость в выполнении процедуры, она вызывается по имени с передачей входных данных. После выполнения процедура передает в основную часть программы выходных данных (результатов), в то место, откуда была вызвана процедура.

Затем продолжается выполнение основной части программы.

Процедура оформляется подобно основной программе:

Раздел описаний основной программы
Заголовок процедуры	Procedure имя (список параметров);	Описываются формальные параметры
Раздел описаний	label …; Var …;
Раздел операторов процедуры	Begin … end;
Описание функций
Раздел операторов основной программы

Procedure имя (формальные параметры);

Раздел описаний

Begin

Раздел операторов

End;

Все переменные, представленные в разделе описаний основной программы называются глобальными. Они действуют как в разделе операторов основной программы, так и в любой подпрограмме.

Параметры (переменные), определяемые при описании процедуры называются формальными.

Параметры (переменные), задаваемые при вызове процедуры называются фактическими.

Формальные параметры (переменные, описываемые в процедуре) делятся на параметры - значения и параметры - переменные

Параметры-значения – передают информацию только в процедуру (входные), описываются как переменные с указанием типа (без зарезервированного слова Var).

Параметры-переменные – передают информацию, как в процедуру, так и обратно (выходные), их описание начинается со слова Var, затем следует список переменных с указанием типа.

Пример:

Procedure sterline (len: integer); - параметры-значения.

Procedure stl (l: integer, Var n: integer); - параметры-значения и параметры – переменные.

Формальные параметры описываются только в заголовке процедуры. Формальные параметры никогда не описываются в разделе описаний процедуры. Если в процедуре используются переменные, отличные от формальных параметров, их необходимо обязательно описать в разделе описания процедуры.

Вызов процедуры подобно специальным операторам происходит по имени с указанием фактических параметров, например:

stl (а, n);

Имена фактических параметров могут не совпадать с именами формальных параметров, но они должны соответствовать друг другу по типу. Формальные параметры описываются в разделе описания основной программы и до вызова процедуры должны получить значения.

Пример использования процедур:

Задача 1: Написать программу, которая выводит на экран строку, состоящую из заданного числа звездочек. Использовать процедуру.

Uses crt;

Var n: integer;

Procedure sterline (var len: integer);

Var i:integer;

Begin

For i:=1 to len do

Write (‘*’);

End;

Begin

Write(‘Введите количество звездочек’); Readln(n);

Sterline (n);

Readln; End.

Задача 2:

Четырехугольник задан четырьмя своими сторонами a, b, c, d, и диагональю f. С помощью процедуры вычисления площади треугольника по трем сторонам, вычислить площадь заданного четырехугольника.

Program pl;

Var a, b, c, d, f, s1, s2, s: real;

Procedure treug(x, y, z: real; var v: real);

Var p: real;

Begin

p:=(x + y + z)/2;

V:=sqrt(p*(p – x)*(p – y)*(p – z));

End;

Begin

Writeln(‘Введите стороны четырехугольника и диагональ: ’);

Readln(a, b, f);

Treug (a, b, f, s1);

Readln(c, d);

Treug (c, d, f, s2);

S:=s1 + s2;

Write(‘Площадь четырехугольника = ’, s:5:2);

Readkey;

End.

Задача 3

Даны вещественные числа а, b, с, d, e, f, g. Найти площадь пятиугольника, изображенного на ри­сунке (Определить процедуру расчета площади тре­угольника по трем его сторонам.)

Дата добавления: 2015-05-10