име литеры илн распознавать их: writeln (х) - оканчивает текущую выводную запись текстового файла х (переводит каретку при печати), readln (х) - переходит к чтению с начала следующей строки, eoln (х) - проверяет, встречен ли конец текущей строки (если да, то X 1 содержит пробел).

Стандаргиыми входным и выходным файлами являются файлы input и output. Эгя имена можно не указывать в операторах ввода-вывода и не обьявлять переменные Input и output:

write (ch) эквивалентно write (output, ch) read (ch) эквивалентно read (input, ch) writeln эквивалентно writeln (output)

и т. д.

Во многих реализациях языка, если вывод осуществляется иа печать, тэ первый си.мвол строки используется-для управления кареткой (этот символ не печатается): пробел: пропуск одной строки и переход к началу следующей; О': пропуск двух ртрок и переход к началу следующей; Г:переход к началу следующей страницы; не выполняется перевод строки (продолжение печати).

Структура программы. Любая программа на языке Паскаль состоит из заголовка и блока; т. е.:

(программа) :: = (заголовок программы) (блок) (блок) :: = (объявление меток)

(объявление констант) (объявление типов) (объявление переменных)

(объявление процедур и функций) (часть, содержащая утверждения)

Заголовок программы содержит имя программы и список параметров, с помощью которых программа связывается с внешней средой, т. е.:

(заголовок программы) : : == program (идентификатор) ((имя файла) {, .... (имя файла)}*);

Пример заголовка программы: program рг (input, output); Заголовок программы и блок могут быть представлены синтаксическими графами (рис. 7.6).

Алгоритм построения графика функции реализует следующая программа [14]:

((х) = ехр (-Х) Х- sin (2 pi X),

program graph 1 (output); constdj= 0.625; {1/16, 16 строчек в интервал [х, x+I]} s = 32; {32 символа в интервале [у, у + 1]} h = 34; {положение оси х} с = 6.28318; {2pi}lim= 32 var X, у : real; 1, п : integer;

begin

for i: = о to Ilm do

begin X : = d :)f i; У : = exp (-x) sin (c x); h : = round (s У) h;

Здесь и в дальнейшгм символы {и} охватывают необязательные н рекур. сивно повторяющиеся конструкции и являются метасимволами, т. е, не являются сииволамн языка Паскаль. Исключение составляют тексты программ, где {н} охватывают строки комментария.

repeat write ( ); n : = n - I until n = 0; writeln ( ) end

Целое Вез знака

const y-

Идектифи-катор

/=)- Константа

-<i>

-<J>

-mprocedUrey

Идентири-катор

Список параметров

-Qimctiony-

ИВентити- \ Л Список . L /T\J Идектиюи-катор 14 параметров Г*У/П У

jg№7 у-

УтВертдемие

Рис. 7.6.

Объявления констант в программе делает ее более удобочитае-Moii и служит целям документирования.

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

Оператор безусловного перехода указывает, что дальнейшая обработка должна выполняться с оператора, помеченного некото-

рой меткой. Метка представляет собой целое без знака, которое может содержать не более 4 цифр, она должна быть описана в декларативной части программы и отделяться символом : от помеченной инструкции:

procedure В;

label 1,30; begin

1 : writeln (err Г);

go*o 1; goto 30;

30 : writeln (err2)

Составной оператор определяет, что его компонентные утверждения выполняются в порядке их записи в программе. Составной оператор ограничивается символами языка begin и end:

program bd (input, output);

var a, b : real;

begin

read (a, b); sum : - а-}-Ъ; writeln (sum)

end.

Точки с запятой разделяют операторы языка. Перед ограничителем end точка с запятой не нужна.

Операторов цикла в Паскале три: while,- .repeat-, for - утверждения. Цикл с предусловием while имеет следующую форму: while {выражение) do (утверждение). Выражение, определяющее условие повторения, должно быть булевым. Утверждение, раз.мещенное после ключевого слова do, повторяется до тех пор, пока значение выражения не станет false, например;

while к < О do

begin h: = h-[-l/K; к: = к-1 end

В данном примере в операторе while размещен составной оператор, состоящий из двух операторов присваивания. Цикл с постусловием repaat имеет следующую форму: repeat (утверждение) { ; (утверждение)} until (выражение).

Последовательность утверждений между символами repeat и until выполняется, по крайней мере, один раз. Условие повторения последовательности утверждений определяется значением булевого выражепня. Если значение выражения - false, то последовательность утверждений больше не повторяется, например: repeat р (h): = р (hh); hh: = h; h: = p (h - 3); until h < = 0;. Данное утверждение корректно, если исходное значение h больше 0. Допустима запись составного утверждения между символами repeat и until.