Cинтаксис языка
Операторы языка описывают некоторые алгоритмические действия, которые необходимо выполнить для решения задачи.
Тело программы можно представить как последовательность таких операторов. Идущие друг за другом операторы программы разделяются точкой с запятой.
Приоритет операторов
Операторы |
Приоритет |
Категория |
@ Not |
Высший |
Унарные операторы |
* / Div Mod Shl Shr |
Второй |
Операторы умножения |
+ - Or Xor |
Третий |
Операторы сложения |
= <> < > <- >= In |
Низший |
Операторы сравнения |
Правила приоритета:
Операнд между двумя операторами различного старшинства связан с оператором более высокого старшинства.
Операнд между двумя операторами одного старшинства связан с левым из них.
Выражения внутри круглых скобок оцениваются перед обработкой как одиночный операнд.
Операции с равным старшинством обычно выполняются слева направо, хотя компилятор может реорганизовать операнды, чтобы генерировать более оптимальный код.
Оператор присваивания
Тип переменной и тип выражения должны совпадать кроме случая, когда выражение относится к целому типу, а переменная – к действительному. При этом происходит преобразование значения выражения к действительному типу. Приведем некоторые примеры операторов присваивания:
X := Y + Z; Done := (I >= 1) and (I < 100); Huel := [blue, Succ(C)]; I := Sqr(J) - I * K;
Операторы ввода и вывода
Рассмотрим организацию ввода и вывода данных с терминального устройства. Терминальное устройство – это устройство, с которым работает пользователь, обычно это экран (дисплей) и клавиатура.
Для ввода и вывода данных используются стандартные процедуры ввода и вывода Read и Write, оперирующие стандартными последовательными файлами INPUT и OUTPUT.
Эти файлы разбиваются на строки переменной длины, отделяемые друг от друга признаком конца строки. Конец строки задается нажатием клавиши ENTER.
Для ввода исходных данных используются операторы процедур ввода:
Read(A1,A2,...AK); ReadLn(A1,A2,...AK); ReadLn;
Первый из них реализует чтение К значений исходных данных и присваивание этих значений переменным А1, А2, ..., АК. Второй оператор реализует чтение К значений исходных данных, пропуск остальных значений до начала следующей строки, присваивание считанных значений переменным А1, А2, ..., АК. Третий оператор реализует пропуск строки исходных данных.
При вводе исходных данных происходит преобразование из внешней формы представления во внутреннюю, определяемую типом переменных. Переменные, образующие список ввода, могут принадлежать либо к целому, либо к действительному, либо к символьному типам. Чтение исходных данных логического типа в языке Паскаль недопустимо.
Операторы ввода при чтении значений переменных целого и действительного типа пропускают пробелы, предшествующие числу. В то же время эти операторы не пропускают пробелов, предшествующих значениям символьных переменных, так как пробелы являются равноправными символами строк. Пример записи операторов ввода:
var rV, rS: Real; iW, iJ: Integer; chC, chD: Char;
Read(rV, rS, iW, iJ); Read(chC, chD);
Значения исходных данных могут отделяться друг от друга пробелами и нажатием клавиш табуляции и Enter.
Для вывода результатов работы программы на экран используются операторы:
Write(A1,A2,...AK); WriteLn(A1,A2,...AK); WriteLn;
Первый из этих операторов реализует вывод значений переменных А1, А2,..., АК в строку экрана. Второй оператор реализует вывод значений переменных А1, А2, ..., АК и переход к началу следующей строки. Третий оператор реализует пропуск строки и переход к началу следующей строки.
Переменные, составляющие список вывода, могут относиться к целому, действительному, символьному или булевскому типам. В качестве элемента списка вывода кроме имен переменных могут использоваться выражения и строки.
Вывод каждого значения в строку экрана происходит в соответствии с шириной поля вывода, определяемой конкретной реализацией языка.
Форма представления значений в поле вывода соответствует типу переменных и выражений: величины целого типа выводятся как целые десятичные числа, действительного типа – как действительные десятичные числа с десятичным порядком, символьного типа и строки – в виде символов, логического типа – в виде логических констант TRUE и FALSE.
Оператор вывода позволяет задать ширину поля вывода для каждого элемента списка вывода. В этом случае элемент списка вывода имеет вид А:К, где А – выражение или строка; К – выражение либо константа целого типа. Если выводимое значение занимает в поле вывода меньше позиций, чем К, то перед этим значением располагаются пробелы. Если выводимое значение не помещается в ширину поля К, то для этого значения будет отведено необходимое количество позиций. Для величин действительного типа элемент списка вывода может иметь вид А:К:М, где А – переменная или выражение действительного типа; К – ширина поля вывода; М – число цифр дробной части выводимого значения. К и М – выражения или константы целого типа. В этом случае действительные значения выводятся в форме десятичного числа с фиксированной точкой.
Пример записи операторов вывода:
var rA, rB: Real; iP, iQ: Integer; bR, bS: Boolean; chT, chV, chU, chW: Char;
WriteLn(rA, rB:10:2); WriteLn(iP, iQ:8); WriteLn(bR, bS:8); WriteLn(chT, chV, chU, chW);
2.3 Структурированные типы данных. Массивы, строки, множества
Любой из структуированных типов данных характеризуется множественностью образующих этот тип элементов. Переменная или константа структуированного типа всегда имеет несколько компонент. Каждая из этих компонент, в свою очередь, может принадлежать структуированному типу, что позволяет говорить о возможной вложенности типов.
В Турбо Паскале пять структуированных типов:
массивы;
строки;
множества;
записи;
файлы;
Однако, прежде чем приступить к их изучению, нам надо рассмотреть еще два типа данных - перечисляемый и интервальный, которые относятся к порядковым типам, нами ранее не рассматривались, но потребуются при изучении нового материала.
Перечисляемый тип Rainbow (РАДУГА) объединяет скалярные значения RED, ORANGE, YELLOW, GREEN, LIGHT_BLUE, BLUE, VIOLET (КРАСНЫЙ, ОРАНЖЕВЫЙ, ЖЕЛТЫЙ, ЗЕЛЕНЫЙ, ГОЛУБОЙ, СИНИЙ, ФИОЛЕТОВЫЙ). Перечисляемый тип Traffic_Light (СВЕТОФОР) объединяет скалярные значения RED, YELLOW, GREEN (КРАСНЫЙ, ЖЕЛТЫЙ, ЗЕЛЕНЫЙ).
Перечисляемый тип описывается в разделе описания типов, например:
type
Rainbow = (RED, ORANGE, YELLOW,
GREEN, LIGHT_BLUE, BLUE, VIOLET);
Каждое значение является константой своего типа и может принадлежать только одному из перечисляемых типов, заданных в программе. Например, перечисляемый тип Traffic_Light не может быть определен в одной программе с типом Rainbow, так как оба типа содержат одинаковые константы.
Описание переменных, принадлежащих к скалярным типам, которые объявлены в разделе описания типов, производится с помощью имен типов. Например:
type Traffic_Light= (RED, YELLOW, GREEN);
var Section: Traffic_Light;
Это означает, что переменная Section может принимать значения RED, YELLOW или GREEN.
Переменные перечисляемого типа могут быть описаны в разделе описания переменных, например:
var Section: (RED, YELLOW, GREEN);
При этом имена типов отсутствуют, а переменные определяются совокупностью значений, составляющих данный перечисляемый тип.
К переменным перечисляемого типа может быть применим оператор присваивания:
Section:= YELLOW;
Интервальный
Отрезок (диапазон значений) любого порядкового типа может быть определен как интервальный (ограниченный) тип. Отрезок задается диапазоном от минимального до максимального значения констант, разделенных двумя точками. В качестве констант могут быть использованы константы, принадлежащие к целому, символьному, логическому или перечисляемому типам. Скалярный тип, на котором строится отрезок, называется базовым типом. Примеры отрезков:
1..10
-15..25
'a'..'z'
Минимальное и максимальное значения констант называются нижней и верхней границами отрезка, определяющего интервальный тип. Нижняя граница должна быть меньше верхней.
Над переменными, относящимися к интервальному типу, могут выполняться все операции и применяться все стандартные функции, которые допустимы для соответствующего базового типа.
Процедуры и функции
Подпрограмма – это последовательность операторов, которые определены и записаны только в одном месте программы, однако их можно вызвать для выполнения из одной или нескольких точек программы. Каждая подпрограмма определяется уникальным именем. В языке Паскаль существуют два типа подпрограмм – процедуры и функции.
Процедура и функция – это именованная последовательность описаний и операторов. При использовании процедур или функций Паскаль-программа должна содержать текст процедуры или функции и обращение к процедуре или функции. Тексты процедур и функций помещаются в раздел описаний процедур и функций.
Процедура может содержать такие же разделы описаний, что и Паскаль-программа, а именно: разделы описания модулей, меток, констант, типов, переменных, процедур и функций. В заголовке функции определяется идентификатор функции, формальные параметры (если они имеются) и тип результата функции.
Приведем примеры описания процедуры и функции:
procedure NumString(N: integer; var S: string);
var V: integer;
begin
V := Abs(N);
S := ' ';
repeat
S := Chr(N mod 10 + Ord('0')) + S;
N := N div 10;
until N = 0;
if N < 0 then S := '-' + S;
end;function Max(a: Vector; n: integer): real;
var x: real; i: integer;
begin
x := a[1];
for i := 2 to n do if x < a[i] then x := a[i];
Max := x;
end;Процедура активизируется с помощью оператора процедуры, в котором содержатся имя процедуры и необходимые параметры. Операторы, которые должны выполняться при запуске процедуры, содержатся в операторной части модуля процедуры. Если в содержащемся в процедуре операторе внутри модуля процедуры используется идентификатор процедуры, то процедура будет выполняться рекурсивно (будет при выполнении обращаться сама к себе).
Пример вызова процедуры и функции:
NumString(25432, str);
rMax := Max(rV, 10);Передача имен процедур и функций в качестве параметров. Во многих задачах, особенно в задачах вычислительной математики, необходимо передавать имена процедур и функций в качестве параметров. Для этого в Турбо Паскаль введен новый тип данных – процедурный или функциональный, в зависимости оттого, что описывается.
Описание процедурных и функциональных типов производится в разделе описания типов:
type
FuncType = Function(z: Real): Real;
ProcType = Procedure (a,b: Real; var x,y: Real);Функциональный и процедурный тип определяется как заголовок процедуры и функции со списком формальных параметров, но без имени. Можно определить функциональный или процедурный тип без параметров, например:
type Proc = Procedure;
После объявления процедурного или функционального типа его можно использовать для описания формальных параметров – имен процедур и функций.
Кроме того, необходимо написать те реальные процедуры или функции, имена которых будут передаваться как фактические параметры. Эти процедуры и функции должны компилироваться в режиме дальней адресации с ключом {$F+}.
Пример. Составить программу для вычисления определенного интеграла
по методу Симпсона. Вычисление подынтегральной функции реализовать с помощью функции, имя которой передается как параметр. Значение определенного интеграла по формуле Симпсона вычисляется следующим образом:
ISimps=2*h/3*(0.5*F(A)+2*F(A+h)+F(A+2*h)+2*F(A+3*h)+2*F(B-h)+0.5*F(B))
где A и B – нижняя и верхняя границы интервала интегрирования; N – число разбиений интервала интегрирования; h=(B-A)/N, причем N должно быть четным.
Program INTEGRAL;
Type Func= function(x: Real): Real;
Var I,TN,TK:Real;
N:Integer;
{$F+}
Function Q(t: Real): Real;
begin
Q:=2*t/Sqrt(1-Sin(2*t));
end;
{$F-}
Procedure Simps(F:Func; a,b:Real; N:Integer;
var INT:Real);
Var sum, h: Real;
j:Integer;
Begin
if Odd(N) then N:=N+1;
h:=(b-a)/N;
sum:=0.5*(F(a)+F(b));
for j:=1 to N-1 do sum:=sum+(j mod 2+1)*F(a+j*h);
INT:=2*h*sum/3
End;Begin
WriteLn('Введите TN,TK,N ->');
Read(TN,TK,N);
Simps(Q,TN,TK,N,I);
WriteLn('I=',I:8:3)
End.
2.5 Организация ввода-вывода данных. Работа с файлами
Файлы
Большие совокупности данных, например сведения обо всех учащихся школы, телефонный справочник, удобно иметь записанными во внешней памяти в виде последовательности сигналов. Любой сколько-нибудь развитый язык программирования должен содержать средства для организации хранения информации на внешних запоминающих устройствах и доступа к этой информации. В Паскале для целей предусмотрены специальные объекты — файлы.
Файлом называется совокупность данных, записанная во внешней памяти под определенным именем.
Целесообразность применения файлов диктуется следующими причинами.
1. Ввод больших объемов данных, подлежащих обработке, утомителен и требует большого времени. Гораздо удобнее создать отдельный файл данных, который может быть подготовлен заранее и, самое главное, применяться неоднократно.
2. Файл данных может быть подготовлен другой программой, становясь, таким образом, связующим звеном между двумя разными задачами, а также средством связи программы с внешней средой.
3. Программа, использующая данные из файла, не требует присутствия пользователя в момент фактического исполнения.
Сведения о файловой системе ms dos
Каждый файл на диске имеет обозначение, которое состоит из двух частей: имени и расширения. В имени файла может быть от 1 до 8 символов. Расширение начинается с точки, за которой следуют от 1 до 3 символов, например: command.com, turbo.exe, autoexec.bat, turbo.tph, proba.pas.
Имя файла — это любое выражение строкового типа, которое строится по правилам определения имени в MS DOS:
• имя содержит до восьми разрешенных символов (прописные и строчные латинские буквы, цифры и символы: !, @, #, %, ^, &, (,),', ~, —, _;
• за именем может быть расширение — последовательность до трех разрешенных символов; расширение, если оно есть, отделяется от имени точкой.
Расширение имени файла, как правило, описывает содержание файла и не является обязательным. Многие программы устанавливают расширение имени файла автоматически, по нему вы можете узнать, какая программа создала файл. Например:
com, exe — готовые к исполнению программы;
bat — командные (Batch) файлы;
txt, doc — текстовые файлы;
hip — файл справочной службы;
pas — файл программы на языке Паскаль;
asm — файл программы на языке Ассемблер;
dat — файл данных;
arj — файл архива, созданный архиватором arj.
Устройства в Турбо Паскале.
Входящие в компьютер компоненты принято называть устройствами. Некоторые устройства компьютера используются во внешней памяти Турбо Паскаль как файлы. При этом для указания устройств используются специальные имена (которые не могут иметь "настоящие" файлы), например:
А:, В: — накопители на гибких магнитных дисках;
С:, D:, Е: и т.д. — винчестер;
CON — пульт управления (консоль), при выводе этим устройством является экран видеомонитора, а при вводе — клавиатура;
— устройства, подключенные к параллельным портам 1, (портом называют многоразрядный вход или выход в устройстве. Чаще все порту LPT1 подключен принтер);
PRN-принтер
СОМ1, СОМ2, СОМ3- устройства, подключенные к последовательным портам
NUL- пустое устройство
Примечание. Устройство Nul работает следующим образом: при чтении с него про--амме сообщается о конце файла, а при выводе на него информация на самом деле никуда не выводится, но программе, которая делала вывод, сообщается, что вывод произошел успешно.
Неотъемлемой характеристикой каждого файла являются размер, дата и время создания файла. Размер файла определяется числом входящих в него байтов. Дата время создания файла изменяются при изменении файла. Имена файлов регистрируются на магнитных дисках в каталогах (или директориях).
Любой файл содержит компоненты одного типа. Компонентами может быть любой тип Turbo Pascal, кроме файлового.
Все компоненты файла пронумерованы от 0 до последнего компонента.
компонент№0 |
компонент№1 |
компонент№2 |
компонент№3 |
…. |
Текущий указатель
В любой момент времени программе доступен только один компонент файла, на который ссылается текущий указатель (указатель обработки). Часто позицию размещения доступного элемента называют текущей позицией.
Как правило, все действия с файлом (чтение из файла, запись в файл) производится поэлементно, причем в этих действиях участвует текущий элемент файла. В результате совершения операций текущий указатель может перемещаться, настраиваясь на тот или иной элемент файла.
По способу доступа к элементам различают файлы последовательного и прямого доступа.
Файлом последовательного доступа называется файл, к элементам которого обеспечивается доступ в такой же последовательности, в какой они записывались.
Файлом прямого доступа называется файл, доступ к элементам которого осуществляется по адресу элемента.
По типу компонентов файла в Turbo Pascal существуют следующие разновидности файлов: текстовые, типизированные и нетипизированные.
Текстовый файл можно рассматривать как последовательность символов, разбитую на строки длиной от 0 до 255 символов.
К типизированным файлам относятся файлы строго определенного типа. Чаще всего это файлы, состоящие из записей. Они применяются для создания различных баз данных.
2.6 Библиотеки подпрограмм
Модуль (UNIT) в Турбо Паскале – это особым образом оформленная библиотека подпрограмм. Модуль в отличие от программы не может быть запущен на выполнение самостоятельно, он может только участвовать в построении программ и других модулей.
Модули позволяют создавать личные библиотеки процедур и функций и строить программы практически любого размера.
Модуль в Турбо Паскале представляет собой отдельно хранимую и независимо компилируемую программную единицу.
В общем случае модуль – это совокупность программных ресурсов, предназначенных для использования другими программами. Под программными ресурсами понимаются любые элементы языка Турбо Паскаль: константы, типы, переменные, подпрограммы. Модуль сам по себе не является выполняемой программой, его элементы используются другими программными единицами.
Все программные элементы модуля можно разбить на две части:
– программные элементы, предназначенные для использования другими программами или модулями, такие элементы называют видимыми вне модуля; – программные элементы, необходимые только для работы самого модуля, их называют невидимыми или скрытыми.
В соответствии с этим модуль, кроме заголовка, содержит две основные части, называемые интерфейсом и реализацией.
В общем случае модуль имеет следующую структуру:
unit <имя модуля>; {заголовок модуля}
interface
{ описание видимых программных элементов модуля }
{ описание скрытых программных элементов модуля }
begin
{ операторы инициализации элементов модуля }
end.В частном случае модуль может не содержать части реализации и части инициализации, тогда структура модуля будет такой:
unit <имя модуля>; {заголовок модуля}
interface
{ описание видимых программных элементов модуля }
implementation
end.Использование в модулях процедур и функций имеет свои особенности. Заголовок подпрограммы содержит все сведения, необходимые для ее вызова: имя, перечень и тип параметров, тип результата для функций, эта информация должна быть доступна для других программ и модулей. С другой стороны, текст подпрограммы, реализующий ее алгоритм, другими программами и модулями не может быть использован. Поэтому заголовок процедур и функций помещают в интерфейсную часть модуля, а текст – в часть реализации.
Интерфейсная часть модуля содержит только видимые (доступные для других программ и модулей) заголовки процедур и функций (без служебного слова forward). Полный текст процедуры или функции помещают в часть реализации, причем заголовок может не содержать список формальных параметров.
Исходный текст модуля должен быть откомпилирован с помощью директивы Make подменю Compile и записан на диск. Результатом компиляции модуля является файл с расширением TPU (Turbo Pascal Unit). Основное имя модуля берется из заголовка модуля.
Для подключения модуля к программе необходимо указать его имя в разделе описания модулей, например:
uses CRT, Graph;
В том случае, если имена переменных в интерфейсной части модуля и в программе, использующей этот модуль, совпадают, обращение будет происходить к переменной, описанной в программе. Для обращения к переменной, описанной в модуле, необходимо применить составное имя, состоящее из имени модуля и имени переменной, разделенных точкой.
Например, пусть имеется модуль, в котором описана переменная К:
unit M;
interface
var K: Integer;
implementation
..................
end.
Пусть программа, использующая этот модуль, также содержит переменную К:
Program P;
uses M;
var K: Char;
begin
..................
end.
Для того, чтобы в программе P иметь доступ к переменной K из модуля M, необходимо задать составное имя M.K.
Использование составных имен применяется не только к именам переменных, а ко всем именам, описанным в интерфейсной части модуля.
Рекурсивное использование модулей запрещено.
Если в модуле имеется раздел инициализации, то операторы из этого раздела будут выполнены перед началом выполнения программы, в которой используется этот модуль.