Pascal

Инструкция GoTo

GoTo Метка;

Осуществляется переход к инструкции, перед которой указана метка, объявленная в разделе label.

while Условие do begin
( Инструкции } end;

Проверяется значение выражения Условие, если оно равно True (условие выполняется), то выполняются инструкции, находящиеся между begin и end (инструкции цикла). Затем снова проверяется значение выражения Условие, и так продолжается до тех пор, пока значение выражения Условие не станет равным False. Таким образом, после слова while записывается условие выполнения инструкций цикла.

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.

repeat
begin
{ Инструкции } end until Условие;

Выполняются инструкции, находящиеся между begin и end (инструкции цикла), после этого проверяется значение выражения Условие. Если оно равно False (т. е. условие не выполняется), то инструкции цикла выполняются еще раз. И так продолжается до тех пор, пока Условие не станет истинным. Таким образом, после слова until записывается условие завершения цикла.

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.

Вариант 1 (с увеличением счетчика):

for Счетчик := НачальноеЗначение to КонечноеЗначение do begin
Инструкции }
end;

Инструкции между begin и end выполняются

[{КонечноеЗначение — НачальноеЗначение) + 1] раз.

Если НачальноеЗначение больше, чем КонечноеЗначение, ТО ИНСТРУКЦИИ между begin И end не ВЫПОЛНЯЮТСЯ.

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.

Вариант 2 (с уменьшением счетчика):

for Счетчик := НачальноеЗначение downto КонечноеЗначение do begin
{ Инструкции } end;

ИНСТРУКЦИИ Между begin И ‘ end ВЫПОЛНЯЮТСЯ [{НачальноеЗначение — КонечноеЗначение) +1] раз.
Если НачальноеЗначение меньше, чем КонечноеЗначение, ТО ИНСТРУКЦИИ между begin И end не ВЫПОЛНЯЮТСЯ.

Вариант 1:

case Выражение of
Список_констант1: begin
{ Инструкции 1 } end; Список_констант2: begin
{ Инструкции 2 } end;
Список_коистантЗ: begin
{ Инструкции 3 } end; end;

Вариант 2:

case Выражение of
Список_констант1: begin
{ Инструкции 1 } end; Список_констант2: begin
{ Инструкции 2 } end;
CnncoK_KOHCTaHTj: begin
{ Инструкции J } end else begin
{ Инструкции } end; end;

Инструкции между begin и end выполняются в том случае, если значение выражения после слова case совпадает с константой из соответствующего списка. Если это не так, то выполняются инструкции, следующие после else, расположенные между begin И end..

Вариант 1:

if Условие then
begin
{ Эти инструкции выполняются, }
{ если Условие истинно }
end
else
begin
( Эти инструкции выполняются, }
{ если Условие ложно }
end;

Вариант 2:

if Условие then
begin
{ Эти инструкции выполняются, }
{ если Условие истинно } end;

Примечание
Если между begin и end находится только одна инструкция, то слова begin и end можно не писать.

К основным типам данных языка Pascal относятся:

• целые числа (integer и др.);


• действительные числа (real и др.);


• символы (char);


• строки (string);


• логический (boolean).

Целые числа и числа с плавающей точкой могут быть представлены в различных форматах.
Целые числа

Формат	Диапазон значений
SHORTINT	-128-127
INTEGER	-32 768-32 767
LONGINT	-2 147 483 648-2 147 483 647
BYTE	0-255
WORD	0-65 535

Действительные числа

Формат	Диапазон значений	Количество значащих цифр
REAL	2.9E-39-1.7e38	11-12
SINGLE	1.5E-45-3.4e38	7-8
DOUBLE	5.0Е-324-1.7е308	15-16
EXTENDED	3.4Е-4932-1.1е4932	19-20

Строки

Строки могут быть объявлены двумя способами.

Вариант 1:

Имя: string;

Объявлена переменная-строка длиной 255 символов.

Вариант 2:

Имя: string[ДлинаСтроки ];

Объявлена переменная-строка указанной длины.

Массивы

Объявление одномерного массива:

ИмяМассива:array[НижнийИндекс..ВерхнийИндекс] of ТипЭлементов;

Объявление двумерного массива:

ИмяМассива:array[НижнийИндекс1..ВерхнийИндекс1,
НижнийИндекс2..ВерхнийИндекс2 ] of ТипЭлементов;

Записи

Записи можно объявить двумя способами.

Вариант 1:

ПеременнаяЗапись:record
Поле1: Тип1 ;
Поле2:Тип2;
ПолеО:TnnJ;
end;

Вариант 2

(сначала объявляется тип записи, затем — переменная-запись):

type
ИмяТипаЗаписи:record
Поле!:Тип1; Поле2: Тип2;
Полей: TnnJ; end;
var
ПеременнаяЗапись:ИмяТипаЗаписи;

Программа на языке Pascal состоит из разделов:

• раздел объявления меток;


• раздел объявления констант;


• раздел объявления типов;


• раздел объявления переменных;


• раздел объявления процедур и функций;


• раздел инструкций программы.

Структура программы в общем виде выглядит следующим образом:

label
{ объявления меток }
const
{ объявления констант )
type
{ объявления типов }
var
{ объявления переменных }
{ объявления процедур и функций программиста }
begin
{ инструкции основной программы} end.