- •1. Основные элементы языка
- •1.1. Основные символы
- •1.2. Зарезервированные слова
- •1.3. Разграничители
- •2. Стандартные типы скаляров
- •2.1. Целочисленный тип /Integer/
- •2.2. Байтовый тип /Byte/
- •2.3. Вещественный тип /Real/
- •2.4. Булевский тип /Boolean/
- •3.2.1. Раздел описания меток
- •3.2.2. Раздел определения констант
- •3.2.3. Раздел определения типов
- •3.2.4. Раздел описания переменных
- •3.2.5. Раздел описания процедур и функций
- •3.2.5.1. Подпрограмма - функция
- •3.2.5.2. Подпрограмма - процедура
- •3.3. Раздел операторов
- •3.3.1. Оператор присвоения
- •3.3.2. Ввод – вывод данных
- •Кафедра вычислительной техники и инженерной кибернетики
- •Кафедра вычислительной техники и
- •3.3.3. Оператор безусловного перехода /goto/
- •3.3.4. Условные операторы
- •3.3.4.1. Оператор if
- •3.3.4.2. Оператор выбора /Case/
- •3.3.4.3. Операторы повтора for, while и repeat
- •Оператор For
- •Оператор while. Цикл с предусловием
- •Список литературы
- •Приложение 1 Основные стандартные процедуры и функции
- •Приложение 2 Структура построения программы в языке Pascal
- •Приложение 3 Символы схем алгоритмов по гост 19.002-80 и 19.003-80
- •Содержание
Кафедра вычислительной техники и инженерной кибернетики
При выполнении операторов
Writeln (‘ Кафедра вычислительной техники и’);
Write (‘ инженерной кибернетики’);
получим:
Кафедра вычислительной техники и
инженерной кибернетики
Применение оператора writeln без операндов приводит к переходу на начало новой строки.
При необходимости вывода данных на принтер программу следует организовать следующим образом:
program имя;
uses printer;
- - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - -
write (lst, <список вывода>);
- - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - -
При этом печатающее устройство должно быть готовым к работе (данные на экран дисплея выводиться не будут).
Нередко, особенно при отладке программы, возникает необходимость выводить данные при одном запуске программы на экран, при другом - на печатающее устройство или в файл. Тогда полезно вывод организовывать с указанием соответствующего устройства вывода, например:
Var Dev : text;
Каnаl : string;
Begin
- - - - - - - - - - - - - - - - - - - - - - - - - -
write ('канал вывода результатов='):
read (Каnа1);
assign (Dev, Kanal);
rewrite (Dev);
- - - - - - - - - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - - - - - - - - -
write (Dev, <список вывода>);
close (Dev);
End.
На запрос ‘канал вывода результатов=’ следует указать соответственно:
Con – для вывода на монитор;
Prn – для вывода на печатающее устройство;
Имя файла – для вывода результатов отчета.
По умолчанию текст будет выводиться на экран дисплея.
3.3.3. Оператор безусловного перехода /goto/
Оператор безусловного перехода состоит из зарезервированного слова goto /перейти/ и следующего за ними идентификатора метки. Оператор goto служит для безусловной передачи управления на тот оператор программы, который обозначен /помечен/ данной меткой. При использовании оператора goto необходимо соблюдать следующие правила:
Перед тем, как использовать метку в программе, ее следует описать в разделе описания меток того блока программы, в котором данная метка используется.
Областью действия метки является тот блок, в котором она описана. Таким образом, невозможно перейти за пределы процедуры или функции или передать управление внутрь какой-либо процедуры или функции.
Оператор безусловного перехода имеет вид
goto M;,
где М – метка оператора, которому необходимо передать управление.
Пример использования оператора безусловного перехода:
Program primer;
Label 100;
- - - - - - - - - - - - - - - - - -
Begin
- - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
goto 100;
- - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
100: y := x+exp(1.25*ln(a));
- - - - - - - - - - - - - - - - - -
- - - - - - - - - - - - - - - - - -
End.