Программирование на языке Pascal от Елены Клейн
Хотите стать программистом? Научиться писать программы? С чего начать? Давайте начнем с языка Паскаль.
Словарик
| ‘ ‘ | Две единичных кавычки. Ставятся с клавиши «Э» («Є») в английской раскладке клавиатуры. Между ними записывают текстовые переменные или просто текст, который необходимо вывести. |
| ( ) | Круглые скобки. Используются во многих местах программы для обозначения того, к чему именно будет применена идущая перед ними команда. Например, Write (a) — напечатать значение переменной а. Sqrt (x+y) — извлечь квадратный корень из суммы x+y. |
| . | Точка. Одна точка встречается в самом конце программы, после слова end. |
| .. | Две точки. Служат заменой слова «до» при задании массива. Например, запись [1..20] означает, что мы задаем массив, состоящий из одной строки, содержащей 20 элементов. А запись [1..8,1..10] означает, что мы задаем массив, содержащий 8 строк по 10 элементов в каждой. |
| := | Команда «Двоеточие равно» по-научному называется «оператор присваивания». А по поведению похожа на гопника. Комбинация «Двоеточие равно» никого ни о чем не спрашивает. Она берет ячейку памяти из левой части, и засовывает туда результат действий из правой части. Если в ячейке уже что-то было – старое значение стирается, и туда насильно вписывается новое. Разбой и хулиганство, одним словом… |
| ; | Точка с запятой означает, что строка закончена и следует перейти к выполнению следующей команды. |
| [ ] | Квадратные скобки позволяют указывать номер элемента в массиве, чтобы обратиться к конкретному элементу. Например, запись a[8] означает, что в одномерном массиве по имени a (строке, где каждый элемент зовут а, но не просто, а еще с номером, как в семье, где у всех одинаковая фамилия — а, и разные имена — номера), мы обращаемся к восьмому по счету элементу. А запись a[i,j] означает что мы обращаемся к элементу а, стоящему в i строке на j месте. |
| Фигурные скобки нужны для обозначения комментария в программе. То, что внутри фигурных скобок, компьютер не пытается выполнять. Поэтому используют их в двух случаях: когда рядом с каким-то блоком программы хотят объяснить, что именно делает этот блок, или когда программа не работает как надо. Тогда мы берем в такие скобки кусочки программмы, чтоб выяснить, в каком блоке у нас ошибка. | |
| = | Просто «равно» — это интеллигент, старенький профессор. Который вежливо спрашивает: «Скажите пожалуйста, а правая часть выражения таки равна его левой части? Да? Нет?» Т.е. обычный знак «равно» — это оператор сравнения . |
| array | Объявление массива. Массив нужен, если мы хотим задать сразу много переменных, имеющих один тип и выполняющих одинаковую работу. Тогда мы пишем в разделе Var a: array[1..150] и задаем сразу 150 переменных по имени а с разными номерами: a[1], a[2], … , a[150] |
| assign | Если мы хотим вводить данные не с клавиатуры (как маленькие), а из файла (как настоящие программисты), мы должны сказать компьютеру, что некая переменная у нас с этого момента будет брать значения из определенного файла. Пишут так: assign (f, ‘input.txt’); |
| Begin | Начало. Может означать начало программы, а может встретиться и внутри программы, если, например, при выполнении какого-то условия нужно сделать несколько действий. Тогда Begin — это как бы открытая скобка, показывающая, что с этого места программы начинаются действия, которые надо выполнять. |
| Char | Тип переменных. Этот тип нужен, если мы работаем с символами, записанными по одному. Например, с буквами, или знаками «+» и «-». Или даже с цифрами, но, во-первых, 15 – это будет уже две переменных типа Char, потому, что в одну такую переменную помещается только один символ, а во-вторых, цифры в Char нельзя складывать. Применять математические действия к таким переменным нельзя. Много другого, тоже полезного, делать можно. |
| close | Если мы работаем с файлами, из которых берем информацию или, наоборот, в которые складываем результаты, то после окончания работы с файлом его надо закрыть. Close(f) — закрыть файл, ассоциирванный с f. |
| div | Помните, в начальной школе вы еще не знали, что бывают дробные числа? Тогда вы делили одно число на другое «с остатком». Иногда в программах нам понадобится такое деление. Так вот, если 7:3=2(1 остаток), то 7 div 3 = 2. Это целая часть, получившаяся при делении. |
| do | «Делать». Часть оператора цикла For. Пишут так: For i:=1 to 5 do, что означает «Для i от 1 до 5 делать…» — дальше вы напишите, что именно вам надо сделать, в данном случае, 5 раз. |
| else | Иначе. Используют вместе с оператором If. Если основное условие не выполнилось, то будут выполнятся действия, прописанные после оператора else. Кстати, очень важно, перед этим оператором НЕ СТАВЯТ точку с запятой в предыдущей строке. Исключение! |
| end | Конец. Если с точкой — то конец всей программы. Если с «точкой с запятой» — то закрытая «операторная скобка», обычно — парочкой к Begin, но есть и одинокие варианты end. Например, оператор case не содержит Begin, но заканчивается end. |
| eof | Очень удобная команда. While not eof (f) do означает читать файл f пока он не закончится. При этом вам совершенно не надо знать, какой длины ваш файл. Сказали — читай до конца, комп и читает… |
| file | Это тип данных, который позволяет потом использовать переменные этого типа для чтения информации из файлов или записи информации в файл. |
| For | Оператор создания цикла. Если вам надо вывести какое-то слово 150 раз, вы конечно можете писать его 150 раз вручную. А можете просто задать цикл For i:=1 to 150 do, и ваша задача выполнится 150 раз. Правда, если вы не знаете сколько точно раз надо выполнить действие, этот цикл не подходит. |
| goto | Если до раздела Var вы прописали Label 1,2,3; а потом в середине программы некоторые строчки начинаете с 1: 2: 3:, то с помощью оператора goto 2, например, вы можете отправиться прямо к строке, начатой с 2: перескочив на сколько угодно строк вниз или вверх по тексту программы. |
| if | Если. Оператор логического ветвления. Позволяет проверять условия, и, если условия выполнились, выполнять одну группу действий, а если нет — другую. Иногда сопровождается else. |
| input.txt | Так будет называться текстовый файл (созданный в программе Блокнот), в который мы сможем записывать данные, которые компьютер должен обработать в процессе программы. А в файл output.txt он уже запишет результат самостоятельно. Кстати, чтоб все работало, этот файл должен лежать в одной папке с вашей программой. Ну, или пишите длинный путь к файлу, начиная с имени жесткого диска. |
| Integer | это целые числа от -32 727 до 32 727 . Число 33 000 и даже 32 728 компьютер уже целым не считает. У него в голове такое длинное число не укладывается. Что делать, если нужно работать с большим числом или с дробью? Для этого есть другой тип. |
| Label | Если до раздела Var вы прописали Label 1,2,3; а потом в середине программы некоторые строчки начинаете с 1: 2: 3:, то с помощью оператора goto 2, например, вы можете отправиться прямо к строке, начатой с 2: перескочив на сколько угодно строк вниз или вверх по тексту программы. |
| mod | Помните, в начальной школе вы еще не знали, что бывают дробные числа? Тогда вы делили одно число на другое «с остатком». Иногда в программах нам понадобится такое деление. Так вот, если 7:3=2(1 остаток), то 7 mod 3 = 1. Это остаток, получившийся при делении. |
| output.txt | Так будет называться текстовый файл (созданный в программе Блокнот), в который компьютер будет записывать результаты, получившиеся в результате работы программы. Кстати, чтоб все работало, этот файл должен лежать в одной папке с вашей программой. Ну, или пишите длинный путь к файлу, начиная с имени жесткого диска. |
| Program | Самое первое слово в прграмме. Назовите свою программу, например Program prim1; |
| read | Останавливает выполнение программы, и ждет, пока пользователь введет что-нибудь с клавиатуры. Получив информацию, проверяет, соответствует ли она заказанному типу переменной. Если да — запоминает в указанную ячейку памяти. Если нет — выбрасывает из программы с сообщением об ошибке. Read (g); — запомнит переменную в ячейку по имени g. |
| readln | Аналогично read, только после выполнения уйдет на новую строчку на экране. |
| Real | это не только большие положительные или отрицательные числа, но и дробные числа. Запомните, компьютер будет следить за тем, чтоб ваши переменные ВСЕГДА были нужного типа. Если вы сложите два целых числа, умножите целое на целое или отнимите от одного целого числа другое, вы все равно получите целое число. А если вы разделите целое на целое? Результат может быть и дробным. Поэтому переменная, которая получается в результате деления, должна быть типа Real. Числа, которые компьютер выводит на экран в этом типе, выглядят непривычно. Вот так, например: |
3,2000000000Е+4 это 32 000
3,2000000000Е-2 это 0,032
Откуда я знаю? Все просто. Считайте, что знак «+» после буквы Е означает слово «умножить», а знак «-», соответственно, «разделить». Сама буква Е означает, что делить и умножать мы будем на число 10. А число после знака указывает, сколько раз мы должны выполнить это действие. Когда-нибудь на уроках математики вам расскажут о «стандартном виде числа», т.е. о том, что любое число можно записать в виде десятичной дроби, умноженной на 10 в какой-то степени, например:
Паскаль – Обзор
Паскаль – это язык высокого уровня общего назначения, который был первоначально разработан Никлаусом Виртом в начале 1970-х годов. Он был разработан для преподавания программирования как систематической дисциплины и для разработки надежных и эффективных программ.
Паскаль является языком на основе Алгола и включает в себя множество конструкций Алгола. Алгол 60 является подмножеством Паскаля. Паскаль предлагает несколько типов данных и структур программирования. Программы Pascal легко понять и поддерживать.
Паскаль приобрел популярность в сфере преподавания и обучения по разным причинам:
- Легко обучаема.
- Структурированный язык.
- Он производит прозрачные, эффективные и надежные программы.
- Он может быть скомпилирован на различных компьютерных платформах.
Особенности языка Паскаль
Паскаль имеет следующие особенности –
- Паскаль является строго типизированным языком.
- Он предлагает обширную проверку ошибок.
- Он предлагает несколько типов данных, таких как массивы, записи, файлы и наборы.
- Он предлагает множество структур программирования.
- Он поддерживает структурированное программирование через функции и процедуры.
- Он поддерживает объектно-ориентированное программирование.
Факты о Паскале
Язык Паскаль был назван в честь Блеза Паскаля, французского математика и пионера в разработке компьютеров.
Никлаус Вирт завершил разработку оригинального языка программирования Pascal в 1970 году.
Паскаль основан на блочно-структурированном стиле языка программирования Algol.
Паскаль был разработан как язык, подходящий для преподавания программирования как систематической дисциплины, реализация которой может быть как надежной, так и эффективной.
Стандарт Паскаля ISO 7185 был впервые опубликован в 1983 году.
Паскаль был основным языком высокого уровня, который использовался для разработки в Apple Lisa и в первые годы существования Mac.
В 1986 году Apple Computer выпустила первую реализацию Object Pascal, а в 1993 году Комитет по стандартам Pascal опубликовал объектно-ориентированное расширение для Pascal.
Язык Паскаль был назван в честь Блеза Паскаля, французского математика и пионера в разработке компьютеров.
Никлаус Вирт завершил разработку оригинального языка программирования Pascal в 1970 году.
Паскаль основан на блочно-структурированном стиле языка программирования Algol.
Паскаль был разработан как язык, подходящий для преподавания программирования как систематической дисциплины, реализация которой может быть как надежной, так и эффективной.
Стандарт Паскаля ISO 7185 был впервые опубликован в 1983 году.
Паскаль был основным языком высокого уровня, который использовался для разработки в Apple Lisa и в первые годы существования Mac.
В 1986 году Apple Computer выпустила первую реализацию Object Pascal, а в 1993 году Комитет по стандартам Pascal опубликовал объектно-ориентированное расширение для Pascal.
Зачем использовать Паскаль?
Паскаль позволяет программистам определять сложные структурированные типы данных и строить динамические и рекурсивные структуры данных, такие как списки, деревья и графики. Паскаль предлагает такие функции, как записи, перечисления, поддиапазоны, динамически распределенные переменные со связанными указателями и наборами.
Паскаль позволяет определения вложенных процедур на любой уровень глубины. Это действительно обеспечивает отличную среду программирования для обучения программированию как систематической дисциплине, основанной на фундаментальных понятиях.
Среди самых удивительных реализаций Паскаля –
- Skype
- Total Commander
- TeX
- Macromedia Captivate
- Яблочная Лиза
- Различные компьютерные игры
- Встроенные системы
Паскаль – настройка среды
Существует несколько компиляторов и интерпретаторов Pascal, доступных для общего пользования. Среди них –
Turbo Pascal – предоставляет IDE и компилятор для запуска программ Pascal на CP / M, CP / M-86, DOS, Windows и Macintosh.
Delphi – предоставляет компиляторы для запуска Object Pascal и генерирует собственный код для 32- и 64-битных операционных систем Windows, а также 32-битных Mac OS X и iOS. Embarcadero планирует создать поддержку операционной системы Linux и Android.
Free Pascal – это бесплатный компилятор для запуска программ на Pascal и Object Pascal. Компилятор Free Pascal – это 32- и 64-битный компилятор Pascal, совместимый с Turbo Pascal и Delphi, для Linux, Windows, OS / 2, FreeBSD, Mac OS X, DOS и некоторых других платформ.
Turbo51 – это бесплатный компилятор Pascal для семейства микроконтроллеров 8051 с синтаксисом Turbo Pascal 7.
Oxygene – это компилятор Object Pascal для платформ .NET и Mono.
GNU Pascal (GPC) – это компилятор Pascal, состоящий из внешнего интерфейса к коллекции компиляторов GNU.
Turbo Pascal – предоставляет IDE и компилятор для запуска программ Pascal на CP / M, CP / M-86, DOS, Windows и Macintosh.
Delphi – предоставляет компиляторы для запуска Object Pascal и генерирует собственный код для 32- и 64-битных операционных систем Windows, а также 32-битных Mac OS X и iOS. Embarcadero планирует создать поддержку операционной системы Linux и Android.
Free Pascal – это бесплатный компилятор для запуска программ на Pascal и Object Pascal. Компилятор Free Pascal – это 32- и 64-битный компилятор Pascal, совместимый с Turbo Pascal и Delphi, для Linux, Windows, OS / 2, FreeBSD, Mac OS X, DOS и некоторых других платформ.
Turbo51 – это бесплатный компилятор Pascal для семейства микроконтроллеров 8051 с синтаксисом Turbo Pascal 7.
Oxygene – это компилятор Object Pascal для платформ .NET и Mono.
GNU Pascal (GPC) – это компилятор Pascal, состоящий из внешнего интерфейса к коллекции компиляторов GNU.
В этих уроках мы будем использовать Free Pascal. Вы можете скачать Free Pascal для вашей операционной системы по ссылке: Скачать Free Pascal
Установка Free Pascal на Linux
Дистрибутив Free Pascal для Linux представлен в трех формах:
версия tar.gz , также доступная в виде отдельных файлов.
версия .rpm (Red Hat Package Manager).
версия .deb (Debian).
версия tar.gz , также доступная в виде отдельных файлов.
версия .rpm (Red Hat Package Manager).
версия .deb (Debian).
Установочный код для версии .rpm ::
Где XYZ – номер версии файла .rpm, а ARCH – одна из поддерживаемых архитектур (i386, x86_64 и т. Д.).
Код установки для версии Debian (например, Ubuntu) –
Где XXX – номер версии файла .deb.
Установка Free Pascal на Mac
Если вы используете Mac OS X, самый простой способ использовать Free Pascal – это загрузить среду разработки Xcode с веб-сайта Apple и следовать простым инструкциям по установке. После настройки Xcode вы сможете использовать компилятор Free Pascal.
Установка Free Pascal в Windows
Для Windows вы загрузите установщик Windows, setup.exe. Это обычная программа установки. Вам нужно предпринять следующие шаги для установки –
Выберите части пакета, которые вы хотите установить.
При желании можно связать расширения .pp или .pas с IDE Free Pascal.
Выберите части пакета, которые вы хотите установить.
При желании можно связать расширения .pp или .pas с IDE Free Pascal.
Текстовый редактор
Это будет использоваться для ввода вашей программы. Примерами немногих редакторов являются Блокнот Windows, команда редактирования ОС, Brief, Epsilon, EMACS и vim или vi.
Имя и версия текстового редактора могут различаться в разных операционных системах. Например, Блокнот будет использоваться в Windows, а vim или vi могут использоваться в Windows, а также в Linux или UNIX.
Файлы, которые вы создаете в редакторе, называются исходными файлами и содержат исходный код программы. Исходные файлы для программ на Pascal обычно называются с расширением .pas .
Перед началом программирования убедитесь, что у вас есть один текстовый редактор, и у вас достаточно опыта, чтобы написать компьютерную программу, сохранить ее в файле, скомпилировать и, наконец, выполнить.
Паскаль – Структуры программы
Прежде чем мы изучим основные строительные блоки языка программирования Pascal, давайте рассмотрим минимальную структуру программы Pascal, чтобы мы могли взять ее в качестве справочного материала в следующих главах.
Структура программы Pascal
Программа Pascal в основном состоит из следующих частей –
- Название программы
- Использует команду
- Объявления типа
- Постоянные декларации
- Объявления переменных
- Объявления функций
- Процедуры декларации
- Основной программный блок
- Заявления и выражения в каждом блоке
- Комментарии
Каждая программа на Паскале обычно имеет заголовок, декларацию и исполняющую часть строго в этом порядке. Следующий формат показывает основной синтаксис для программы на Паскале –
Pascal Hello World Пример
Ниже приведен простой паскаль-код, который напечатал бы слова “Hello, World!” –
Это даст следующий результат –
Давайте посмотрим различные части вышеуказанной программы –
Первая строка программы программы HelloWorld; указывает на название программы.
Вторая строка программы использует crt; это команда препроцессора, которая говорит компилятору включить модуль crt перед тем, как перейти к фактической компиляции.
Следующие строки, заключенные в операторы начала и конца, являются основным программным блоком. Каждый блок в Паскале заключен в оператор начала и оператора конца . Однако за оператором завершения, указывающим конец основной программы, следует точка (.) Вместо точки с запятой (;).
Оператор начала основного блока программы – это место, где начинается выполнение программы.
Строки внутри (* … *) будут игнорироваться компилятором, и он был добавлен для добавления комментария в программу.
Заявление writeln («Привет, мир!»); использует функцию writeln, доступную в Pascal, которая вызывает сообщение «Hello, World!» быть отображенным на экране.
Оператор readkey; позволяет отображать паузу, пока пользователь не нажмет клавишу. Это часть КТО. Блок похож на библиотеку в Паскале.
Последнее утверждение заканчивается. заканчивает вашу программу
Первая строка программы программы HelloWorld; указывает на название программы.
Вторая строка программы использует crt; это команда препроцессора, которая говорит компилятору включить модуль crt перед тем, как перейти к фактической компиляции.
Следующие строки, заключенные в операторы начала и конца, являются основным программным блоком. Каждый блок в Паскале заключен в оператор начала и оператора конца . Однако за оператором завершения, указывающим конец основной программы, следует точка (.) Вместо точки с запятой (;).
Оператор начала основного блока программы – это место, где начинается выполнение программы.
Строки внутри (* … *) будут игнорироваться компилятором, и он был добавлен для добавления комментария в программу.
Заявление writeln («Привет, мир!»); использует функцию writeln, доступную в Pascal, которая вызывает сообщение «Hello, World!» быть отображенным на экране.
Оператор readkey; позволяет отображать паузу, пока пользователь не нажмет клавишу. Это часть КТО. Блок похож на библиотеку в Паскале.
Последнее утверждение заканчивается. заканчивает вашу программу
Компиляция и выполнение программы Pascal
Откройте текстовый редактор и добавьте вышеупомянутый код.
Сохраните файл как hello.pas
Откройте командную строку и перейдите в каталог, где вы сохранили файл.
Введите в командной строке fpc hello.pas и нажмите Enter, чтобы скомпилировать код.
Если в вашем коде нет ошибок, командная строка переместит вас на следующую строку и сгенерирует приветственный исполняемый файл и объектный файл hello.o .
Теперь введите hello в командной строке, чтобы выполнить вашу программу.
Вы сможете увидеть «Hello World», напечатанный на экране, и программа будет ждать, пока вы не нажмете любую клавишу.
Откройте текстовый редактор и добавьте вышеупомянутый код.
Сохраните файл как hello.pas
Откройте командную строку и перейдите в каталог, где вы сохранили файл.
Введите в командной строке fpc hello.pas и нажмите Enter, чтобы скомпилировать код.
Если в вашем коде нет ошибок, командная строка переместит вас на следующую строку и сгенерирует приветственный исполняемый файл и объектный файл hello.o .
Теперь введите hello в командной строке, чтобы выполнить вашу программу.
Вы сможете увидеть «Hello World», напечатанный на экране, и программа будет ждать, пока вы не нажмете любую клавишу.
Убедитесь, что в вашем пути есть бесплатный компилятор паскаля fpc и вы запускаете его в каталоге, содержащем исходный файл hello.pas.
Паскаль – основной синтаксис
Вы увидели базовую структуру программы на Паскале, поэтому вам будет легко понять другие основные строительные блоки языка программирования на Паскале.
переменные
Определение переменной помещается в блок, начинающийся с ключевого слова var , за которым следуют следующие определения переменных:
Переменные Паскаля объявляются вне тела кода функции, что означает, что они не объявляются в парах начала и конца , но они объявляются после определения процедуры / функции и перед ключевым словом begin . Для глобальных переменных они определяются после заголовка программы.
Функции / Процедуры
В Паскале процедура – это набор инструкций, которые должны быть выполнены без возвращаемого значения, а функция – это процедура с возвращаемым значением. Определение функции / процедур будет следующим:
Комментарии
Многострочные комментарии заключены в фигурные скобки и звездочки как <* … *>. Паскаль допускает однострочный комментарий, заключенный в фигурные скобки <…>.
Чувствительность к регистру
Pascal – это не чувствительный к регистру язык, что означает, что вы можете написать свои переменные, функции и процедуры в любом случае. Как и переменные A_Variable, a_variable и A_VARIABLE имеют одинаковое значение в Паскале.
Заявления Паскаля
Программы на Паскале состоят из заявлений. Каждое утверждение определяет определенную работу программы. Этими заданиями могут быть декларация, назначение, чтение данных, запись данных, принятие логических решений, передача управления потоком программ и т. Д.
Зарезервированные слова на Паскале
Утверждения в Паскале составлены с некоторыми определенными словами Паскаля, которые называются зарезервированными словами. Например, слова, программа, ввод, вывод, var, real, begin, readline, writeline и end являются зарезервированными словами.
Ниже приведен список зарезервированных слов, доступных в Паскале.
| а также | массив | начать | дело | Const |
| ДИВ | делать | Downto | еще | конец |
| файл | за | функция | идти к | если |
| в | этикетка | модификация | ноль | не |
| из | или же | уплотненный | процедура | программа |
| запись | повторение | задавать | затем | в |
| тип | до тех пор | вар | в то время как | с |
Набор символов и идентификаторы в Паскале
Набор символов Паскаль состоит из –
Все заглавные буквы (А-Я)
Все строчные буквы (аз)
Специальные символы – + * /: =,. ;. () [] = <> `пробел
Все заглавные буквы (А-Я)
Все строчные буквы (аз)
Специальные символы – + * /: =,. ;. () [] = <> `пробел
Сущности в программе на Паскале, такие как переменные и константы, типы, функции, процедуры и записи и т. Д., Имеют имя или идентификатор. Идентификатор – это последовательность букв и цифр, начинающаяся с буквы. Специальные символы и пробелы не должны использоваться в идентификаторе.
Паскаль – Типы данных
Типы данных объекта указывают значение, ограничения, возможные значения, операции, функции и режим хранения, связанные с ним.
Целочисленные, действительные, логические и символьные типы называются стандартными типами данных. Типы данных могут быть классифицированы как скалярные, указательные и структурированные типы данных. Примерами скалярных типов данных являются целочисленные, вещественные, логические, символьные, поддиапазонные и перечисляемые. Структурированные типы данных состоят из скалярных типов; например, массивы, записи, файлы и наборы. Мы обсудим типы данных указателя позже.
Паскаль Типы данных
Типы данных Pascal можно обобщить, как показано ниже на следующей диаграмме:
Объявления типов
Объявление типа используется для объявления типа данных идентификатора. Синтаксис объявления типа –
Например, следующее объявление определяет переменные days и age как целочисленный тип, yes и true как логический тип, name и city как строковый тип, сборы и расходы как реальный тип.
Целочисленные типы
В следующей таблице приведены подробные сведения о стандартных целочисленных типах с их размерами хранения и диапазонами значений, используемыми в Object Pascal.
| Тип | минимальный | максимальная | Формат |
|---|---|---|---|
| целое число | -2147483648 | 2147483647 | подписанный 32-разрядный |
| кардинальный | 0 | 4294967295 | 32-разрядный без знака |
| SHORTINT | -128 | 127 | 8-битный со знаком |
| Smallint | -32768 | 32767 | подписанный 16-битный |
| Longint | -2147483648 | 2147483647 | подписанный 32-разрядный |
| Int64 | -2 ^ 63 | 2 ^ 63 – 1 | подписанный 64-разрядный |
| Байт | 0 | 255 | 8-битный без знака |
| слово | 0 | 65535 | 16-разрядный без знака |
| LongWord | 0 | 4294967295 | 32-разрядный без знака |
Константы
Использование констант делает программу более читабельной и помогает хранить специальные количества в одном месте в начале программы. Паскаль допускает числовые, логические, строковые и символьные константы. Константы могут быть объявлены в части объявлений программы, указав объявление const .
Синтаксис объявления константного типа следующий –
Ниже приведены некоторые примеры постоянных объявлений –
Все объявления констант должны быть даны до объявления переменных.
Перечисляемые типы
Перечисляемые типы данных являются пользовательскими типами данных. Они позволяют указывать значения в списке. Только перечисленные операторы и реляционные операторы разрешены для перечисляемых типов данных. Перечисляемые типы данных могут быть объявлены следующим образом:
Ниже приведены некоторые примеры перечислимых объявлений типов:
Порядок, в котором элементы перечислены в домене перечисляемого типа, определяет порядок элементов. Например, в перечисляемом типе SUMMER апрель наступает до мая, май – до июня и т. Д. Домен перечисляемых идентификаторов типов не может состоять из числовых или символьных констант.
Типы поддиапазонов
Типы поддиапазонов позволяют переменной принимать значения, лежащие в определенном диапазоне. Например, если возраст избирателей должен составлять от 18 до 100 лет, переменная с именем age может быть объявлена как –
Подробнее об объявлении переменных мы рассмотрим в следующем разделе. Вы также можете определить тип поддиапазона, используя объявление типа. Синтаксис объявления типа поддиапазона следующий:
Ниже приведены некоторые примеры объявлений поддиапазонных типов:
Типы поддиапазонов могут быть созданы из подмножества уже определенного перечислимого типа, например:
Паскаль – Типы переменных
Переменная – это не что иное, как имя, данное области памяти, которой могут манипулировать наши программы. Каждая переменная в Паскале имеет определенный тип, который определяет размер и расположение памяти переменной; диапазон значений, которые могут быть сохранены в этой памяти; и набор операций, которые могут быть применены к переменной.
Имя переменной может состоять из букв, цифр и символа подчеркивания. Он должен начинаться либо с буквы, либо с подчеркивания. Паскаль не чувствителен к регистру , поэтому заглавные и строчные буквы здесь означают одно и то же. Основываясь на базовых типах, описанных в предыдущей главе, будут следующие базовые типы переменных:
Основные переменные в Паскале
Обычно один октет (один байт). Это целочисленный тип.
целое число
Наиболее натуральный размер целого числа для машины.
Значение с плавающей запятой одинарной точности.
Указывает истинные или ложные логические значения. Это также целочисленный тип.
Перечислимый
Определяет пользовательский список.
Поддиапа- зон
Представляет переменные, значения которых лежат в диапазоне.
Хранит массив символов.
Обычно один октет (один байт). Это целочисленный тип.
целое число
Наиболее натуральный размер целого числа для машины.
Значение с плавающей запятой одинарной точности.
Указывает истинные или ложные логические значения. Это также целочисленный тип.
Перечислимый
Определяет пользовательский список.
Поддиапа- зон
Представляет переменные, значения которых лежат в диапазоне.
Хранит массив символов.
Язык программирования Pascal также позволяет определять различные другие типы переменных, которые мы рассмотрим в следующих главах, таких как Pointer, Array, Records, Sets, Files и т. Д. В этой главе мы изучим только основные типы переменных.
Объявление переменных в Паскале
Все переменные должны быть объявлены до того, как мы используем их в программе Pascal. Все объявления переменных сопровождаются ключевым словом var . Объявление определяет список переменных, за которыми следует двоеточие (:) и тип. Синтаксис объявления переменной –
Здесь тип должен быть допустимым типом данных Pascal, включая символьные, целые, действительные, логические или любые другие определяемые пользователем типы данных и т. Д., А variable_list может состоять из одного или нескольких имен идентификаторов, разделенных запятыми. Некоторые действительные объявления переменных показаны здесь –
В предыдущем уроке мы обсуждали, что Pascal позволяет объявлять тип. Тип может быть идентифицирован по имени или идентификатору. Этот тип может использоваться для определения переменных этого типа. Например,
Теперь определенные типы могут использоваться в объявлениях переменных –
Обратите внимание на разницу между объявлением типа и объявлением var . Объявление типа указывает категорию или класс типов, таких как целое число, вещественное и т. Д., Тогда как спецификация переменной указывает тип значений, которые может принимать переменная. Вы можете сравнить объявление типа в Pascal с typedef в C. Самое главное, имя переменной относится к области памяти, где будет храниться значение переменной. Это не так с объявлением типа.
Инициализация переменной в Паскале
Переменным присваивается значение с двоеточием и знаком равенства, за которым следует постоянное выражение. Общая форма присвоения значения –
По умолчанию переменные в Паскале не инициализируются с нуля. Они могут содержать мусорные значения. Поэтому лучше инициализировать переменные в программе. Переменные могут быть инициализированы (им присвоено начальное значение) в их объявлении. За инициализацией следует ключевое слово var, а синтаксис инициализации следующий:
Вот некоторые примеры:
Давайте посмотрим на пример, который использует различные типы переменных, которые обсуждались до сих пор –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Перечисляемые переменные
Вы видели, как использовать простые типы переменных, такие как integer, real и boolean. Теперь давайте посмотрим переменные перечислимого типа, которые можно определить как –
Когда вы объявили перечислимый тип, вы можете объявить переменные этого типа. Например,
Следующий пример иллюстрирует концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Переменные поддиапазона
Переменные поддиапазона объявляются как –
Примеры поддиапазонных переменных:
Следующая программа иллюстрирует концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Константы
Константа – это сущность, которая остается неизменной во время выполнения программы. Паскаль позволяет объявлять только константы следующих типов:
- Порядковые типы
- Набор типов
- Типы указателей (но единственное допустимое значение – Nil).
- Реальные типы
- голец
- строка
Объявление констант
Синтаксис объявления констант следующий:
В следующей таблице приведены примеры некоторых допустимых объявлений констант –
Константа реального типа
Порядковая (целочисленная) константа типа
Установить постоянную типа
Гласные = набор (A, E, I, O, U);
Константа типа указателя
скорость света = 3.0E + 10;
Тип символа константа
Константа типа строки
президент = ‘Джонни Депп’;
Порядковая (целочисленная) константа типа
Установить постоянную типа
Гласные = набор (A, E, I, O, U);
Константа типа указателя
скорость света = 3.0E + 10;
Тип символа константа
Константа типа строки
президент = ‘Джонни Депп’;
Следующий пример иллюстрирует концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Соблюдайте форматирование в выводе программы. Переменная c должна быть отформатирована с общим количеством цифр 7 и 2 цифр после десятичного знака. Паскаль позволяет такое форматирование вывода с числовыми переменными.
Паскаль – Операторы
Оператор – это символ, который указывает компилятору выполнять определенные математические или логические манипуляции. Паскаль допускает следующие типы операторов –
- Арифметические операторы
- Реляционные операторы
- Булевы операторы
- Битовые операторы
- Операторы множества
- Строковые операторы
Давайте обсудим один за другим арифметические, реляционные, булевы и битовые операторы. Мы обсудим операторы множеств и строковые операции позже.
Арифметические Операторы
В следующей таблице приведены все арифметические операторы, поддерживаемые Паскалем. Предположим, что переменная A содержит 10, а переменная B содержит 20, тогда –
| оператор | Описание | пример |
|---|---|---|
| + | Добавляет два операнда | А + Б даст 30 |
| – | Вычитает второй операнд из первого | A – B даст -10 |
| * | Умножает оба операнда | А * Б даст 200 |
| / | Делит числитель на знаменатель | Б / у даст 2 |
| % | Оператор модуля и остаток от целочисленного деления | B% A даст 0 |
Операторы отношений
Следующая таблица показывает все реляционные операторы, поддерживаемые Pascal. Предположим, что переменная A содержит 10, а переменная B содержит 20, тогда –
| оператор | Описание | пример |
|---|---|---|
| знак равно | Проверяет, равны ли значения двух операндов или нет, если да, то условие становится истинным. | (A = B) не соответствует действительности. |
| <> | Проверяет, равны ли значения двух операндов или нет, если значения не равны, тогда условие становится истинным. | (A <> B) верно. |
| > | Проверяет, больше ли значение левого операнда, чем значение правого операнда, если да, то условие становится истинным. | (A> B) не соответствует действительности. |
| < | Проверяет, меньше ли значение левого операнда, чем значение правого операнда, если да, то условие становится истинным. | (A <B) верно. |
| > = | Проверяет, больше ли значение левого операнда или равно значению правого операнда, если да, то условие становится истинным. | (A> = B) не соответствует действительности. |
| <= | Проверяет, меньше ли значение левого операнда или равно значению правого операнда, если да, то условие становится истинным. | (A <= B) верно. |
Булевы операторы
В следующей таблице приведены все логические операторы, поддерживаемые языком Паскаль. Все эти операторы работают с булевыми операндами и дают булевы результаты. Предположим, что переменная A имеет значение true, а переменная B содержит значение false, тогда –
| оператор | Описание | пример |
|---|---|---|
| а также | Вызывается логическим оператором AND. Если оба операнда истинны, тогда условие становится истинным. | (А и В) ложно. |
| а потом | Он аналогичен оператору AND, однако гарантирует порядок, в котором компилятор вычисляет логическое выражение. Слева направо и правые операнды оцениваются только при необходимости. | (A, а затем B) ложно. |
| или же | Вызывается логическим оператором ИЛИ Если любой из двух операндов является истинным, тогда условие становится истинным. | (А или В) это правда. |
| или еще | Он похож на логическое ИЛИ, однако он гарантирует порядок, в котором компилятор вычисляет логическое выражение. Слева направо и правые операнды оцениваются только при необходимости. | (A или иначе B) верно. |
| не | Вызывается логическое НЕ оператор. Используется для изменения логического состояния своего операнда. Если условие истинно, то оператор Логический НЕ сделает его ложным. | не (А и В) верно. |
Битовые операторы
Битовые операторы работают с битами и выполняют побитовые операции. Все эти операторы работают с целочисленными операндами и дают целочисленные результаты. Таблица истинности для побитового и (&), побитового или (|) и побитового не (
) выглядит следующим образом:
Предположим, если А = 60; и B = 13; теперь в двоичном формате они будут выглядеть следующим образом –
A & B = 0000 1100
A ^ B = 0011 0001
Побитовые операторы, поддерживаемые Pascal, перечислены в следующей таблице. Предположим, что переменная A содержит 60, а переменная B содержит 13, тогда:
Обратите внимание, что разные реализации Паскаля отличаются по битовым операторам. Free Pascal, используемый здесь компилятор, поддерживает следующие побитовые операторы:
| операторы | операции |
|---|---|
| не | Побитовое НЕ |
| а также | Побитовое И |
| или же | Побитовое ИЛИ |
| исключающее | Побитовое исключающее ИЛИ |
| ЗЫ | Побитовый сдвиг влево |
| SHR | Побитовый сдвиг вправо |
| << | Побитовый сдвиг влево |
| >> | Побитовый сдвиг вправо |
Приоритет операторов в Паскале
Приоритет оператора определяет группировку терминов в выражении. Это влияет на то, как оценивается выражение. Некоторые операторы имеют более высокий приоритет, чем другие; например, оператор умножения имеет более высокий приоритет, чем оператор сложения.
Например, х = 7 + 3 * 2; здесь x назначено 13, а не 20, потому что оператор * имеет более высокий приоритет, чем +, поэтому он сначала умножается на 3 * 2, а затем прибавляется к 7.
Здесь операторы с самым высоким приоритетом отображаются вверху таблицы, а операторы с самым низким – внизу. Внутри выражения операторы с более высоким приоритетом будут оцениваться первыми.
Паскаль – Принятие решений
Структуры принятия решений требуют, чтобы программист указал одно или несколько условий, которые должны быть оценены или протестированы программой, вместе с оператором или инструкциями, которые должны быть выполнены, если условие определено как истинное, и, необязательно, другие операторы, которые должны быть выполнены, если условие определяется как ложный.
Ниже приводится общая форма типичной структуры принятия решений, встречающейся в большинстве языков программирования.
Язык программирования Pascal предоставляет следующие типы операторов принятия решений. Нажмите на следующие ссылки, чтобы проверить их детали.
Оператор if – then состоит из логического выражения, за которым следует один или несколько операторов.
За оператором if – then может следовать необязательный оператор else , который выполняется, когда логическое выражение имеет значение false.
Вы можете использовать один оператор if или else if внутри другого оператора if или else if .
Оператор case позволяет проверять переменную на соответствие списку значений.
Это похоже на оператор if-then-else . Здесь другой термин следует за падежом .
Вы можете использовать один оператор case внутри другого оператора (ов) case .
Оператор if – then состоит из логического выражения, за которым следует один или несколько операторов.
За оператором if – then может следовать необязательный оператор else , который выполняется, когда логическое выражение имеет значение false.
Вы можете использовать один оператор if или else if внутри другого оператора if или else if .
Оператор case позволяет проверять переменную на соответствие списку значений.
Это похоже на оператор if-then-else . Здесь другой термин следует за падежом .
Вы можете использовать один оператор case внутри другого оператора (ов) case .
Паскаль – Петли
Может возникнуть ситуация, когда вам нужно выполнить блок кода несколько раз. В общем случае операторы выполняются последовательно: первый оператор в функции выполняется первым, затем второй и так далее.
Языки программирования предоставляют различные управляющие структуры, которые допускают более сложные пути выполнения.
Оператор цикла позволяет нам выполнять оператор или группу операторов несколько раз, и в большинстве языков программирования ниже приводится общая форма инструкции цикла.
Язык программирования Pascal предоставляет следующие типы конструкций цикла для обработки требований цикла. Нажмите на следующие ссылки, чтобы проверить их детали.
Повторяет оператор или группу операторов, пока данное условие выполняется. Он проверяет условие перед выполнением тела цикла.
Выполняет последовательность операторов несколько раз и сокращает код, который управляет переменной цикла.
Как оператор while, за исключением того, что он проверяет условие в конце тела цикла.
Вы можете использовать один или несколько циклов внутри любого другого while, for или повторять до цикла.
Повторяет оператор или группу операторов, пока данное условие выполняется. Он проверяет условие перед выполнением тела цикла.
Выполняет последовательность операторов несколько раз и сокращает код, который управляет переменной цикла.
Как оператор while, за исключением того, что он проверяет условие в конце тела цикла.
Вы можете использовать один или несколько циклов внутри любого другого while, for или повторять до цикла.
Заявления о контроле цикла
Операторы управления циклом изменяют выполнение от его нормальной последовательности. Когда выполнение покидает область действия, все автоматические объекты, созданные в этой области, уничтожаются.
Паскаль поддерживает следующие управляющие операторы. Нажмите на следующие ссылки, чтобы проверить их детали.
Завершает цикл или оператор case и переносит выполнение в оператор сразу после оператора loop или case.
Заставляет петлю пропускать оставшуюся часть своего тела и немедленно проверять свое состояние перед повторением.
Передает управление помеченному выражению. Хотя не рекомендуется использовать оператор goto в вашей программе.
Завершает цикл или оператор case и переносит выполнение в оператор сразу после оператора loop или case.
Заставляет петлю пропускать оставшуюся часть своего тела и немедленно проверять свое состояние перед повторением.
Передает управление помеченному выражению. Хотя не рекомендуется использовать оператор goto в вашей программе.
Паскаль – Функции
Подпрограммы
Подпрограмма – это программный модуль / модуль, который выполняет определенную задачу. Эти подпрограммы объединяются в большие программы. Это в основном называется «Модульный дизайн». Подпрограмма может быть вызвана подпрограммой / программой, которая называется вызывающей программой.
Паскаль предоставляет два вида подпрограмм –
Функции – эти подпрограммы возвращают одно значение.
Процедуры – эти подпрограммы не возвращают значение напрямую.
Функции – эти подпрограммы возвращают одно значение.
Процедуры – эти подпрограммы не возвращают значение напрямую.
функции
Функция – это группа операторов, которые вместе выполняют задачу. Каждая программа на Паскале имеет как минимум одну функцию, которая является самой программой, и все самые тривиальные программы могут определять дополнительные функции.
Объявление функции сообщает компилятору об имени функции, типе возврата и параметрах. Определение функции обеспечивает фактическое тело функции.
Стандартная библиотека Pascal предоставляет множество встроенных функций, которые может вызывать ваша программа. Например, функция AppendStr () добавляет две строки, функция New () динамически выделяет память для переменных и многие другие функции.
Определение функции
В Паскале функция определяется с помощью ключевого слова function. Общая форма определения функции следующая:
Определение функции в Pascal состоит из заголовка функции, локальных объявлений и тела функции. Заголовок функции состоит из ключевого слова function и имени, данного функции. Вот все части функции –
Аргументы – Аргументы (аргументы) устанавливают связь между вызывающей программой и идентификаторами функций, а также вызывают формальные параметры. Параметр похож на заполнитель. Когда вызывается функция, вы передаете значение параметру. Это значение называется фактическим параметром или аргументом. Список параметров относится к типу, порядку и количеству параметров функции. Использование таких формальных параметров не является обязательным. Эти параметры могут иметь стандартный тип данных, определенный пользователем тип данных или тип данных поддиапазона.
Список формальных параметров, появляющийся в операторе функции, может быть простыми или индексированными переменными, массивами или структурированными переменными или подпрограммами.
Возвращаемый тип – все функции должны возвращать значение, поэтому всем функциям должен быть присвоен тип. Тип функции – это тип данных значения, которое возвращает функция. Это может быть стандартный, определенный пользователем скалярный или поддиапазонный тип, но он не может быть структурированным типом.
Локальные объявления – Локальные объявления относятся к объявлениям для меток, констант, переменных, функций и процедур, которые применяются только к телу функции.
Тело функции – Тело функции содержит набор операторов, которые определяют, что делает функция. Он всегда должен быть заключен между зарезервированными словами начало и конец. Это часть функции, в которой выполняются все вычисления. Должен быть оператор присваивания типа – имя: = выражение; в теле функции, которая присваивает значение имени функции. Это значение возвращается как и когда функция выполняется. Последнее утверждение в теле должно быть конечным утверждением.
Аргументы – Аргументы (аргументы) устанавливают связь между вызывающей программой и идентификаторами функций, а также вызывают формальные параметры. Параметр похож на заполнитель. Когда вызывается функция, вы передаете значение параметру. Это значение называется фактическим параметром или аргументом. Список параметров относится к типу, порядку и количеству параметров функции. Использование таких формальных параметров не является обязательным. Эти параметры могут иметь стандартный тип данных, определенный пользователем тип данных или тип данных поддиапазона.
Список формальных параметров, появляющийся в операторе функции, может быть простыми или индексированными переменными, массивами или структурированными переменными или подпрограммами.
Возвращаемый тип – все функции должны возвращать значение, поэтому всем функциям должен быть присвоен тип. Тип функции – это тип данных значения, которое возвращает функция. Это может быть стандартный, определенный пользователем скалярный или поддиапазонный тип, но он не может быть структурированным типом.
Локальные объявления – Локальные объявления относятся к объявлениям для меток, констант, переменных, функций и процедур, которые применяются только к телу функции.
Тело функции – Тело функции содержит набор операторов, которые определяют, что делает функция. Он всегда должен быть заключен между зарезервированными словами начало и конец. Это часть функции, в которой выполняются все вычисления. Должен быть оператор присваивания типа – имя: = выражение; в теле функции, которая присваивает значение имени функции. Это значение возвращается как и когда функция выполняется. Последнее утверждение в теле должно быть конечным утверждением.
Ниже приведен пример, показывающий, как определить функцию на паскале:
Объявления функций
Объявление функции сообщает компилятору об имени функции и о том, как вызывать функцию. Фактическое тело функции может быть определено отдельно.
Объявление функции состоит из следующих частей:
Для определенной выше функции max () ниже приводится объявление функции –
Объявление функции требуется, когда вы определяете функцию в одном исходном файле и вызываете эту функцию в другом файле. В таком случае вы должны объявить функцию в начале файла, вызывающего функцию.
Вызов функции
При создании функции вы даете определение того, что должна делать функция. Чтобы использовать функцию, вам нужно будет вызвать эту функцию для выполнения определенной задачи. Когда программа вызывает функцию, управление программой передается вызываемой функции. Вызываемая функция выполняет определенную задачу, и когда выполняется оператор return или когда достигается последний оператор end, она возвращает управление программой обратно в основную программу.
Чтобы вызвать функцию, вам просто нужно передать необходимые параметры вместе с именем функции, и если функция возвращает значение, вы можете сохранить возвращаемое значение. Ниже приведен простой пример, чтобы показать использование –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Процедуры
Процедуры – это подпрограммы, которые вместо того, чтобы возвращать одно значение, позволяют получить группу результатов.
Определение процедуры
В Паскале процедура определяется с помощью ключевого слова процедуры . Общая форма определения процедуры следующая:
Определение процедуры в Pascal состоит из заголовка , локальных объявлений и тела процедуры. Заголовок процедуры состоит из ключевого слова процедуры и имени, присвоенного процедуре. Вот все части процедуры –
Аргументы – Аргументы (аргументы) устанавливают связь между вызывающей программой и идентификаторами процедур, а также вызывают формальные параметры. Правила для аргументов в процедурах такие же, как и для функций.
Локальные объявления – Локальные объявления относятся к объявлениям для меток, констант, переменных, функций и процедур, которые применимы только к основной части процедуры.
Тело процедуры – Тело процедуры содержит набор операторов, которые определяют, что делает процедура. Он всегда должен быть заключен между зарезервированными словами начало и конец. Это часть процедуры, в которой выполняются все вычисления.
Аргументы – Аргументы (аргументы) устанавливают связь между вызывающей программой и идентификаторами процедур, а также вызывают формальные параметры. Правила для аргументов в процедурах такие же, как и для функций.
Локальные объявления – Локальные объявления относятся к объявлениям для меток, констант, переменных, функций и процедур, которые применимы только к основной части процедуры.
Тело процедуры – Тело процедуры содержит набор операторов, которые определяют, что делает процедура. Он всегда должен быть заключен между зарезервированными словами начало и конец. Это часть процедуры, в которой выполняются все вычисления.
Ниже приведен исходный код процедуры с именем findMin () . Эта процедура принимает 4 параметра x, y, z и m и сохраняет минимум среди первых трех переменных в переменной с именем m. Переменная m передается по ссылке (мы обсудим передачу аргументов по ссылке чуть позже) –
Процедурные объявления
Объявление процедуры сообщает компилятору об имени процедуры и о том, как вызвать процедуру. Фактическое тело процедуры может быть определено отдельно.
Объявление процедуры имеет следующий синтаксис –
Обратите внимание, что название процедуры не связано ни с каким типом . Для описанной выше процедуры findMin () ниже приводится объявление –
Вызов процедуры
При создании процедуры вы даете определение того, что процедура должна делать. Чтобы использовать процедуру, вам придется вызвать эту процедуру для выполнения определенной задачи. Когда программа вызывает процедуру, управление программой передается вызываемой процедуре. Вызываемая процедура выполняет определенную задачу, и когда ее последний оператор завершения достигнут, она возвращает элемент управления обратно вызывающей программе.
Чтобы вызвать процедуру, вам просто нужно передать необходимые параметры вместе с именем процедуры, как показано ниже –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Рекурсивные подпрограммы
Мы видели, что программа или подпрограмма может вызывать другую подпрограмму. Когда подпрограмма вызывает себя, она называется рекурсивным вызовом, а процесс называется рекурсией.
Чтобы проиллюстрировать концепцию, давайте вычислим факториал числа. Факториал числа n определяется как –
Следующая программа вычисляет факториал данного числа, вызывая себя рекурсивно.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Ниже приведен еще один пример, который генерирует ряд Фибоначчи для заданного числа с использованием рекурсивной функции –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Аргументы подпрограммы
Если подпрограмма ( функция или процедура ) должна использовать аргументы, она должна объявлять переменные, которые принимают значения аргументов. Эти переменные называются формальными параметрами подпрограммы.
Формальные параметры ведут себя как другие локальные переменные внутри подпрограммы и создаются при входе в подпрограмму и уничтожаются при выходе.
При вызове подпрограммы есть два способа передачи аргументов в подпрограмму:
Этот метод копирует фактическое значение аргумента в формальный параметр подпрограммы. В этом случае изменения, внесенные в параметр внутри подпрограммы, не влияют на аргумент.
Этот метод копирует адрес аргумента в формальный параметр. Внутри подпрограммы адрес используется для доступа к фактическому аргументу, используемому в вызове. Это означает, что изменения, внесенные в параметр, влияют на аргумент.
Этот метод копирует фактическое значение аргумента в формальный параметр подпрограммы. В этом случае изменения, внесенные в параметр внутри подпрограммы, не влияют на аргумент.
Этот метод копирует адрес аргумента в формальный параметр. Внутри подпрограммы адрес используется для доступа к фактическому аргументу, используемому в вызове. Это означает, что изменения, внесенные в параметр, влияют на аргумент.
По умолчанию Паскаль использует вызов по значению для передачи аргументов. В общем, это означает, что код внутри подпрограммы не может изменять аргументы, используемые для вызова подпрограммы. Пример программы, которую мы использовали в главе «Паскаль – Функции», вызывал функцию max () с использованием вызова по значению .
Принимая во внимание, что пример программы, представленной здесь ( exProcedure ), вызывает процедуру findMin (), используя вызов по ссылке .
Паскаль – переменная область
Область действия в любом программировании – это область программы, в которой может существовать определенная переменная, и за пределами этой переменной нет доступа. Есть три места, где переменные могут быть объявлены на языке программирования Pascal –
Внутри подпрограммы или блока, который называется локальными переменными
За пределами всех подпрограмм, которые называются глобальными переменными
При определении параметров подпрограммы, которая называется формальными параметрами
Внутри подпрограммы или блока, который называется локальными переменными
За пределами всех подпрограмм, которые называются глобальными переменными
При определении параметров подпрограммы, которая называется формальными параметрами
Поясним, что такое локальные и глобальные переменные и формальные параметры.
Локальные переменные
Переменные, которые объявлены внутри подпрограммы или блока, называются локальными переменными. Они могут использоваться только операторами, которые находятся внутри этой подпрограммы или блока кода. Локальные переменные не известны подпрограммам вне их собственных. Ниже приведен пример использования локальных переменных. Здесь все переменные a , b и c являются локальными для программы с именем exLocal .
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Теперь давайте немного расширим программу, создадим процедуру с именем display, которая будет иметь собственный набор переменных a , b и c и отображать их значения прямо из программы exLocal .
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Глобальные переменные
Глобальные переменные определяются вне функции, обычно в верхней части программы. Глобальные переменные будут сохранять свое значение на протяжении всего жизненного цикла вашей программы, и к ним можно получить доступ в любой из функций, определенных для программы.
Глобальная переменная может быть доступна любой функции. То есть глобальная переменная доступна для использования во всей вашей программе после ее объявления. Ниже приведен пример использования глобальных и локальных переменных:
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Обратите внимание, что процедура display имеет доступ к переменным a, b и c, которые являются глобальными переменными по отношению к отображению, а также к своим собственным локальным переменным. Программа может иметь одинаковые имена для локальных и глобальных переменных, но предпочтение будет отдаваться значению локальной переменной внутри функции.
Давайте немного изменим предыдущий пример, теперь локальные переменные для отображения процедуры имеют те же имена, что и a , b , c –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Струны
Строка в Паскале на самом деле представляет собой последовательность символов с необязательной спецификацией размера. Символы могут быть числовыми, буквами, пробелами, специальными символами или их комбинацией. Extended Pascal предоставляет множество типов строковых объектов в зависимости от системы и реализации. Мы обсудим более распространенные типы строк, используемые в программах.
Вы можете определить строку многими способами –
Символьные массивы – это символьная строка, представляющая собой последовательность из нулевых или более байтовых символов, заключенных в одинарные кавычки.
Строковые переменные – переменная типа String, как определено в Turbo Pascal.
Короткие строки – переменная типа String с указанием размера.
Строки с нулевым символом в конце – переменная типа pchar .
AnsiStrings – Ansistrings – это строки без ограничения длины.
Символьные массивы – это символьная строка, представляющая собой последовательность из нулевых или более байтовых символов, заключенных в одинарные кавычки.
Строковые переменные – переменная типа String, как определено в Turbo Pascal.
Короткие строки – переменная типа String с указанием размера.
Строки с нулевым символом в конце – переменная типа pchar .
AnsiStrings – Ansistrings – это строки без ограничения длины.
Паскаль предоставляет только один строковый оператор, оператор конкатенации строк (+).
Примеры
Следующая программа печатает первые четыре вида строк. Мы будем использовать AnsiStrings в следующем примере.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
В следующем примере используются еще несколько функций, давайте посмотрим –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Строковые функции и процедуры Паскаля
Паскаль поддерживает широкий спектр функций и процедур, которые манипулируют строками. Эти подпрограммы варьируются в зависимости от реализации. Здесь мы перечисляем различные подпрограммы для работы со строками, предоставляемые Free Pascal –
функция AnsiCompareStr (const S1:; const S2 :): целое число;
Сравнивает две строки
function AnsiCompareText (const S1:; const S2 :): целое число;
Сравнивает две строки без учета регистра
функция AnsiExtractQuotedStr (var Src: PChar; Цитата: Char) :;
Удаляет кавычки из строки
функция AnsiLastChar (const S :): PChar;
Получает последний символ строки
функция AnsiLowerCase (const s :):
Преобразует строку в строчные буквы
функция AnsiQuotedStr (const S:; Цитата: Char) :;
функция AnsiStrComp (S1: PChar; S2: PChar): целое число;
Сравнивает строки с учетом регистра
функция AnsiStrIComp (S1: PChar; S2: PChar): целое число;
Сравнивает строки без учета регистра
функция AnsiStrLComp (S1: PChar; S2: PChar; MaxLen: кардинал): целое число;
Сравнивает L символов строк с учетом регистра
функция AnsiStrLIComp (S1: PChar; S2: PChar; MaxLen: кардинал): целое число;
Сравнивает L символов строк без учета регистра
функция AnsiStrLastChar (Str: PChar): PChar;
Получает последний символ строки
функция AnsiStrLower (Str: PChar): PChar;
Преобразует строку в строчные буквы
function AnsiStrUpper (Str: PChar): PChar;
Преобразует строку в верхний регистр
функция AnsiUpperCase (const s �� :;
Преобразует строку в верхний регистр
процедура AppendStr (var Dest:; const S :);
Добавляет 2 строки
процедура AssignStr (var P: PString; const S :);
Назначает значение строк в куче
функция CompareStr (const S1:; const S2 :): целое число; перегрузки;
Сравнивает две строки с учетом регистра
function CompareText (const S1:; const S2 :): целое число;
Сравнивает две строки без учета регистра
Удаляет строку из кучи
процедура DisposeStr (S: PShortString); перегрузки;
Удаляет строку из кучи
function IsValidIdent (const Ident :): Boolean;
Является ли строка допустимым идентификатором Паскаля?
function LastDelimiter (const Delimiters:; const S :): Integer;
Последнее вхождение символа в строку
функция LeftStr (const S:; Count: Integer) :;
Получает первые N символов строки
функция LoadStr (Ident: Integer) :;
Загружает строку из ресурсов
функция LowerCase (const s:) :; перегрузки;
Преобразует строку в строчные буквы
функция LowerCase (const V: вариант) :; перегрузки;
Преобразует строку в строчные буквы
function NewStr (const S :): PString; перегрузки;
Выделяет новую строку в кучу
функция RightStr (const S:; Count: Integer) :;
Получает последние N символов строки
функция StrAlloc (размер: кардинал): PChar;
Выделяет память для строки
function StrBufSize (Str: PChar): SizeUInt;
Резервирует память для строки
процедура StrDispose (Str: PChar);
Удаляет строку из кучи
функция StrPas (Str: PChar) :;
Преобразует PChar в паскаль
function StrPCopy (Dest: PChar; Источник :): PChar;
Функция StrPLCopy (Dest: PChar; Источник:; MaxLen: SizeUInt): PChar;
Копирует N байт строки паскаля.
функция UpperCase (const s �� :;
Преобразует строку в верхний регистр
функция AnsiCompareStr (const S1:; const S2 :): целое число;
Сравнивает две строки
function AnsiCompareText (const S1:; const S2 :): целое число;
Сравнивает две строки без учета регистра
функция AnsiExtractQuotedStr (var Src: PChar; Цитата: Char) :;
Удаляет кавычки из строки
функция AnsiLastChar (const S :): PChar;
Получает последний символ строки
функция AnsiLowerCase (const s :):
Преобразует строку в строчные буквы
функция AnsiQuotedStr (const S:; Цитата: Char) :;
функция AnsiStrComp (S1: PChar; S2: PChar): целое число;
Сравнивает строки с учетом регистра
функция AnsiStrIComp (S1: PChar; S2: PChar): целое число;
Сравнивает строки без учета регистра
функция AnsiStrLComp (S1: PChar; S2: PChar; MaxLen: кардинал): целое число;
Сравнивает L символов строк с учетом регистра
функция AnsiStrLIComp (S1: PChar; S2: PChar; MaxLen: кардинал): целое число;
Сравнивает L символов строк без учета регистра
функция AnsiStrLastChar (Str: PChar): PChar;
Получает последний символ строки
функция AnsiStrLower (Str: PChar): PChar;
Преобразует строку в строчные буквы
function AnsiStrUpper (Str: PChar): PChar;
Преобразует строку в верхний регистр
функция AnsiUpperCase (const s �� :;
Преобразует строку в верхний регистр
процедура AppendStr (var Dest:; const S :);
Добавляет 2 строки
процедура AssignStr (var P: PString; const S :);
Назначает значение строк в куче
функция CompareStr (const S1:; const S2 :): целое число; перегрузки;
Сравнивает две строки с учетом регистра
function CompareText (const S1:; const S2 :): целое число;
Сравнивает две строки без учета регистра
Удаляет строку из кучи
процедура DisposeStr (S: PShortString); перегрузки;
Удаляет строку из кучи
function IsValidIdent (const Ident :): Boolean;
Является ли строка допустимым идентификатором Паскаля?
function LastDelimiter (const Delimiters:; const S :): Integer;
Последнее вхождение символа в строку
функция LeftStr (const S:; Count: Integer) :;
Получает первые N символов строки
функция LoadStr (Ident: Integer) :;
Загружает строку из ресурсов
функция LowerCase (const s:) :; перегрузки;
Преобразует строку в строчные буквы
функция LowerCase (const V: вариант) :; перегрузки;
Преобразует строку в строчные буквы
function NewStr (const S :): PString; перегрузки;
Выделяет новую строку в кучу
функция RightStr (const S:; Count: Integer) :;
Получает последние N символов строки
функция StrAlloc (размер: кардинал): PChar;
Выделяет память для строки
function StrBufSize (Str: PChar): SizeUInt;
Резервирует память для строки
процедура StrDispose (Str: PChar);
Удаляет строку из кучи
функция StrPas (Str: PChar) :;
Преобразует PChar в паскаль
function StrPCopy (Dest: PChar; Источник :): PChar;
Функция StrPLCopy (Dest: PChar; Источник:; MaxLen: SizeUInt): PChar;
Копирует N байт строки паскаля.
функция UpperCase (const s �� :;
Преобразует строку в верхний регистр
Паскаль – логическое значение
Pascal предоставляет тип данных Boolean, который позволяет программистам определять, хранить и манипулировать логическими объектами, такими как константы, переменные, функции и выражения и т. Д.
Булевы значения в основном целочисленные. Переменные логического типа имеют два предопределенных возможных значения True и False . Выражения, разрешающие логическое значение, также могут быть назначены логическому типу.
Free Pascal также поддерживает типы ByteBool , WordBool и LongBool . Они имеют тип Byte, Word или Longint, соответственно.
Значение False эквивалентно 0 (нулю), и любое ненулевое значение считается истинным при преобразовании в логическое значение. Булево значение True преобразуется в -1, если оно назначено переменной типа LongBool.
Следует отметить, что логические операторы и , или, и не определены для логических типов данных.
Объявление булевых типов данных
Переменная булева типа объявляется с использованием ключевого слова var.
пример
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Массивы
Язык программирования Pascal предоставляет структуру данных, называемую массивом, в которой можно хранить последовательную коллекцию элементов одного и того же типа. Массив используется для хранения коллекции данных, но часто более полезно думать о массиве как о коллекции переменных одного типа.
Вместо того, чтобы объявлять отдельные переменные, такие как number1, number2, … и number100, вы объявляете одну переменную массива, такую как числа, и используете числа [1], числа [2] и …, числа [100] для представления отдельные переменные. Определенный элемент в массиве доступен по индексу.
Все массивы состоят из смежных областей памяти. Самый низкий адрес соответствует первому элементу, а самый высокий адрес – последнему.
Обратите внимание, что если вы хотите, чтобы массив в стиле C начинался с индекса 0, вам просто нужно начать индекс с 0, а не с 1.
Объявление массивов
Чтобы объявить массив в Pascal, программист может либо объявить тип, а затем создать переменные этого массива, либо напрямую объявить переменную массива.
Общая форма объявления типа одномерного массива –
идентификатор массива – указывает имя типа массива.
index-type – указывает индекс массива; это может быть любой скалярный тип данных, кроме реального
element-type – определяет типы значений, которые будут сохранены
идентификатор массива – указывает имя типа массива.
index-type – указывает индекс массива; это может быть любой скалярный тип данных, кроме реального
element-type – определяет типы значений, которые будут сохранены
Теперь, скорость – это переменный массив векторного типа, которого достаточно для хранения до 25 действительных чисел.
Чтобы начать массив с индекса 0, объявление должно быть –
Типы Array Subscript
В Pascal индекс массива может иметь любой скалярный тип, например, целое число, логическое значение, перечисление или поддиапазон, кроме действительного. Индексы массива также могут иметь отрицательные значения.
Давайте рассмотрим еще один пример, где индекс имеет символьный тип –
Индекс может быть перечисляемого типа –
Инициализация массивов
В Pascal массивы инициализируются посредством присваивания, либо путем указания конкретного нижнего индекса, либо с помощью цикла for-do.
Доступ к элементам массива
Доступ к элементу осуществляется путем индексации имени массива. Это делается путем помещения индекса элемента в квадратные скобки после имени массива. Например –
Вышеприведенный оператор возьмет первый элемент из массива с именем alphabet и присвоит значение переменной a.
Ниже приведен пример, который будет использовать все три вышеупомянутых понятия, а именно. декларация, назначение и доступ к массивам –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Массивы Паскаля в деталях
Массивы важны для Паскаля и должны требовать больше подробностей. Существует несколько важных понятий, связанных с массивом, которые должны быть понятны программисту на Паскале:
Паскаль поддерживает многомерные массивы. Простейшей формой многомерного массива является двумерный массив.
В массивах этого типа начальная длина равна нулю. Фактическая длина массива должна быть установлена с помощью стандартной функции SetLength .
Эти массивы упакованы битами, т. Е. Каждый символ или значения истинности хранятся в последовательных байтах вместо использования одного блока хранения, обычно слова (4 байта или более).
Вы можете передать подпрограмме указатель на массив, указав имя массива без индекса.
Паскаль поддерживает многомерные массивы. Простейшей формой многомерного массива является двумерный массив.
В массивах этого типа начальная длина равна нулю. Фактическая длина массива должна быть установлена с помощью стандартной функции SetLength .
Эти массивы упакованы битами, т. Е. Каждый символ или значения истинности хранятся в последовательных байтах вместо использования одного блока хранения, обычно слова (4 байта или более).
Вы можете передать подпрограмме указатель на массив, указав имя массива без индекса.
Паскаль – Указатели
Указатели на Паскале легко и весело выучить. Некоторые задачи программирования на Pascal выполняются с помощью указателей, а другие задачи, такие как динамическое распределение памяти, не могут быть выполнены без использования указателей. Поэтому становится необходимым изучать указатели, чтобы стать идеальным программистом на Паскале. Давайте начнем изучать их в простых и легких шагах.
Как вы знаете, каждая переменная является ячейкой памяти, и каждая ячейка памяти имеет свой адрес, к которому можно обратиться, используя имя переменной-указателя, которая обозначает адрес в памяти.
Что такое указатели?
Указатель – это динамическая переменная, значением которой является адрес другой переменной, т. Е. Прямой адрес ячейки памяти. Как и любая переменная или константа, вы должны объявить указатель, прежде чем использовать его для хранения любого адреса переменной. Общая форма объявления переменной указателя –
Тип указателя определяется путем добавления префикса стрелки каретки (^) к базовому типу. Базовый тип определяет типы элементов данных. Как только переменная-указатель определена для определенного типа, она может указывать только на элементы данных этого типа. После определения типа указателя мы можем использовать объявление var для объявления переменных указателя.
Ниже приведены некоторые допустимые объявления указателей –
Переменные указателя разыменовываются с помощью того же символа каретки (^). Например, связанная переменная, на которую указывает указатель rptr , это rptr ^ . Это может быть доступно как –
Следующий пример проиллюстрирует эту концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Печать адреса памяти в Паскале
В Паскале мы можем присвоить адрес переменной переменной-указателю, используя оператор адреса (@). Мы используем этот указатель для манипулирования и доступа к элементу данных. Однако, если по какой-то причине нам нужно работать с самим адресом памяти, нам нужно сохранить его в переменной типа слова.
Давайте расширим приведенный выше пример для печати адреса памяти, хранящегося в указателе iptr –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Ноль указатели
Рекомендуется всегда присваивать значение NIL переменной-указателю, если у вас нет точного адреса для назначения. Это делается во время объявления переменной. Указатель, которому назначен NIL, указывает на никуда. Рассмотрим следующую программу –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Чтобы проверить нулевой указатель, вы можете использовать оператор if следующим образом:
Паскаль указатели в деталях
У указателей есть много, но простых концепций, и они очень важны для программирования на Паскале. Существует несколько важных концепций указателей, которые должны быть понятны программисту на Паскале:
Для указателей можно использовать четыре арифметических оператора: приращение, уменьшение, +, –
Вы можете определить массивы для хранения нескольких указателей.
Паскаль позволяет вам иметь указатель на указатель и так далее.
Передача аргумента по ссылке или по адресу позволяет включить переданный аргумент в вызывающей подпрограмме вызываемой подпрограммой.
Паскаль позволяет подпрограмме возвращать указатель.
Для указателей можно использовать четыре арифметических оператора: приращение, уменьшение, +, –
Вы можете определить массивы для хранения нескольких указателей.
Паскаль позволяет вам иметь указатель на указатель и так далее.
Передача аргумента по ссылке или по адресу позволяет включить переданный аргумент в вызывающей подпрограмме вызываемой подпрограммой.
Паскаль позволяет подпрограмме возвращать указатель.
Паскаль – Отчеты
Массивы Pascal позволяют вам определять тип переменных, которые могут содержать несколько элементов данных одного типа, но запись – это другой определенный пользователем тип данных, доступный в Pascal, который позволяет комбинировать элементы данных разных типов.
Записи состоят из разных полей. Предположим, что вы хотите отслеживать свои книги в библиотеке, вы можете отслеживать следующие атрибуты для каждой книги –
- заглавие
- автор
- Предмет
- ID книги
Определение записи
Чтобы определить тип записи, вы можете использовать оператор объявления типа. Тип записи определяется как –
Вот как бы вы объявили Книжную запись –
Переменные записи определяются обычным образом как
Кроме того, вы можете напрямую определить переменную типа записи как –
Доступ к полям записи
Для доступа к любому полю записи мы используем оператор доступа участника (.). Оператор доступа к элементу закодирован как точка между именем переменной записи и полем, к которому мы хотим получить доступ. Ниже приведен пример, объясняющий использование структуры:
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Записи как аргументы подпрограммы
Вы можете передать запись в качестве аргумента подпрограммы таким же образом, как и любую другую переменную или указатель. Вы получите доступ к полям записи аналогично тому, как вы использовали в приведенном выше примере –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Указатели на записи
Вы можете определить указатели на записи очень похожим образом, как вы определяете указатель на любую другую переменную следующим образом:
Теперь вы можете сохранить адрес переменной типа записи в определенной выше переменной указателя. Чтобы объявить переменную созданного типа указателя, вы используете ключевое слово var –
Перед использованием этих указателей вы должны создать хранилище для переменной типа имя-записи, которой будут манипулировать эти указатели.
Чтобы получить доступ к членам записи, используя указатель на эту запись, вы должны использовать ^. оператор следующим образом –
Наконец, не забудьте утилизировать использованное хранилище, когда оно больше не используется –
Давайте перепишем первый пример, используя указатель на запись Книги. Надеюсь, вам будет легко понять концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
С заявлением
Мы обсудили, что к членам записи можно получить доступ с помощью оператора доступа к члену (.). Таким образом, имя переменной записи должно быть записано каждый раз. Оператор With предоставляет альтернативный способ сделать это.
Посмотрите на следующий фрагмент кода, взятый из нашего первого примера –
Такое же назначение может быть записано с использованием оператора With, как –
Паскаль – Варианты
Паскаль поддерживает уникальный тип хранения именованных вариантов. Вы можете назначить любой простой тип значений в переменной переменной. Тип значения, хранящегося в варианте, определяется только во время выполнения. Вариантам можно присвоить практически любой простой тип: порядковые типы, строковые типы, типы int64.
Структурированные типы, такие как наборы, записи, массивы, файлы, объекты и классы, не совместимы по назначению с вариантом. Вы также можете назначить указатель на вариант.
Free Pascal поддерживает варианты.
Объявление варианта
Вы можете объявить тип варианта, как и любые другие типы, используя ключевое слово var . Синтаксис объявления типа варианта –
Теперь эту переменную v можно присвоить почти всем простым типам, включая перечисляемые типы, и наоборот.
пример
Следующий пример иллюстрирует концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Наборы
Набор представляет собой набор элементов одного типа. Паскаль позволяет определить заданный тип данных. Элементы в наборе называются его членами. В математике множества представлены заключением членов в фигурные скобки <> . Однако в Паскале элементы набора заключены в квадратные скобки [], которые называются конструктором набора.
Определение типов набора и переменных
Типы Pascal Set определяются как
Переменные типа set определяются как
Примеры некоторых допустимых объявлений типов:
Операторы множества
Вы можете выполнить следующие операции над множествами Паскаля.
Это объединяет два набора и дает новый набор с членами из обоих наборов.
Получает разницу двух наборов и дает новый набор с элементами, не общими для обоих наборов.
пересечение
Получает пересечение двух наборов и дает новый набор с элементами, общими для обоих наборов.
Набор P включается в набор Q, если все элементы в P также находятся в Q, но не наоборот.
Симметричная разница
Получает симметричную разность двух наборов и дает набор элементов, которые находятся в любом из наборов, а не в их пересечении.
Это проверяет членство.
Это объединяет два набора и дает новый набор с членами из обоих наборов.
Получает разницу двух наборов и дает новый набор с элементами, не общими для обоих наборов.
пересечение
Получает пересечение двух наборов и дает новый набор с элементами, общими для обоих наборов.
Набор P включается в набор Q, если все элементы в P также находятся в Q, но не наоборот.
Симметричная разница
Получает симметричную разность двух наборов и дает набор элементов, которые находятся в любом из наборов, а не в их пересечении.
Это проверяет членство.
В следующей таблице показаны все операторы множеств, поддерживаемые Free Pascal. Предположим, что S1 и S2 являются двумя наборами символов, так что –
S1 + S2 даст набор
S1 – S2 даст набор
S1 * S2 даст набор
Включить (S1, [‘d’]) даст набор
Exclude (S2, [‘d’]) даст набор
S1 + S2 даст набор
S1 – S2 даст набор
S1 * S2 даст набор
Включить (S1, [‘d’]) даст набор
Exclude (S2, [‘d’]) даст набор
пример
Следующий пример иллюстрирует использование некоторых из этих операторов –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Обработка файлов
Паскаль рассматривает файл как последовательность компонентов, которые должны быть одинакового типа. Тип файла определяется типом компонентов. Тип данных файла определяется как –
Где базовый тип указывает тип компонентов файла. Базовый тип может быть чем угодно, целым, действительным, логическим, перечисляемым, поддиапазоном, записью, массивами и наборами, за исключением другого типа файла. Переменные типа файла создаются с помощью объявления var –
Ниже приведены некоторые примеры определения некоторых типов файлов и переменных файлов:
Создание и запись в файл
Давайте напишем программу, которая создаст файл данных для записей студентов. Это создаст файл с именем student.dat и запишет в него данные студента –
После компиляции и запуска программа создаст файл с именем student.dat в рабочем каталоге. Вы можете открыть файл с помощью текстового редактора, такого как блокнот, чтобы просмотреть данные Джона Смита.
Чтение из файла
Мы только что создали и записали в файл с именем Students.dat. Теперь давайте напишем программу, которая будет считывать данные студента из файла –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Файлы как параметр подпрограммы
Pascal позволяет использовать файловые переменные в качестве параметров в стандартных и пользовательских подпрограммах. Следующий пример иллюстрирует эту концепцию. Программа создает файл с именем rainfall.txt и хранит некоторые данные об осадках. Затем он открывает файл, читает данные и вычисляет среднее количество осадков.
Обратите внимание, что если вы используете параметр файла с подпрограммами, он должен быть объявлен как параметр var.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Текстовые файлы
Текстовый файл на языке Pascal состоит из строк символов, каждая строка которых заканчивается маркером конца строки. Вы можете объявить и определить такие файлы как –
Разница между обычным файлом символов и текстовым файлом заключается в том, что текстовый файл делится на строки, каждая из которых заканчивается специальным маркером конца строки, автоматически вставляемым системой. В следующем примере создается и записывается в текстовый файл с именем contact.txt –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Присоединение к файлу
Присоединение к файлу означает запись в существующий файл, в котором уже есть некоторые данные, без перезаписи файла. Следующая программа иллюстрирует это –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Функции обработки файлов
Free Pascal предоставляет следующие функции / процедуры для обработки файлов –
процедура Append (var t: Text);
Открывает файл в режиме добавления
Назначение процедуры (out f: file; const Name :);
Присваивает имя файлу
Назначение процедуры (out f: file; p: PChar);
Присваивает имя файлу
Назначение процедуры (out f: file; c: Char);
Присваивает имя файлу
Назначение процедуры (out f: TypedFile; const Name :);
Присваивает имя файлу
процедура Assign (out f: TypedFile; p: PChar);
Присваивает имя файлу
процедура Assign (out f: TypedFile; c: Char);
Присваивает имя файлу
Назначение процедуры (out t: Text; const s :);
Присваивает имя файлу
Назначение процедуры (out t: Text; p: PChar);
Присваивает имя файлу
Назначение процедуры (out t: Text; c: Char);
Присваивает имя файлу
процедура BlockRead (var f: file; var Buf; count: Int64; var Res: Int64);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: LongInt; var Result: LongInt);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Cardinal; var Result: Cardinal);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Word; var var: Word);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Word; var Res: Integer);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Int64);
Читает данные из файла в память
процедура BlockWrite (var f: file; const Buf; Count: Int64; var Res: Int64);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: LongInt; var Result: LongInt);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: Cardinal; var Result: Cardinal);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: Word; var Res: Word);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: Word; var Result: Integer);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: LongInt);
Записывает данные из памяти в файл
Закрытие процедуры (var f: file);
процедура Close (var t: Text);
функция EOF (var f: file): Boolean;
Проверяет конец файла
функция EOF (var t: Text): Boolean;
Проверяет конец файла
функция EOF: Boolean;
Проверяет конец файла
function EOLn (var t: Text): Boolean;
Проверяет конец строки
функция EOLn: Boolean;
Проверяет конец строки
процедура Erase (var f: file);
Удаляет файл с диска
процедура Erase (var t: Text);
Удаляет файл с диска
функция FilePos (var f: file): Int64;
Положение в файле
функция FileSize (var f: file): Int64;
процедура Flush (var t: Text);
Записывает файловые буферы на диск
функция IOResult: Word;
Возвращает результат последней операции ввода-вывода файла
процедура Read (var F: Text; Args: Arguments);
Читает из файла в переменную
процедура Read (Аргументы: Аргументы);
Читает из файла в переменную
процедура ReadLn (var F: Text; Args: Arguments);
Читает из файла в переменную и перейти к следующей строке
процедура ReadLn (Args: Аргументы);
Читает из файла в переменную и перейти к следующей строке
процедура Rename (var f: file; const s :);
Переименовывает файл на диск
процедура Rename (var f: file; p: PChar);
Переименовывает файл на диск
процедура Rename (var f: file; c: Char);
Переименовывает файл на диск
процедура Rename (var t: Text; const s);
Переименовать файл на диске
процедура Rename (var t: Text; p: PChar);
Переименовывает файл на диск
процедура Rename (var t: Text; c: Char);
Переименовывает файл на диск
процедура Reset (var f: file; l: LongInt);
Открывает файл для чтения
Сброс процедуры (var f: file);
Открывает файл для чтения
процедура Reset (var f: TypedFile);
Открывает файл для чтения
процедура Reset (var t: Text);
Открывает файл для чтения
процедура Rewrite (var f: file; l: LongInt);
Открывает файл для записи
процедура переписать (var f: file);
Открывает файл для записи
процедура переписать (var f: TypedFile);
Открывает файл для записи
процедура переписать (var t: Text);
Открывает файл для записи
поиск процедуры (var f: file; Pos: Int64);
Устанавливает положение файла
function SeekEOF (var t: Text): Boolean;
Устанавливает позицию файла в конец файла
function SeekEOF: Boolean;
Устанавливает позицию файла в конец файла
function SeekEOLn (var t: Text): Boolean;
Устанавливает позицию файла в конец строки
function SeekEOLn: Boolean;
Устанавливает позицию файла в конец строки
процедура SetTextBuf (var f: Text; var Buf);
Устанавливает размер файлового буфера
процедура SetTextBuf (var f: Text; var Buf; Size: SizeInt);
Устанавливает размер файлового буфера
процедура Truncate (var F: file);
Усекать файл в позиции
процедура Write (Аргументы: Аргументы);
Записывает переменную в файл
процедура Write (var F: Text; Args: Arguments);
Записать переменную в файл
процедура Writeln (Аргументы: Аргументы);
Записывает переменную в файл и добавляет новую строку
процедура WriteLn (var F: Text; Args: Arguments);
Записывает переменную в файл и добавляет новую строку
процедура Append (var t: Text);
Открывает файл в режиме добавления
Назначение процедуры (out f: file; const Name :);
Присваивает имя файлу
Назначение процедуры (out f: file; p: PChar);
Присваивает имя файлу
Назначение процедуры (out f: file; c: Char);
Присваивает имя файлу
Назначение процедуры (out f: TypedFile; const Name :);
Присваивает имя файлу
процедура Assign (out f: TypedFile; p: PChar);
Присваивает имя файлу
процедура Assign (out f: TypedFile; c: Char);
Присваивает имя файлу
Назначение процедуры (out t: Text; const s :);
Присваивает имя файлу
Назначение процедуры (out t: Text; p: PChar);
Присваивает имя файлу
Назначение процедуры (out t: Text; c: Char);
Присваивает имя файлу
процедура BlockRead (var f: file; var Buf; count: Int64; var Res: Int64);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: LongInt; var Result: LongInt);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Cardinal; var Result: Cardinal);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Word; var var: Word);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Word; var Res: Integer);
Читает данные из файла в память
процедура BlockRead (var f: file; var Buf; count: Int64);
Читает данные из файла в память
процедура BlockWrite (var f: file; const Buf; Count: Int64; var Res: Int64);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: LongInt; var Result: LongInt);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: Cardinal; var Result: Cardinal);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: Word; var Res: Word);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: Word; var Result: Integer);
Записывает данные из памяти в файл
процедура BlockWrite (var f: file; const Buf; Count: LongInt);
Записывает данные из памяти в файл
Закрытие процедуры (var f: file);
процедура Close (var t: Text);
функция EOF (var f: file): Boolean;
Проверяет конец файла
функция EOF (var t: Text): Boolean;
Проверяет конец файла
функция EOF: Boolean;
Проверяет конец файла
function EOLn (var t: Text): Boolean;
Проверяет конец строки
функция EOLn: Boolean;
Проверяет конец строки
процедура Erase (var f: file);
Удаляет файл с диска
процедура Erase (var t: Text);
Удаляет файл с диска
функция FilePos (var f: file): Int64;
Положение в файле
функция FileSize (var f: file): Int64;
процедура Flush (var t: Text);
Записывает файловые буферы на диск
функция IOResult: Word;
Возвращает результат последней операции ввода-вывода файла
процедура Read (var F: Text; Args: Arguments);
Читает из файла в переменную
процедура Read (Аргументы: Аргументы);
Читает из файла в переменную
процедура ReadLn (var F: Text; Args: Arguments);
Читает из файла в переменную и перейти к следующей строке
процедура ReadLn (Args: Аргументы);
Читает из файла в переменную и перейти к следующей строке
процедура Rename (var f: file; const s :);
Переименовывает файл на диск
процедура Rename (var f: file; p: PChar);
Переименовывает файл на диск
процедура Rename (var f: file; c: Char);
Переименовывает файл на диск
процедура Rename (var t: Text; const s);
Переименовать файл на диске
процедура Rename (var t: Text; p: PChar);
Переименовывает файл на диск
процедура Rename (var t: Text; c: Char);
Переименовывает файл на диск
процедура Reset (var f: file; l: LongInt);
Открывает файл для чтения
Сброс процедуры (var f: file);
Открывает файл для чтения
процедура Reset (var f: TypedFile);
Открывает файл для чтения
процедура Reset (var t: Text);
Открывает файл для чтения
процедура Rewrite (var f: file; l: LongInt);
Открывает файл для записи
процедура переписать (var f: file);
Открывает файл для записи
процедура переписать (var f: TypedFile);
Открывает файл для записи
процедура переписать (var t: Text);
Открывает файл для записи
поиск процедуры (var f: file; Pos: Int64);
Устанавливает положение файла
function SeekEOF (var t: Text): Boolean;
Устанавливает позицию файла в конец файла
function SeekEOF: Boolean;
Устанавливает позицию файла в конец файла
function SeekEOLn (var t: Text): Boolean;
Устанавливает позицию файла в конец строки
function SeekEOLn: Boolean;
Устанавливает позицию файла в конец строки
процедура SetTextBuf (var f: Text; var Buf);
Устанавливает размер файлового буфера
процедура SetTextBuf (var f: Text; var Buf; Size: SizeInt);
Устанавливает размер файлового буфера
процедура Truncate (var F: file);
Усекать файл в позиции
процедура Write (Аргументы: Аргументы);
Записывает переменную в файл
процедура Write (var F: Text; Args: Arguments);
Записать переменную в файл
процедура Writeln (Аргументы: Аргументы);
Записывает переменную в файл и добавляет новую строку
процедура WriteLn (var F: Text; Args: Arguments);
Записывает переменную в файл и добавляет новую строку
Паскаль – Управление памятью
Эта глава объясняет динамическое управление памятью в Pascal. Язык программирования Pascal предоставляет несколько функций для выделения памяти и управления.
Выделение памяти динамически
Во время программирования, если вы знаете размер массива, это легко, и вы можете определить его как массив. Например, чтобы сохранить имя любого человека, оно может содержать до 100 символов, чтобы вы могли определить что-то следующим образом:
Но теперь давайте рассмотрим ситуацию, когда у вас нет представления о длине текста, который нужно сохранить, например, вы хотите сохранить подробное описание по теме. Здесь нам нужно определить указатель на строку, не определяя, сколько памяти требуется.
Паскаль предоставляет новую процедуру для создания переменных указателя.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Теперь, если вам нужно определить указатель с определенным количеством байтов, чтобы он мог ссылаться на него позже, вы должны использовать функцию getmem или процедуру getmem , которая имеет следующий синтаксис:
В предыдущем примере мы объявили указатель на строку. Строка имеет максимальное значение 255 байтов. Если вам действительно не нужно так много места или больше места в байтах, подпрограмма getmem позволяет указать это. Давайте перепишем предыдущий пример, используя getmem –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Таким образом, у вас есть полный контроль, и вы можете передавать любое значение размера при выделении памяти в отличие от массивов, где после определения размер не может быть изменен.
Изменение размера и освобождение памяти
Когда ваша программа выходит, операционная система автоматически освобождает всю память, выделенную вашей программой, но в качестве хорошей практики, когда вам больше не нужна память, вы должны освободить эту память.
Паскаль предоставляет процедуру dispose для освобождения динамически создаваемой переменной с использованием процедуры new. Если вы выделили память с помощью подпрограммы getmem , то вам нужно использовать freemem подпрограммы, чтобы освободить эту память. Подпрограммы freemem имеют следующий синтаксис –
Кроме того, вы можете увеличить или уменьшить размер выделенного блока памяти, вызвав функцию ReAllocMem . Давайте еще раз проверим вышеуказанную программу и воспользуемся подпрограммами ReAllocMem и freemem . Ниже приводится синтаксис для ReAllocMem –
Ниже приведен пример использования подпрограмм ReAllocMem и freemem:
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Функции управления памятью
Паскаль предоставляет множество функций управления памятью, которые используются для реализации различных структур данных и реализации низкоуровневого программирования на Паскале. Многие из этих функций зависят от реализации. Free Pascal предоставляет следующие функции и процедуры для управления памятью –
function Addr (X: TAnytype): указатель;
Возвращает адрес переменной
Назначенная функция (P: указатель): Boolean;
Проверяет правильность указателя
функция CompareByte (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция CompareChar (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция CompareDWord (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция CompareWord (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция Cseg: Word;
Возвращает сегмент кода
процедура Dispose (P: указатель);
Освобождает динамически выделяемую память
процедура Dispose (P: TypedPointer; Des: TProcedure);
Освобождает динамически выделяемую память
функция Dseg: Word;
Возвращает сегмент данных
процедура FillByte (var x; count: SizeInt; значение: Byte);
Заполняет область памяти 8-битным шаблоном
процедура FillChar (var x; count: SizeInt; Значение: Byte | Boolean | Char);
Заполняет область памяти определенным символом
процедура FillDWord (var x; count: SizeInt; значение: DWord);
Заполняет область памяти 32-битным шаблоном
процедура FillQWord (var x; count: SizeInt; значение: QWord);
Заполняет область памяти 64-битным шаблоном
Заполняет область памяти 16-битным шаблоном
процедура Freemem (p: указатель; размер: PtrUInt);
Освобождает выделенную память
процедура Freemem (p: указатель);
Освобождает выделенную память
процедура Getmem (out p: указатель; размер: PtrUInt);
Выделяет новую память
процедура Getmem (out p: указатель);
Выделяет новую память
процедура GetMemoryManager (var MemMgr: TMemoryManager);
Возвращает текущий менеджер памяти
функция High (Arg: TypeOrVariable): TOrdinal;
Возвращает максимальный индекс открытого массива или перечисления
function IndexByte (const buf; len: SizeInt; b: Byte): SizeInt;
Находит значение в байтах в диапазоне памяти
function IndexChar (const buf; len: SizeInt; b: Char): SizeInt;
Находит значение размера символа в диапазоне памяти
function IndexDWord (const buf; len: SizeInt; b: DWord): SizeInt;
Находит значение размера DWord (32-разрядное) в диапазоне памяти
function IndexQWord (const buf; len: SizeInt; b: QWord): SizeInt;
Находит значение размера QWord в диапазоне памяти
Функция Indexword (const buf; len: SizeInt; b: Word): SizeInt;
Находит значение размера слова в диапазоне памяти
function IsMemoryManagerSet: Boolean;
Установлен ли менеджер памяти
функция Low (Arg: TypeOrVariable): TOrdinal;
Возвращает самый низкий индекс открытого массива или перечисления
процедура Move (постоянный источник; var dest; count: SizeInt);
Перемещает данные из одного места в памяти в другое
процедура MoveChar0 (const buf1; var buf2; len: SizeInt);
Перемещает данные до первого нулевого символа
процедура New (var P: Pointer);
Динамически распределять память для переменной
процедура New (вар P: указатель; минусы: TProcedure);
Динамически распределяет память для переменной
функция Ofs (var X): LongInt;
Возвращает смещение переменной
функция ptr (sel: LongInt; off: LongInt): farpointer;
Объединяет сегмент и смещение к указателю
функция ReAllocMem (var p: указатель; размер: PtrUInt): указатель;
Изменяет размер блока памяти в куче
функция Seg (var X): LongInt;
процедура SetMemoryManager (const MemMgr: TMemoryManager);
Устанавливает менеджер памяти
функция Sptr: указатель;
Возвращает текущий указатель стека
функция Sseg: Word;
Возвращает значение регистра сегмента стека
function Addr (X: TAnytype): указатель;
Возвращает адрес переменной
Назначенная функция (P: указатель): Boolean;
Проверяет правильность указателя
функция CompareByte (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция CompareChar (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция CompareDWord (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция CompareWord (const buf1; const buf2; len: SizeInt): SizeInt;
Сравнивает 2 буфера памяти байт на байт
функция Cseg: Word;
Возвращает сегмент кода
процедура Dispose (P: указатель);
Освобождает динамически выделяемую память
процедура Dispose (P: TypedPointer; Des: TProcedure);
Освобождает динамически выделяемую память
функция Dseg: Word;
Возвращает сегмент данных
процедура FillByte (var x; count: SizeInt; значение: Byte);
Заполняет область памяти 8-битным шаблоном
процедура FillChar (var x; count: SizeInt; Значение: Byte | Boolean | Char);
Заполняет область памяти определенным символом
процедура FillDWord (var x; count: SizeInt; значение: DWord);
Заполняет область памяти 32-битным шаблоном
процедура FillQWord (var x; count: SizeInt; значение: QWord);
Заполняет область памяти 64-битным шаблоном
Заполняет область памяти 16-битным шаблоном
процедура Freemem (p: указатель; размер: PtrUInt);
Освобождает выделенную память
процедура Freemem (p: указатель);
Освобождает выделенную память
процедура Getmem (out p: указатель; размер: PtrUInt);
Выделяет новую память
процедура Getmem (out p: указатель);
Выделяет новую память
процедура GetMemoryManager (var MemMgr: TMemoryManager);
Возвращает текущий менеджер памяти
функция High (Arg: TypeOrVariable): TOrdinal;
Возвращает максимальный индекс открытого массива или перечисления
function IndexByte (const buf; len: SizeInt; b: Byte): SizeInt;
Находит значение в байтах в диапазоне памяти
function IndexChar (const buf; len: SizeInt; b: Char): SizeInt;
Находит значение размера символа в диапазоне памяти
function IndexDWord (const buf; len: SizeInt; b: DWord): SizeInt;
Находит значение размера DWord (32-разрядное) в диапазоне памяти
function IndexQWord (const buf; len: SizeInt; b: QWord): SizeInt;
Находит значение размера QWord в диапазоне памяти
Функция Indexword (const buf; len: SizeInt; b: Word): SizeInt;
Находит значение размера слова в диапазоне памяти
function IsMemoryManagerSet: Boolean;
Установлен ли менеджер памяти
функция Low (Arg: TypeOrVariable): TOrdinal;
Возвращает самый низкий индекс открытого массива или перечисления
процедура Move (постоянный источник; var dest; count: SizeInt);
Перемещает данные из одного места в памяти в другое
процедура MoveChar0 (const buf1; var buf2; len: SizeInt);
Перемещает данные до первого нулевого символа
процедура New (var P: Pointer);
Динамически распределять память для переменной
процедура New (вар P: указатель; минусы: TProcedure);
Динамически распределяет память для переменной
функция Ofs (var X): LongInt;
Возвращает смещение переменной
функция ptr (sel: LongInt; off: LongInt): farpointer;
Объединяет сегмент и смещение к указателю
функция ReAllocMem (var p: указатель; размер: PtrUInt): указатель;
Изменяет размер блока памяти в куче
функция Seg (var X): LongInt;
процедура SetMemoryManager (const MemMgr: TMemoryManager);
Устанавливает менеджер памяти
функция Sptr: указатель;
Возвращает текущий указатель стека
функция Sseg: Word;
Возвращает значение регистра сегмента стека
Паскаль – Единицы
Программа на Паскале может состоять из модулей, называемых модулями. Модуль может состоять из нескольких блоков кода, которые, в свою очередь, состоят из переменных и объявлений типов, операторов, процедур и т. Д. В Pascal есть много встроенных модулей, и Pascal позволяет программистам определять и записывать свои собственные используемые модули. позже в различных программах.
Использование встроенных модулей
Как встроенные, так и определяемые пользователем модули включаются в программу с помощью использования. Мы уже использовали модуль вариантов в учебнике по Паскалю – Варианты . В этом руководстве объясняется создание и включение пользовательских единиц. Тем не менее, давайте сначала посмотрим, как включить встроенный модуль CRT в вашу программу –
Следующий пример иллюстрирует использование модуля crt –
Это та же самая программа, которую мы использовали в самом начале урока по Паскалю, скомпилируйте и запустите ее, чтобы найти результаты изменений.
Создание и использование модуля Pascal
Чтобы создать модуль, вам нужно написать модули или подпрограммы, которые вы хотите сохранить в нем, и сохранить его в файле с расширением .pas . Первая строка этого файла должна начинаться с ключевого слова unit, за которым следует имя модуля. Например –
Ниже приведены три важных шага в создании модуля Pascal –
Название файла и название устройства должны быть точно такими же. Таким образом, наш модуль CalculayArea будет сохранен в файле с именем calcArea.pas.
Следующая строка должна состоять из единственного ключевого интерфейса . После этой строки вы напишите декларации для всех функций и процедур, которые появятся в этом модуле.
Сразу после объявления функции напишите слово реализация , которое снова является ключевым словом. После строки, содержащей ключевое слово реализации, укажите все подпрограммы.
Название файла и название устройства должны быть точно такими же. Таким образом, наш модуль CalculayArea будет сохранен в файле с именем calcArea.pas.
Следующая строка должна состоять из единственного ключевого интерфейса . После этой строки вы напишите декларации для всех функций и процедур, которые появятся в этом модуле.
Сразу после объявления функции напишите слово реализация , которое снова является ключевым словом. После строки, содержащей ключевое слово реализации, укажите все подпрограммы.
Следующая программа создает модуль с именем calcArea –
Далее, давайте напишем простую программу, которая будет использовать модуль, который мы определили выше –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – дата и время
Большинство программ, которые вы пишете, нуждаются в реализации некоторой формы функций даты, возвращающих текущую дату и время. Свидания настолько важны в повседневной жизни, что с ними легко работать, не задумываясь. Паскаль также предоставляет мощные инструменты для арифметики дат, которые упрощают манипулирование датами. Однако фактическое имя и работа этих функций различны для разных компиляторов.
Получение текущей даты и времени
Функция Pascal TimeToString дает вам текущее время в форме с разделителями (:). В следующем примере показано, как получить текущее время –
Когда приведенный выше код был скомпилирован и выполнен, он дает следующий результат –
Функция Date возвращает текущую дату в формате TDateTime . TDateTime – это двойное значение, которое требует некоторого декодирования и форматирования. Следующая программа демонстрирует, как использовать ее в вашей программе для отображения текущей даты:
Когда приведенный выше код был скомпилирован и выполнен, он дает следующий результат –
Функция Now возвращает текущую дату и время –
Когда приведенный выше код был скомпилирован и выполнен, он дает следующий результат –
Free Pascal предоставляет простую структуру меток времени с именем TTimeStamp , которая имеет следующий формат:
Различные функции даты и времени
Free Pascal предоставляет следующие функции даты и времени –
function DateTimeToFileDate (DateTime: TDateTime): LongInt;
Преобразует тип DateTime в дату файла.
Функция DateTimeToStr (DateTime: TDateTime) :;
Создает строковое представление DateTime
function DateTimeToStr (DateTime: TDateTime; const FormatSettings: TFormatSettings) :;
Создает строковое представление DateTime
процедура DateTimeToString (out Результат:; const FormatStr:; const DateTime: TDateTime);
Создает строковое представление DateTime
процедура DateTimeToString (out Результат:; const FormatStr:; const DateTime: TDateTime; const FormatSettings: TFormatSettings);
Создает строковое представление DateTime
процедура DateTimeToSystemTime (DateTime: TDateTime; выход SystemTime: TSystemTime);
Преобразует DateTime в системное время
function DateTimeToTimeStamp (DateTime: TDateTime): TTimeStamp; Преобразует DateTime в метку времени
Функция DateToStr (Date: TDateTime) :;
Создает строковое представление даты
function DateToStr (Date: TDateTime; const FormatSettings: TFormatSettings) :;
Создает строковое представление даты
Функция Date: TDateTime;
Получает текущую дату
function DayOfWeek (DateTime: TDateTime): Integer;
Получает день недели
процедура DecodeDate (Дата: TDateTime; год выхода: слово; месяц выхода: слово; день выхода: слово);
Декодирует DateTime в год, месяц и день
процедура DecodeTime (время: TDateTime; вне часа: слово; вне минуты: слово; вне секунды: слово; вне миллисекунды: слово);
Декодирует DateTime в часы, минуты и секунды
функция EncodeDate (год: слово; месяц: слово; день: слово): TDateTime;
Кодирует год, день и месяц в DateTime
функция EncodeTime (час: слово; минута: слово; секунда: слово; миллисекунда: слово): TDateTime;
Кодирует часы, минуты и секунды в DateTime
Функция FormatDateTime (const FormatStr:; DateTime: TDateTime) :;
Возвращает строковое представление DateTime
функция FormatDateTime (const FormatStr:; DateTime: TDateTime; const FormatSettings: TFormatSettings) :;
Возвращает строковое представление DateTime
функция IncMonth (const DateTime: TDateTime; NumberOfMonths: Integer = 1): TDateTime;
Добавляет 1 к месяцу
function IsLeapYear (Год: Слово): Boolean;
Определяет, является ли год високосным
function MSecsToTimeStamp (MSecs: Comp): TTimeStamp;
Преобразует количество миллисекунд в метку времени
функция сейчас: TDateTime;
Получает текущую дату и время
function StrToDateTime (const S :): TDateTime;
Преобразует строку в DateTime
function StrToDateTime (const s: ShortString; const FormatSettings: TFormatSettings): TDateTime;
Преобразует строку в DateTime
function StrToDateTime (const s: AnsiString; const FormatSettings: TFormatSettings): TDateTime;
Преобразует строку в DateTime
function StrToDate (const S: ShortString): TDateTime;
Преобразует строку в дату
function StrToDate (const S: Ansistring): TDateTime;
Преобразует строку в дату
function StrToDate (const S: ShortString; разделитель: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: AnsiString; разделитель: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: ShortString; const useformat:; разделитель: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: AnsiString; const useformat:; separator: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: PChar; Len: Integer; const useformat:; separator: Char = # 0): TDateTime;
Преобразует строку в дату
function StrToTime (const S: Shortstring): TDateTime;
Преобразует строку во время
function StrToTime (const S: Ansistring): TDateTime;
Преобразует строку во время
function StrToTime (const S: ShortString; разделитель: Char): TDateTime;
Преобразует строку во время
function StrToTime (const S: AnsiString; разделитель: Char): TDateTime;
Преобразует строку во время
function StrToTime (const S:; FormatSettings: TFormatSettings): TDateTime;
Преобразует строку во время
function StrToTime (const S: PChar; Len: Integer; разделитель: Char = # 0): TDateTime;
Преобразует строку во время
function SystemTimeToDateTime (const SystemTime: TSystemTime): TDateTime;
Преобразует системное время в datetime
function TimeStampToDateTime (const TimeStamp: TTimeStamp): TDateTime;
Преобразует метку времени в DateTime
function TimeStampToMSecs (const TimeStamp: TTimeStamp): comp;
Преобразует метку времени в количество миллисекунд
функция TimeToStr (Time: TDateTime) :;
Возвращает строковое представление времени
function TimeToStr (Time: TDateTime; const FormatSettings: TFormatSettings) :;
Возвращает строковое представление времени
функция Time: TDateTime;
Получить текущее время
function DateTimeToFileDate (DateTime: TDateTime): LongInt;
Преобразует тип DateTime в дату файла.
Функция DateTimeToStr (DateTime: TDateTime) :;
Создает строковое представление DateTime
function DateTimeToStr (DateTime: TDateTime; const FormatSettings: TFormatSettings) :;
Создает строковое представление DateTime
процедура DateTimeToString (out Результат:; const FormatStr:; const DateTime: TDateTime);
Создает строковое представление DateTime
процедура DateTimeToString (out Результат:; const FormatStr:; const DateTime: TDateTime; const FormatSettings: TFormatSettings);
Создает строковое представление DateTime
процедура DateTimeToSystemTime (DateTime: TDateTime; выход SystemTime: TSystemTime);
Преобразует DateTime в системное время
function DateTimeToTimeStamp (DateTime: TDateTime): TTimeStamp; Преобразует DateTime в метку времени
Функция DateToStr (Date: TDateTime) :;
Создает строковое представление даты
function DateToStr (Date: TDateTime; const FormatSettings: TFormatSettings) :;
Создает строковое представление даты
Функция Date: TDateTime;
Получает текущую дату
function DayOfWeek (DateTime: TDateTime): Integer;
Получает день недели
процедура DecodeDate (Дата: TDateTime; год выхода: слово; месяц выхода: слово; день выхода: слово);
Декодирует DateTime в год, месяц и день
процедура DecodeTime (время: TDateTime; вне часа: слово; вне минуты: слово; вне секунды: слово; вне миллисекунды: слово);
Декодирует DateTime в часы, минуты и секунды
функция EncodeDate (год: слово; месяц: слово; день: слово): TDateTime;
Кодирует год, день и месяц в DateTime
функция EncodeTime (час: слово; минута: слово; секунда: слово; миллисекунда: слово): TDateTime;
Кодирует часы, минуты и секунды в DateTime
Функция FormatDateTime (const FormatStr:; DateTime: TDateTime) :;
Возвращает строковое представление DateTime
функция FormatDateTime (const FormatStr:; DateTime: TDateTime; const FormatSettings: TFormatSettings) :;
Возвращает строковое представление DateTime
функция IncMonth (const DateTime: TDateTime; NumberOfMonths: Integer = 1): TDateTime;
Добавляет 1 к месяцу
function IsLeapYear (Год: Слово): Boolean;
Определяет, является ли год високосным
function MSecsToTimeStamp (MSecs: Comp): TTimeStamp;
Преобразует количество миллисекунд в метку времени
функция сейчас: TDateTime;
Получает текущую дату и время
function StrToDateTime (const S :): TDateTime;
Преобразует строку в DateTime
function StrToDateTime (const s: ShortString; const FormatSettings: TFormatSettings): TDateTime;
Преобразует строку в DateTime
function StrToDateTime (const s: AnsiString; const FormatSettings: TFormatSettings): TDateTime;
Преобразует строку в DateTime
function StrToDate (const S: ShortString): TDateTime;
Преобразует строку в дату
function StrToDate (const S: Ansistring): TDateTime;
Преобразует строку в дату
function StrToDate (const S: ShortString; разделитель: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: AnsiString; разделитель: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: ShortString; const useformat:; разделитель: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: AnsiString; const useformat:; separator: Char): TDateTime;
Преобразует строку в дату
function StrToDate (const S: PChar; Len: Integer; const useformat:; separator: Char = # 0): TDateTime;
Преобразует строку в дату
function StrToTime (const S: Shortstring): TDateTime;
Преобразует строку во время
function StrToTime (const S: Ansistring): TDateTime;
Преобразует строку во время
function StrToTime (const S: ShortString; разделитель: Char): TDateTime;
Преобразует строку во время
function StrToTime (const S: AnsiString; разделитель: Char): TDateTime;
Преобразует строку во время
function StrToTime (const S:; FormatSettings: TFormatSettings): TDateTime;
Преобразует строку во время
function StrToTime (const S: PChar; Len: Integer; разделитель: Char = # 0): TDateTime;
Преобразует строку во время
function SystemTimeToDateTime (const SystemTime: TSystemTime): TDateTime;
Преобразует системное время в datetime
function TimeStampToDateTime (const TimeStamp: TTimeStamp): TDateTime;
Преобразует метку времени в DateTime
function TimeStampToMSecs (const TimeStamp: TTimeStamp): comp;
Преобразует метку времени в количество миллисекунд
функция TimeToStr (Time: TDateTime) :;
Возвращает строковое представление времени
function TimeToStr (Time: TDateTime; const FormatSettings: TFormatSettings) :;
Возвращает строковое представление времени
функция Time: TDateTime;
Получить текущее время
Следующий пример иллюстрирует использование некоторых из вышеуказанных функций –
Когда приведенный выше код был скомпилирован и выполнен, он дал следующий результат:
Паскаль – объектно-ориентированный
Мы можем представить нашу вселенную, сделанную из различных объектов, таких как солнце, земля, луна и т. Д. Точно так же мы можем представить нашу машину, сделанную из различных объектов, таких как колесо, рулевое управление, шестерня и т. Д. Таким же образом, существуют концепции объектно-ориентированного программирования, которые принять все как объект и реализовать программное обеспечение, используя различные объекты. В Паскале есть два структурных типа данных, используемых для реализации объекта реального мира –
- Типы объектов
- Типы классов
Объектно-ориентированные концепции
Прежде чем мы углубимся в детали, давайте определим важные термины Паскаля, связанные с Объектно-ориентированным Паскалем.
Object – объект – это особый вид записи, который содержит поля, подобные записи; однако, в отличие от записей, объекты содержат процедуры и функции как часть объекта. Эти процедуры и функции хранятся как указатели на методы, связанные с типом объекта.
Класс – класс определяется почти так же, как и объект, но существует различие в том, как они создаются. Класс размещается в куче программы, а объект – в стеке. Это указатель на объект, а не сам объект.
Создание класса – создание означает создание переменной этого типа класса. Поскольку класс является просто указателем, когда объявляется переменная типа класса, память выделяется только для указателя, а не для всего объекта. Только когда он создается с использованием одного из своих конструкторов, память выделяется для объекта. Экземпляры класса также называются «объектами», но не путайте их с объектами Object Pascal. В этом уроке мы напишем «Объект» для объектов Pascal и «Объект» для концептуального объекта или экземпляра класса.
Переменные-члены – это переменные, определенные внутри класса или объекта.
Функции-члены – это функции или процедуры, определенные внутри класса или объекта и используемые для доступа к данным объекта.
Видимость членов – члены объекта или класса также называются полями. Эти поля имеют различную видимость. Видимость относится к доступности членов, т. Е. Точно, где эти члены будут доступны. Объекты имеют три уровня видимости: открытый, закрытый и защищенный. Классы имеют пять типов видимости: публичный, частный, строго приватный, защищенный и опубликованный. Мы обсудим видимость в деталях.
Наследование. Когда класс определяется путем наследования существующих функций родительского класса, он считается наследуемым. Здесь дочерний класс будет наследовать все или несколько функций-членов и переменных родительского класса. Объекты также могут быть унаследованы.
Родительский класс – класс, который наследуется другим классом. Это также называется базовым классом или суперклассом.
Дочерний класс – класс, который наследуется от другого класса. Это также называется подклассом или производным классом.
Полиморфизм – это объектно-ориентированная концепция, в которой одна и та же функция может использоваться для разных целей. Например, имя функции останется прежним, но оно может принимать разное количество аргументов и может выполнять разные задачи. Классы Pascal реализуют полиморфизм. Объекты не реализуют полиморфизм.
Перегрузка – это тип полиморфизма, при котором некоторые или все операторы имеют разные реализации в зависимости от типов их аргументов. Аналогично функции также могут быть перегружены с другой реализацией. Классы Pascal реализуют перегрузку, а объекты – нет.
Абстракция данных – любое представление данных, в котором скрыты (абстрагированы) детали реализации.
Инкапсуляция – Относится к концепции, в которой мы инкапсулируем все данные и функции-члены вместе, чтобы сформировать объект.
Конструктор. Относится к специальному типу функции, которая будет вызываться автоматически при создании объекта из класса или объекта.
Destructor – относится к специальному типу функции, которая будет вызываться автоматически всякий раз, когда объект или класс удаляется или выходит из области видимости.
Object – объект – это особый вид записи, который содержит поля, подобные записи; однако, в отличие от записей, объекты содержат процедуры и функции как часть объекта. Эти процедуры и функции хранятся как указатели на методы, связанные с типом объекта.
Класс – класс определяется почти так же, как и объект, но существует различие в том, как они создаются. Класс размещается в куче программы, а объект – в стеке. Это указатель на объект, а не сам объект.
Создание класса – создание означает создание переменной этого типа класса. Поскольку класс является просто указателем, когда объявляется переменная типа класса, память выделяется только для указателя, а не для всего объекта. Только когда он создается с использованием одного из своих конструкторов, память выделяется для объекта. Экземпляры класса также называются «объектами», но не путайте их с объектами Object Pascal. В этом уроке мы напишем «Объект» для объектов Pascal и «Объект» для концептуального объекта или экземпляра класса.
Переменные-члены – это переменные, определенные внутри класса или объекта.
Функции-члены – это функции или процедуры, определенные внутри класса или объекта и используемые для доступа к данным объекта.
Видимость членов – члены объекта или класса также называются полями. Эти поля имеют различную видимость. Видимость относится к доступности членов, т. Е. Точно, где эти члены будут доступны. Объекты имеют три уровня видимости: открытый, закрытый и защищенный. Классы имеют пять типов видимости: публичный, частный, строго приватный, защищенный и опубликованный. Мы обсудим видимость в деталях.
Наследование. Когда класс определяется путем наследования существующих функций родительского класса, он считается наследуемым. Здесь дочерний класс будет наследовать все или несколько функций-членов и переменных родительского класса. Объекты также могут быть унаследованы.
Родительский класс – класс, который наследуется другим классом. Это также называется базовым классом или суперклассом.
Дочерний класс – класс, который наследуется от другого класса. Это также называется подклассом или производным классом.
Полиморфизм – это объектно-ориентированная концепция, в которой одна и та же функция может использоваться для разных целей. Например, имя функции останется прежним, но оно может принимать разное количество аргументов и может выполнять разные задачи. Классы Pascal реализуют полиморфизм. Объекты не реализуют полиморфизм.
Перегрузка – это тип полиморфизма, при котором некоторые или все операторы имеют разные реализации в зависимости от типов их аргументов. Аналогично функции также могут быть перегружены с другой реализацией. Классы Pascal реализуют перегрузку, а объекты – нет.
Абстракция данных – любое представление данных, в котором скрыты (абстрагированы) детали реализации.
Инкапсуляция – Относится к концепции, в которой мы инкапсулируем все данные и функции-члены вместе, чтобы сформировать объект.
Конструктор. Относится к специальному типу функции, которая будет вызываться автоматически при создании объекта из класса или объекта.
Destructor – относится к специальному типу функции, которая будет вызываться автоматически всякий раз, когда объект или класс удаляется или выходит из области видимости.
Определение объектов Паскаля
Объект объявляется с помощью объявления типа. Общая форма объявления объекта выглядит следующим образом:
Давайте определим объект Rectangle, который имеет два элемента данных целочисленного типа – длину и ширину и несколько функций-членов для управления этими элементами данных и процедуру рисования прямоугольника.
После создания ваших объектов вы сможете вызывать функции-члены, связанные с этим объектом. Одна функция-член сможет обрабатывать только переменную-член связанного объекта.
В следующем примере показано, как установить длину и ширину для двух прямоугольных объектов и нарисовать их, вызвав функции-члены.
Ниже приведен полный пример, демонстрирующий использование объектов в Паскале.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Видимость членов объекта
Видимость указывает на доступность членов объекта. Члены объекта Pascal имеют три типа видимости –
общественного
Члены могут использоваться другими блоками вне программного блока
Члены доступны только в текущем блоке.
Члены доступны только для объектов, произошедших от родительского объекта.
общественного
Члены могут использоваться другими блоками вне программного блока
Члены доступны только в текущем блоке.
Члены доступны только для объектов, произошедших от родительского объекта.
По умолчанию поля и методы объекта являются общедоступными и экспортируются за пределы текущей единицы.
Конструкторы и деструкторы для объектов Pascal –
Конструкторы – это особый тип методов, которые вызываются автоматически при создании объекта. Вы создаете конструктор в Pascal, просто объявив метод с помощью конструктора ключевых слов. Условно имя метода – Init, однако вы можете указать любой собственный действительный идентификатор. Вы можете передать столько аргументов, сколько захотите, в функцию конструктора.
Деструкторы – это методы, которые вызываются при уничтожении объекта. Методы деструктора уничтожают любое выделение памяти, созданное конструкторами.
Следующий пример предоставит конструктор и деструктор для класса Rectangle, который будет инициализировать длину и ширину для прямоугольника во время создания объекта и уничтожать его, когда он выходит из области видимости.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Наследование для объектов Pascal
Объекты Pascal могут при желании наследоваться от родительского объекта. Следующая программа иллюстрирует наследование в объектах Pascal. Давайте создадим еще один объект с именем TableTop , который наследуется от объекта Rectangle.
Ниже приведены важные моменты, которые следует отметить –
Объект Tabletop унаследовал все члены объекта Rectangle.
В TableTop также есть метод draw. Когда метод draw вызывается с использованием объекта TableTop, вызывается метод рисования TableTop.
Существует неявный экземпляр с именем self, который ссылается на текущий экземпляр объекта.
Объект Tabletop унаследовал все члены объекта Rectangle.
В TableTop также есть метод draw. Когда метод draw вызывается с использованием объекта TableTop, вызывается метод рисования TableTop.
Существует неявный экземпляр с именем self, который ссылается на текущий экземпляр объекта.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Паскаль – Классы
Вы видели, что объекты Pascal обладают некоторыми характеристиками объектно-ориентированной парадигмы. Они реализуют инкапсуляцию, сокрытие данных и наследование, но у них также есть ограничения. Например, объекты Pascal не участвуют в полиморфизме. Поэтому классы широко используются для реализации правильного объектно-ориентированного поведения в программе, особенно в программном обеспечении на основе графического интерфейса.
Класс определяется почти так же, как объект, но является указателем на объект, а не на сам объект. Технически это означает, что класс размещается в куче программы, а объект – в стеке. Другими словами, когда вы объявляете переменную типа объекта, она занимает столько же места в стеке, сколько и размер объекта, но когда вы объявляете переменную типа класса, она всегда принимает размер указателя в стеке. Фактические данные класса будут в куче.
Определение классов Паскаля
Класс объявляется так же, как объект, используя объявление типа. Общая форма объявления класса выглядит следующим образом:
Стоит отметить следующие важные моменты –
Определения классов должны входить только в часть описания типа программы.
Класс определяется с помощью ключевого слова class .
Поля – это элементы данных, которые существуют в каждом экземпляре класса.
Методы объявляются в определении класса.
Существует предопределенный конструктор с именем Create в классе Root. Каждый абстрактный класс и каждый конкретный класс является потомком Root, поэтому у всех классов есть хотя бы один конструктор.
В классе Root есть предопределенный деструктор Destroy . Каждый абстрактный класс и каждый конкретный класс является потомком Root, поэтому у всех классов есть по крайней мере один деструктор.
Определения классов должны входить только в часть описания типа программы.
Класс определяется с помощью ключевого слова class .
Поля – это элементы данных, которые существуют в каждом экземпляре класса.
Методы объявляются в определении класса.
Существует предопределенный конструктор с именем Create в классе Root. Каждый абстрактный класс и каждый конкретный класс является потомком Root, поэтому у всех классов есть хотя бы один конструктор.
В классе Root есть предопределенный деструктор Destroy . Каждый абстрактный класс и каждый конкретный класс является потомком Root, поэтому у всех классов есть по крайней мере один деструктор.
Давайте определим класс Rectangle, который имеет два члена-данных целочисленного типа – длину и ширину, а также некоторые функции-члены для управления этими элементами-данными и процедуру рисования прямоугольника.
Давайте напишем полную программу, которая создаст экземпляр класса прямоугольника и нарисует прямоугольник. Это тот же пример, который мы использовали при обсуждении объектов Pascal. Вы найдете, что обе программы почти одинаковы, за следующими исключениями –
Вам нужно будет включить директиву <$ mode objfpc>для использования классов.
Вам нужно будет включить директиву <$ m +>для использования конструкторов.
Создание экземпляров класса отличается от создания объектов. Только объявление переменной не создает пространство для экземпляра, вы будете использовать конструктор create для выделения памяти.
Вам нужно будет включить директиву <$ mode objfpc>для использования классов.
Вам нужно будет включить директиву <$ m +>для использования конструкторов.
Создание экземпляров класса отличается от создания объектов. Только объявление переменной не создает пространство для экземпляра, вы будете использовать конструктор create для выделения памяти.
Вот полный пример –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Видимость участников класса
Видимость указывает на доступность членов класса. Члены класса Паскаль имеют пять видов видимости –
общественного
Эти участники всегда доступны.
Эти члены могут быть доступны только в модуле или модуле, который содержит определение класса. К ним можно получить доступ из методов класса или извне.
Строгий Частный
Эти члены могут быть доступны только из методов самого класса. Другие классы или дочерние классы в том же модуле не могут получить к ним доступ.
Это то же самое, что и private, за исключением того, что эти члены доступны для потомков, даже если они реализованы в других модулях.
опубликованный
Это то же самое, что и Public, но компилятор генерирует информацию о типе, которая необходима для автоматической потоковой передачи этих классов, если компилятор находится в состоянии <$ M +>. Поля, определенные в опубликованном разделе, должны иметь тип класса.
общественного
Эти участники всегда доступны.
Эти члены могут быть доступны только в модуле или модуле, который содержит определение класса. К ним можно получить доступ из методов класса или извне.
Строгий Частный
Эти члены могут быть доступны только из методов самого класса. Другие классы или дочерние классы в том же модуле не могут получить к ним доступ.
Это то же самое, что и private, за исключением того, что эти члены доступны для потомков, даже если они реализованы в других модулях.
опубликованный
Это то же самое, что и Public, но компилятор генерирует информацию о типе, которая необходима для автоматической потоковой передачи этих классов, если компилятор находится в состоянии <$ M +>. Поля, определенные в опубликованном разделе, должны иметь тип класса.
Конструкторы и деструкторы для классов Паскаля
Конструкторы – это специальные методы, которые вызываются автоматически при создании объекта. Таким образом, мы в полной мере используем это поведение, инициализируя многие вещи через функции конструктора.
Паскаль предоставляет специальную функцию create () для определения конструктора. Вы можете передать столько аргументов, сколько захотите, в функцию конструктора.
Следующий пример создаст один конструктор для класса с именем Books и инициализирует цену и заголовок для книги во время создания объекта.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Как и неявный конструктор с именем create, существует также неявный метод деструктора destroy, с помощью которого вы можете высвободить все ресурсы, используемые в классе.
наследование
Определения класса Pascal могут при желании наследоваться от определения родительского класса. Синтаксис выглядит следующим образом –
В следующем примере представлен класс Novel, который наследует класс Books и добавляет дополнительные функциональные возможности в зависимости от требований.
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Стоит отметить следующие важные моменты –
Члены класса Книги имеют защищенную видимость.
Класс Novels имеет два конструктора, поэтому для перегрузки функций используется оператор перегрузки.
Процедура Books.Display объявлена виртуальной , поэтому тот же метод из класса Novels может переопределить ее.
Конструктор Novels.Create вызывает конструктор базового класса с использованием унаследованного ключевого слова.
Члены класса Книги имеют защищенную видимость.
Класс Novels имеет два конструктора, поэтому для перегрузки функций используется оператор перегрузки.
Процедура Books.Display объявлена виртуальной , поэтому тот же метод из класса Novels может переопределить ее.
Конструктор Novels.Create вызывает конструктор базового класса с использованием унаследованного ключевого слова.
Интерфейсы
Интерфейсы определены для обеспечения общего имени функции для разработчиков. Различные исполнители могут реализовать эти интерфейсы в соответствии со своими требованиями. Можно сказать, что интерфейсы – это скелеты, которые реализуются разработчиками. Ниже приведен пример интерфейса –
Обратите внимание, что когда класс реализует интерфейс, он должен реализовывать все методы интерфейса. Если метод интерфейса не реализован, компилятор выдаст ошибку.
Абстрактные классы
Абстрактный класс – это класс, который не может быть создан, только наследован. Абстрактный класс задается включением слова «абстрактный» в определение класса, например:
При наследовании от абстрактного класса все методы, помеченные как абстрактные в объявлении класса родителя, должны быть определены дочерним объектом; Кроме того, эти методы должны быть определены с одинаковой видимостью.
Статическое ключевое слово
Объявление членов класса или методов как статических делает их доступными без необходимости создания экземпляра класса. Член, объявленный как статический, не может быть доступен с экземпляром объекта класса (хотя статический метод может). Следующий пример иллюстрирует концепцию –
Когда приведенный выше код компилируется и выполняется, он дает следующий результат –
Вы должны использовать директиву <$ static on>для использования статических членов.
Экзаменационные вопросы по информатике + Ответы на Экзаменационные вопросы / Ответы на вопросы по информатике прошлых лет / 7. Типы данных в Паскале
Тип данных определяет множество допустимых значений и множество допустимых операций.
Простые типы делятся на ПОРЯДКОВЫЕ и ВЕЩЕСТВЕННЫЕ.
1. ПОРЯДКОВЫЕ ТИПЫ, в свою очередь, бывают:
В Паскале определено 5 целых типов, которые определяются в зависимости от знака и значения, которое будет принимать переменная.
-2 147 483 648. +2 147 483 647
Название этого типа BOOLEAN. Значениями логического типа может быть одна из логических констант: TRUE (истина) или FALSE (ложь).
Название этого типа CHAR — занимает 1 байт. Значением символьного типа является множество всех символов ПК. Каждому символу присваивается целое число в диапозоне 0…255. Это число служит кодом внутреннего представления символа.
В отличие от порядковых типов, значения которых всегда сопоставляются с рядом целых чисел и, следовательно, представляются в ПК абсолютно точно, значения вещественных типов определяют произвольное число лишь с некоторой конечной точностью, зависящей от внутреннего формата вещественного числа.
Длина числового типа данных, байт
Название числового типа данных
Количество значащих цифр числового типа данных
Диапазон десятичного порядка числового типа данных
СТРЕКТУРИРОВАННЫЕ ТИПЫ
Структурированные типы данных определяют упорядоченную совокупность скалярных переменных и характеризуются типом своих компонентов.
Структурированные типы данных в отличие от простых задают множества сложных значений с одним общим именем. Можно сказать, что структурные типы определяют некоторый способ образования новых типов из уже имеющихся.
Существует несколько методов структурирования. По способу организации и типу компонентов в сложных типах данных выделяют следующие разновидности: регулярный тип (массивы); комбинированный тип (записи); файловый тип (файлы); множественный тип (множества); строковый тип (строки); в языке Турбо Паскаль версии 6.0 и старше введен объектный тип (объекты).
В отличие от простых типов данных, данные структурированного типа характеризуются множественностью образующих этот тип элементов, т.е. переменная или константа структурированного типа всегда имеет несколько компонентов. Каждый компонент в свою очередь может принадлежать структурированному типу, т.е. возможна вложенность типов.
Массивы в Турбо Паскале во многом схожи с аналогичными типами данных в других языках программирования. Отличительная особенность массивов заключается в том, что все их компоненты суть данные одного типа (возможно структурированного). Эти компоненты можно легко упорядочить и обеспечить доступ к любому из них простым указанием порядкового номера.
Описание массива задаётся следующим образом:
<имя типа> = array [<сп.инд.типов>] of <тип>
Здесь <имя типа> — правильный идентификатор;
Array, of – зарезервированные слова (массив, из);
<сп.инд.типов> — список из одного или нескольких индексных типов, разделённых запятыми; квадратные скобки, обрамляющие список, — требование синтаксиса;
<тип> — любой тип Турбо Паскаля.
В качестве индексных типов в Турбо Паскале можно использовать любые порядковые типы, кроме LongInt и типов-диапазонов с базовым типом LongInt.
Глубина вложенности структурированных типов вообще, а следовательно, и массивов – произвольная, поэтому количество элементов в списке индексов типов (размерность массива) не ограничено, однако суммарная длина внутреннего представления любого массива не может быть больше 65520 байт.
Запись – это структура данных, состоящая из фиксированного числа компонентов, называемых полями записи. В отличие от массива, компоненты (поля) записи могут быть различного типа. Чтобы можно было ссылаться на тот или иной компонент записи, поля именуются.
Структура объявления типа записи такова:
<имя типа> = RECORD <сп.полей> END
Здесь <имя типа> — правильный идентификатор;
RECORD, END – зарезервированные слова (запись, конец);
<сп.полей> — список полей; представляет собой последовательность разделов записи, между которыми ставится точка с запятой.
Множества – это набор однотипных логических связанных друг с другом объектов. Характер связей между объектами лишь подразумевается программистом и никак не контролируется Турбо Паскалем. количество элементов, входящих в множество, может меняться в пределах от 0до 256 (множество, не содержащее элементов, называется пустым).именно непостоянством количества своих элементов множества отличаются от массивов и записей.
Два множества считаются эквивалентными тогда и только тогда, когда все их элементы одинаковы, причём порядок следования элементов множества безразличен. Если все элементы одного множества входят также и в другое, говорят о включении первого множества во второе.
Описание типа множества имеет вид:
<имя типа> = SET OF <баз.тип>
Здесь <имя типа> — правильный индификатор;
SET, OF – зарезервированные слова (множество, из);
<баз.тип> — базовый тип элементов множества, в качестве которого может использоваться любой порядковый тип, кроме WORD, INTEGER и LONGINT.
Для задания множества используется так называемый конструктор множества: список спецификаций элементов множества, отделяемых друг от друга запятыми; список обрамляется квадратными скобками. Спецификациями элементов могут быть константы или выражения базового типа, а также – тип-диапазон того же базового типа.
Под файлом понимается либо именованная область внешней памяти ПК, либо логическое устройство – потенциальный источник или приёмник информации.
Любой файл имеет три характерные особенности
у него есть имя, что даёт возможность программе работать одновременно с несколькими файлами.
он содержит компоненты одного типа. Типом компонентов может быть любой тип Турбо Паскаля, кроме файлов. Иными словами, нельзя создать «файл файлов».
длина вновь создаваемого файла никак не оговаривается при его объявлении и ограничивается только ёмкостью устройств внешней памяти.
Файловый тип или переменную файлового типа можно задать одним из трёх способов:
<имя>= FILE OF <тип>;
<имя>=TEXT;
Здесь <имя> — имя файлового типа (правильный индификатор);
FILE, OF – зарезервированные слова (файл, из);
TEXT – имя стандартного типа текстовых файлов;
<тип> — любой тип Турбо Паскаля, кроме файлов.
В зависимости от способа объявления можно выделить три вида файлов:
· типизированные файлы (задаются предложением FILE OF…);
· текстовые файлы (определяются типом TEXT);
· нетипизированные файлы (определяются типом FILE).
О преобразовании числовых типов данных Паскаля
В Паскале почти невозможны неявные (автоматические) преобразования числовых типов данных. Исключение сделано только для типа integer, который разрешается использовать в выражениях типа real. Например, если переменные описаны следующим образом:
Var X : integer; Y: real;
будет синтаксически правильным, хотя справа от знака присваивания стоит целочисленное выражение, а слева – вещественная переменная, компилятор сделает преобразование числовых типов данных автоматически. Обратное же преобразование автоматически типа real в тип integer в Паскале невозможно. Вспомним, какое количество байт выделяется под переменные типа integer и real: под целочисленный тип данных integer выделяется 2 байта памяти, а под real – 6 байта. Для преобразования real в integer имеются две встроенные функции: round(x) округляет вещественное x до ближайшего целого, trunc(x) усекает вещественное число путем отбрасывания дробной части.
Функции Sqr, Abs, Sqrt, Sin, Cos, Arctan, Ln, Exp, Pi в Pascal.
Мы уже знаем, какие существуют функции для целых переменных. Это – нахождение модуля числа (Функция Abc), а также возведение числа в квадрат (Функция Sqr). В этом уроке мы рассмотрим функции, применяемые к дробным числам. Это функции Sqr — квадрат числа, Abs — модуль числа, Sqrt — корень числа, а также известные всем математические функции Sin, Cos, Arctan, Ln, Exp, Pi.
В строке №7 записывается функция Sqr. Это функция возведения числа в квадрат.
В строке №9 записывается операция нахождения модуля числа.
Функции Sqr и Abs мы разбирали в уроке Abs, Sqr в Pascal.
В строке №11 записывается функция Sqrt. Данная функция подсчитывает корень числа, стоящего в скобках после слова Sqrt. В нашем случае функция Sqrt будет считать корень из числа «2».
В строке №13 записываем функцию Sin. Данная функция будет подсчитывать синус числа, стоящего в скобках после записи функции.
Строка №15. Функция Cos подсчитывает косинус числа, стоящего в скобках после функции.
Строка №17. Функция Arctan вычисляет арктангенс числа, стоящего в скобках после записи функции.
Строка №19. Функция Ln подсчитывает логарифм числа, стоящего в скобках после записи функции.
Строка №21. Функция Exp возводит число «e» (экспонента — 2.72. ) в степень, значение которой указывается в скобках после слова Exp. Т.е. в нашем случае число «e» будет возведено в степень «2».
