Система программирования Турбо Паскаль. Воробьева А.П - 46 стр.

UptoLike

Составители: 

93
В приведенной выше программе для вычисления каждого
элемента
s[j] организован двойной цикл, в котором индекс j явля-
ется
внешним параметром цикла, а индекс iвнутренним.
Приведем вариант программы без использования одномерного
массива
S.
Program DМ2_2b;
Var
C: array [1..8, 1..4] of real;
S: real;
i, j: integer;
Begin
writeln(‘Введите матрицу C’);
for i := 1 to 8 do
for j := 1 to 4 do read(c[i,j]);
for j := 1 to 4 do
begin
S := 0;
for i := 1 to 8 do S:= S + c[i,j];
S := S/8;
writeln(‘Среднее арифметическое ’, j,
-го столбца равно’, S:8:2):
end;
End.
94
ГЛАВА 8. ПОДПРОГРАММЫ
8.1. Структура сложной программы
Любая программа в системе Турбо Паскаль может быть раз-
бита на ряд самостоятельных программных единицподпро-
грамм. Такое разделение вызвано двумя причинами.
1. Экономия памяти. Каждая подпрограмма записывается в
программе один раз, в то время как обращаться к ней можно мно-
гократно из разных точек программы.
2. Структурирование программы. Алгоритм решения зада-
чи может быть достаточно сложным, поэтому целесообразно вы-
делить самостоятельные смысловые части алгоритма и оформить
их в виде подпрограмм.
Любая подпрограмма, в свою очередь, может содержать под-
программы низшего уровня. Такие структурированные програм-
мы легче понять, и они удобны в отладке. В дальнейшем для про-
стоты изложения
будем рассматривать только такие подпрограм-
мы, которые не содержат внутри себя других подпрограмм.
Сложная программа, составленная на языке Турбо Паскаль,
состоит из двух основных частей:
основной программы и раз-
дела подпрограмм
.
Раздел подпрограмм включается в описательную часть ос-
новной программы и располагается вслед за разделом описания
переменных (
Var) основной программы. Число подпрограмм в
разделе может быть произвольным.
Описание подпрограммы само по себе никаких действий не
вызывает. При запуске программы выполнение начинается с опе-
раторов основной программы.
Чтобы выполнить подпрограм-
му, в нужной точке основной программы необходимо запи-
сать обращение к подпрограмме
.
Ниже схематично приведена структура программы, в которой
используются подпрограммы.
Замечание. В основную программу включен раздел типов
Type, который может отсутствовать. Его назначение рассмотрим
позднее.
    В приведенной выше программе для вычисления каждого                                     Г Л А ВА 8. П ОД П РО Г РА М М Ы
элемента s[j] организован двойной цикл, в котором индекс j явля-
ется внешним параметром цикла, а индекс i – внутренним.
Приведем вариант программы без использования одномерного                                8.1. Структура сложной программы
массива S.                                                                        Любая программа в системе Турбо Паскаль может быть раз-
                 Program DМ2_2b;                                             бита на ряд самостоятельных программных единиц – подпро-
                 Var                                                         грамм. Такое разделение вызвано двумя причинами.
                  C: array [1..8, 1..4] of real;                                  1. Экономия памяти. Каждая подпрограмма записывается в
                  S: real;                                                   программе один раз, в то время как обращаться к ней можно мно-
                  i, j: integer;                                             гократно из разных точек программы.
                    Begin                                                         2. Структурирование программы. Алгоритм решения зада-
                       writeln(‘Введите матрицу C’);                         чи может быть достаточно сложным, поэтому целесообразно вы-
                       for i := 1 to 8 do                                    делить самостоятельные смысловые части алгоритма и оформить
                           for j := 1 to 4 do read(c[i,j]);                  их в виде подпрограмм.
                       for j := 1 to 4 do                                         Любая подпрограмма, в свою очередь, может содержать под-
                           begin                                             программы низшего уровня. Такие структурированные програм-
                               S := 0;                                       мы легче понять, и они удобны в отладке. В дальнейшем для про-
                               for i := 1 to 8 do S:= S + c[i,j];            стоты изложения будем рассматривать только такие подпрограм-
                               S := S/8;                                     мы, которые не содержат внутри себя других подпрограмм.
                               writeln(‘Среднее арифметическое ’, j,              Сложная программа, составленная на языке Турбо Паскаль,
                                              ‘-го столбца равно’, S:8:2):   состоит из двух основных частей: основной программы и раз-
                           end;                                              дела подпрограмм.
                    End.                                                          Раздел подпрограмм включается в описательную часть ос-
                                                                             новной программы и располагается вслед за разделом описания
                                                                             переменных (Var) основной программы. Число подпрограмм в
                                                                             разделе может быть произвольным.
                                                                                  Описание подпрограммы само по себе никаких действий не
                                                                             вызывает. При запуске программы выполнение начинается с опе-
                                                                             раторов основной программы. Чтобы выполнить подпрограм-
                                                                             му, в нужной точке основной программы необходимо запи-
                                                                             сать обращение к подпрограмме.
                                                                                  Ниже схематично приведена структура программы, в которой
                                                                             используются подпрограммы.
                                                                                  Замечание. В основную программу включен раздел типов
                                                                             Type, который может отсутствовать. Его назначение рассмотрим
                                                                             позднее.

                                   93                                                                      94