- •Содержание
- •Язык программирования Turbo Pascal 7.0 Основные понятия
- •Буквенно-цифровые символы.
- •Специальные символы.
- •Структура программы на языке Паскаль
- •Константы в языке Паскаль
- •Типы данных в языке Паскаль
- •Простые типы данных
- •Объявление переменных
- •Выражения
- •Стандартные арифметические функции.
- •Арифметические операции.
- •Операторы ввода
- •Операторы вывода
- •Использование стандартных модулей
- •Пример программы (линейный алгоритм)
- •Составной оператор
- •Условный оператор
- •Оператор выбора
- •Структурированные типы данных
- •Работа с массивами
- •Работа со строками
- •Операции над строками.
- •Множества
- •Операции над множествами
- •Стандартные процедуры и функции для работы с файлами.
- •Работа с текстовыми файлами
- •Работа с типизированными файлами
- •Подпрограммы в языке Паскаль.
- •Локальные и глобальные переменные
- •Подпрограмма-процедура
- •Параметры
- •Подпрограмма-функция
Операторы вывода
Организация вывода в языке Pascal осуществляется с помощью операторов:
Write (<список вывода>)
Writeln (<список вывода>)
<список вывода> - перечень элементов вывода, разделённых запятой. В качестве элементов вывода могут быть использованы константы, переменные, вызовы функций, выражения.
При использовании указанных операторов информация выводится на экран. В отличие от оператора Write оператор Writeln после вывода всех указанных в операторе данных осуществляет переход к следующей строке.
Для изменения стандартной формы вывода существуют два формата вывода, которые записываются через двоеточие после соответствующего элемента вывода:
Write (<выражение>:<n>:[<m>])
<n> - длина выводимого поля (при выводе значений любого типа);
<m> - число знаков после десятичной точки (для вывода вещественных чисел в форме с фиксированной точкой).
Использование стандартных модулей
В Паскале имеется большое количество подпрограмм и данных, объединенных в несколько стандартных модулей. Модуль System является основной библиотекой и автоматически подключается к любой программе, его не надо подключать в разделе Uses. Модуль Crt содержит константы, переменные и подпрограммы, предназначенные для работы с консолью. (Консоль – это совокупность стандартных устройств для ввода и вывода данных: клавиатура и экран монитора.) Чтобы использовать подпрограммы, входящие в модуль Crt, его нужно подключить в разделе Uses:
Uses Crt;
ClrScr – очистка экрана;
Readkey – чтение символа с клавиатуры.
Пример программы (линейный алгоритм)
Program First;
Uses Crt;
Var
R, L, S:Real;
Begin
ClrScr;
Write('Введите радиус->');
Readln(R);
L:=2*Pi*R;
S:=Pi*R*R;
Writeln('Длина окружности - ',L);
Writeln('Площадь круга - ',S);
Readkey;
End.
Составной оператор
Составной оператор - это группа операторов, заключенных в операторные скобки, которыми является пара ключевых слов Begin и End. Таким образом, составной оператор включает в себя другие операторы (простые, не содержащие других операторов, или другие составные, или структурные). Составной оператор применяется в тех случаях, когда синтаксис языка Pascal допускает использование только одного оператора, в то время как семантика программы требует задания некоторой последовательности действий. Это, в частности, бывает необходимо при реализации разветвляющихся и циклических алгоритмов. Пример:
Условный оператор
В языке Pascal для реализации разветвляющихся алгоритмов используется условный оператор, который имеет две формы: полную и краткую.
Полная форма условного оператора имеет формат:
if <логическое выражение>
then <оператор 1>
else <оператор 2>;
Если < логическое выражение > - истинно, то выполняется <оператор 1>, иначе (если < логическое выражение > = ложно) - оператор 2.
Например:
if x<0 then x:=x+1
else x:=x-1;
Краткая форма условного оператора имеет формат:
if <логическое выражение>
then <оператор 1>;
Если логическое выражение истинно, то выполняется <оператор 1>, в противном случае выполняется оператор, расположенный в программе после условного оператора IF.
Например:
if x<0 then x:=x+1;
s:=s+x;
Действие условного оператора можно расширить путём использования составного оператора, который имеет формат:
begin
<последовательность операторов>
end
Последовательность операторов, заключённая между ключевыми словами begin и end, воспринимается в языке Pascal как один составной оператор и может быть размещена в условном операторе.
Например:
if x<0
then
begin
x:=x+1;
y:=y+1
end
else
x:=x-1;