Лабораторный практикум по программированию на языке Паскаль. Найханова Л.В - 77 стр.

      FUNCTION Lenght(St : string) : byte;
Тип результата, возвращаемого этой функцией, BYTE.
Пример.
Напишем подпрограмму, позволяющую вычислять степенную функцию аn, причем n может
иметь только положительные целые значения.
В этом примере параметрами функции должны быть: основание и степень.

        { вычисление степенной функции }
FUNCTION Degree(Base: real; Power: integer) : real;
        { обьявление локальных переменных i, Y
        i - параметр цикла, считающий степени;
        Y - промежуточная переменная, содержащая текущие значения степенной функции }
VAR
   i : integer;
   Y : real;
        { тело функции или процедурная часть }
BEGIN
   Y:= 1;
   For i:= 1 to Power do
   Y:= Y * Base;
   Degree:= Y;
END;
В основной программе обращаться к этой подпрограмме (функции) можно многократно,
например:
   ...
VAR
    B, X, Z : real;
    P      : integer;
   ...
 BEGIN { основная или главная программа }
   ...
   B:= 1.5; P:= 3;
   Z:= Degree(B, P); { основание = 1.5, степень = 3 }
   ...
    WriteLn('Значение степенной функции = ', Degree(Х*2, 10));
   ...
 END.
Проследим работу функции по первому вызову. Значения переменных B и P: 1.5 и 3
передаются подпрограмме DEGREE. Однако после входа в подпрограмму мы эти
переменные называем уже не B и P, а Base и Power. Имена Base и Power, фигурирующие в
подпрограмме, являются просто "пустышками",           замещаемыми при работе функции
(вычислении) конкретными значениями. По терминологии ПП параметры, используемые в
самой подпрограмме, называются формальными, а параметры, используемые в основной
программе при ссылке к функции, называются фактическими. В нашем примере B и P -
фактические параметры, Base и Power - формальные. Этот прием введения фактических и
формальных параметров удобен тем, что при многократном вызове подпрограммы мы
можем передавать различные параметры, как это сделано в представленном выше фрагменте
программы:
                      Degree(B, P) и Degree(Х*2, 10).
Имена формальных и фактических параметров не обязаны совпадать, хотя если случайно
они и оказываются одинаковыми, никаких проблем не возникнет. Однако необходимо,


                                                                                  77