- •Алгоритмы.
- •Условие
- •Типы данных.
- •Целые числа.
- •Вещественный тип данных.
- •Символьные и строковые типы данных.
- •Булевские данные.
- •Указатели.
- •Идентификаторы.
- •Операторы.
- •Операторы присваивания.
- •Арифметические операторы.
- •Побитовые операторы.
- •Операторы отношений.
- •Логические операторы.
- •Адресные операторы.
- •Операторы над множествами.
- •Строковые операторы.
- •Создание программ в среде turbo pascal Структура программ.
- •1: WriteLn(' I меньше 10 ');
- •Тип константы компилятор определяет по типу значения. Описание типов используется при создании типов данных, отличных от базовых.
- •Обзор управляющих структур языка pascal
- •Интегрированная среда turbo pascal Назначение и состав среды.
- •Строка статуса
- •Справочник.
- •Работа с блоками текста
- •Компиляция и выполнение
- •Выполнение по шагам и трассировка
- •Управляющие структуры языка Паскаль. Условные операторы.
- •Пустой оператор
- •Условный оператор
- •If Flag then Writeln(‘Истинно’)
- •If not Flag then Writeln(‘Ложно’)
- •Оператор выбора
- •Операторы цикла Оператор цикла с предусловием (while)
- •Оператор цикла с постусловием (repeat…until)
- •Оператор цикла с параметром (for...Do)
- •I : Integer; { описание параметров циклов}
- •Процедуры и функции.
- •Структура процедуры и функции.
- •Локальные и глобальные элементы.
- •I : Integer; {I - глобальная}
- •I : Integer; {I - локальная }
- •Параметры.
- •I : Integer; {I - локальная }
- •Var { описание переменных }
- •Var { описание внутренних переменных}
- •Структурированные типы данных языка паскаль Перечисляемый тип.
- •Структурированные типы
- •Массивы
- •If eq then Write(“Массивы одинаковы”);
- •Множества
- •Совместимость и преобразование типов.
- •Символы и строки Символы:
- •Строки.
- •Строка- это массив символов.
- •Доступ к файлам.
- •Логические устройства
- •Открытие файла
- •Процедуры и функции для работы с файлами.
- •Текстовые файлы.
- •Типизированные файлы.
- •Нетипизированные файлы.
- •Модуль graph.
- •Драйверы.
- •Координатная система.
- •Текущий указатель.
- •Фигуры и стили.
- •Окна и битовые образы.
- •Обработка ошибок.
- •Пример простой программы:
- •Справочник по модулю Graph
- •Модуль crt
- •Ввод данных с клавиатуры. Более подробно о cтандартных операторах ввода.
- •Функции crt.
- •Текстовый вывод на экран.
- •Некоторые процедуры модуля crt.
- •Программирование звукового генератора.
- •Указатели.
- •Динамические переменные.
- •Проблема ограничения памяти.
Операторы над множествами.
Операторы над множествами выполняются в соответствии с правилами логики теории множеств. Они включают:
+ - объединение;
- - разность;
* - пересечение.
Строковые операторы.
Существует единственный оператор - "+", который выполняет конкатенацию двух строк.
Создание программ в среде turbo pascal Структура программ.
Программа, написанная на языке TURBO PASCAL должна иметь следующую структуру:
Program Имя программы;
Uses
Список используемых библиотек (модулей);
Label
Список меток (использовать не рекомендуется);
Const
Определение констант;
Type
Определение типов;
Var
Описание глобальных переменных;
Определение процедур и функций;
begin
Основной блок программы (тело программы);
end.
Если некоторые элементы языка не используются в программе, то они исключаются из приведенной структуры (напр. Label).
В тексте программы можно использовать комментарии – текст, заключенный в фигурные скобки (использовать настоятельно рекомендуется).
Директива USES подключает библиотечные модули из стандартного набора TURBO PASCAL или написанные пользователем. Список библиотек дается через запятую
Uses
Crt, Graph; { библиотеки работы с монитором
и клавиатурой, графическая библиотека }
Блок описания меток содержит перечисленные через запятую метки переходов, установленные в основном блоке программы.
Label
1, 123, m1, Start, Stop;
В тексте программы метка стоит перед оператором и отделяется двоеточием. Метка используется для организации переходов с помощью оператора Goto
If i < 10 then Goto 1 else Goto m1;
1: WriteLn(' I меньше 10 ');
Goto Stop;
m2: WriteLn(' i больше или равно 10 ');
Stop: ReadLn;
Описание констант:
Имя константы = значение;
Const
X = 10;
Y = 10.2;
Z = 2E3;
C = 'A';
Ok = True;
Str1 = 'Для продолжения нажмите клавишу <Enter>';
Тип константы компилятор определяет по типу значения. Описание типов используется при создании типов данных, отличных от базовых.
Имя типа = определение типа;
Type
MyTyp = array [1..10] of Real;
DataTyp = '0'..'9';
Описание переменных:
Имя переменной : тип переменной;
Var
Alfa : Integer;
Beta : Real;
Flag : Boolean;
C : Char;
InputString : String;
Имя переменной должно начинаться с буквы и может содержать буквы, цифры и символы подчеркивания.
Описание массивов.
Имя массива : array [диапазон индексов] of тип значений массива;
Var
Buf : array [0..10] of Integer;
При определении пользовательских процедур и функций описывается имя процедуры (функции) и тело. Например функция возведения числа в куб:
Function Kub(x: Real): Real;
begin
Kub := x * x * x;
end;
Обзор управляющих структур языка pascal
Понятие оператора.
Оператор в программе – это единое неделимое предложение, выполняющее какое-либо действие (присваивание, сравнение величин, вызов подпрограммы и т.п.). Два последовательных оператора должны разделяться точкой с запятой';'.
a := 11;
b := a * a;
Write( a, b );
Несколько операторов можно располагать на одной строке.
Составной оператор – это последовательность операторов, ограниченная словами begin end;.
begin
a := 11;
b := a * a;
Write( a, b )
end;
Последняя точка с запятой перекочевала за слово end.
В структурном программировании составной оператор рассматривается как единая логическая единица.
Пустой оператор – точка с запятой.
If LogicFunc( x ) then;
Имеет смысл когда например, нужно проигнорировать логическое значение, возвращаемое функцией.
Оператор присваивания
Переменная приемник := Переменная источник;
Переменная приемник := Константа;
Переменная приемник := Функция;
Y := X * 2;
Y := Sin(x);
Условный оператор
if Условие then Оператор1 else Оператор 2;
if Условие then Оператор;
Оператор выбора
Case Переменная of
Значение 1: Оператор1;
Значение 2: Оператор2;
…
Значение N: ОператорN
else
Оператор
end;
Операторы цикла
С предусловием:
While Условие do Оператор;
С постусловием:
Repeat
Оператор 1;
Оператор 2;
…
Оператор N
Until Условие;
С параметром, Нач.знач. < Кон.знач.
For Счетчик цикла := Нач.знач. to Кон.знач. do
Оператор;
С параметром, Нач.знач. > Кон.знач.
For Счетчик цикла := Нач.знач. downto Кон.знач.do
Оператор;
Операторы ввода с клавиатуры
Read( Список переменных );
ReadLn( Список переменных );
Read( x );
Операторы вывода на дисплей
Write( Список переменных и текст);
WriteLn( Список переменных и текст );
WriteLn(' Добрый день !');
Встроенные функции(не требующие подключения библиотек):
Abs(X); - Абсолютное значение;
Sin(X); - Синус;
Cos(X); - Косинус;
ArcTan(X); - Арктангенс;
Sqrt(X); - Корень квадратный;
Sqr(X); - Квадрат;
Exp(X); - e в степени Х;
Ln(X); - Логарифм натуральный;
Пример простой программы:
Program Demo;
{Программа перевода $ в рубли.
Автор Иванов И. И.}
Const
Kurs = 28.5;
Var
Dol, Rub : Real;
begin
WriteLn( ' Введите сумму в $ ' );
ReadLn( Dol );
Rub := Dol * Kurs;
WriteLn( '$', Dol, ' это ', Rub, 'руб.' );
end.
(Обратить внимание на отступы в тексте программы, что является важным элементом структурирования.)
Порядок создания программы:
-
Запустить программу
C:\TP\BIN\TURBO.EXE
через меню F2 -> TURBO PASCAL
-
В редакторе набрать текст программы.
-
Записать текст программы на диск:
F10 -> File -> SaveAs.. -> Задать имя программы -> Ok
-
Транслировать программу
F10 -> Compile -> Make либо F9
-
Если есть синтаксические ошибки, исправить их.
-
Запустить программу на выполнение
F10 -> Run -> Run либо Ctrl + F9
-
Просмотреть результат выполнения программы
F10 -> Debug -> User Screen либо Alt + F5
-
Возвратиться в окно редактора
Esc
Правилом хорошего тона считается, когда при запуске программы на экране печатается назначение данной программы, при вводе данных печатается запрос, поясняющий что нужно ввести, при выводе печатается комментарий к выведенному значению.
Например:
---------------------------------------------------------
| Вычисление площади треугольника.
|
|Введите (через пробел) длину основания и высоту (в см.)
|-> 8.5 10
|
|Площадь треугольника равна 42.5 кв.см.
---------------------------------------------------------