Var f : text;

c : char;

begin

assign (f, ‘namef’);

reset (f);

{первый вариант} {второй вариант}

while not eof(f) while not seekeof(f)

do begin do begin

while not eoln(f) read (f, c);

do begin write(lst, c)

read (f, c); read (f);

write (lst,c) end;

end; readln(f);

readln(f);) writeln(lst)

writeln(lst) end.

еnd

end.

При выполнении первого варианта получим 1 2 3 4 5

6 7 8 9 0,

при выполнении второго варианта получим 1 2 3 4 5

6 7 8 9 0.

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

Подпрограмма – обособленная сформированная в виде отдельной синтаксической конструкции и снабженная именем часть программы.

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

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

Повышение сложности задач, решаемых с помощью ЭВМ, приводит к увеличению размеров и сложности программ, следовательно, возникают дополнительные трудности при разработке и отладке. Увеличение продолжительности жизненного цикла программ приводит с течением времени к необходимости их модификации (с целью повышения их эффективности и удобства пользования ими). Для разрешения возникших при этом проблем в практике программирования выработан ряд приемов и методов структурного программирования (см. гл. 12).

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

При прочтении программы в ее фрагментах должна четко прослеживаться логика работы, т. е. не должно быть «скачков».

Структурное программирование – программирование «без goto», т. е. не используются операторы перехода без необходимости. В связи с этим отдельные фрагменты программы представляют собой некоторые логические (управляющие) структуры, определяющие порядок выполнения содержащихся в них правил обработки данных. Любая программа получается построенной из стандартных логических структур, число типов которых невелико.

Основные логические структуры: следование, ветвление, повторение (каждая имеет один вход и один выход).

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

Решение отдельного фрагмента сложной задачи может представлять собой самостоятельный программный блок – подпрограмму.

9.1. Процедуры и функции

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

Процедура – независимая именованная часть программы, которую можно вызвать по имени для выполнения определенных действий. Структура процедуры повторяет структуру программы. Процедура не может выступать как операнд в выражении. Например, Writeln – встроенная процедура Паскаля.

Функция – аналогична процедуре, но имеются два отличия:

1) функция передает в точку вызова скалярное значение (возвращает значение);

2) имя функции может входить в выражение как операнд.

Например, ArcTan(x: real): real – передает в точку вызова arctg(x).

Вызов процедуры или функции – указание ее имени в тексте программы, приводящее к ее активизации.

Все подпрограммы Паскаля делятся на две группы: встроенные (стандартные) и определенные пользователем.

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

System – содержащиеся в нем подпрограммы обеспечивают работу всех остальных модулей системы. Подключается к программе автоматически, поэтому его имя не указывается в разделе Uses и любой программе всегда доступны его процедуры и функции.

Crt – средства управления монитором и клавиатурой;

Dos – средства Dos;

Printer – быстрый доступ к печатающему устройству;

Graph – пакет графических средств.