36. Структура программы на языке Паскаль.

Программа на языке Pascal представляет собой набор строк, длина каждой из которых не превышает 127 символов. Общий вид:

Program <имя программы>; {заголовок программы}

Uses <модуль1>,<модуль2>,…; {подключаемые библиотечные модули}

Label <метка 1>, <метка 2>,…; {раздел описания меток}

Const <имя1>=<значение1>;

<имя2>=<значение2>;…;{раздел описания констант}

Type <имя типа>=<описание>;…;{описание типов данных пользователя}

Var {раздел описания переменных}

<имя переменной 1>:<тип1>;<имя переменной 2>:<тип2>;…;

Procedure; {объявление процедур пользователя}

Function; {объявление функций пользователя}

Begin

…{раздел операторов}

End.

Обязательным является только наличие раздела операторов, который начинается словом begin и заканчивается словом end с точкой в конце. Все операторы отделяются друг от друга символом «;» − точка с запятой .Однако все переменные, константы, процедуры, функции пользователя, метки и т. д., используемые в разделе операторов, должны быть указаны в разделе описаний.

Комментарии: {комментарий} или (*комментарий*).

37. Оператор присваивания.

Все операторы языка Паскаль можно разделить на 3 группы:

1)простые - не содержащие никакие другие операторы(а)операторы присваивания (:=);б)операторы безусловного перехода (Go to);в)оператор вызова процедуры (ввод);г)пустой оператор(;).)

2)структурные – представляет собой конструкции, построенные с других операторов по строкам опред. Правилами.

а)составной оператор-begin

Опер.2;

Опер.3;

End;

б)условный оператор:

1)if<условие>then

<опер.1> else<опер.2>; 2)if<усл.>then<опер.1>;

в)оператор выбора(casl<выр> of)

список 1: <опер.1> else<опер.> список 2:<опер.2>

список n:<опер n> end;

г)операторы повтора(цикла):1)For;2)REPEAT;3)While.

3)операторы ввода-вывода – след. Процедуры –READ/READLN/WRITE/WRITELN

присваивания- например: y:=А; y:=10

38. Процедуры и функции (пользовательские).

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

Пример.Подпрограмма-функция, кот. возв. (+) число в ^.

Function degree(a, x: real):real;

begin

degree=Exp(a*Ln(x)) {x в степени a}

end;

В разд. опер. долж. наход. один оператор, присв. идентификатору функции значение.

Обращ. к фун-ии осущ-тся по имени .

Prograin DemoFunction;

Var y: real;

Begin

y=degree(0.4, 2);

writeln ('Результат вычисления 2 в степени 0.4 y=', y:6:3);

End.

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

Procedure Symbol(ch: char; x,y: integer);

begin

ClrScr;

GoToXY(x, y);

write(ch)

end;

обращения к процедуре .Пример.

При вызове процедуры Symbol необходимо уточн. какой символ и какие координ. x и y точки в которой выводится символ.

Program DemoProcedure; /Begin /... /Symbol('F', 20, 12);/

/ ... /End.

После выполнения процедуры в 20-ую позицию 12-ой строки будет помещена буква F.