Разработка приложения для Windows, которое обеспечивает выполнение операций сложения, вычитания и умножения над матрицами целых чисел

Цель курсовой работы является отражение приобретенных знаний и практические навыки по курсу «Программирование на языке высокого уровня».

Задача курсовой работы — разработать приложение для Windows, которое обеспечивает выполнение операций сложения, вычитания и умножения над матрицами целых чисел. Выбор выполняемой операции осуществляет пользователь.

Результатом решения является:

а) пояснительная записка, составленная с учетом требования стандартов ЕСПД;

б) исполняемый файл программы, прилагаемый к пояснительной записке на диске. Для решения поставленной задачи как основные использованы следующие источники: Бобровский, С. И. Технологии Delphi 2006. Новые возможностиСПб.: Питер, 2006; Культин, Н. Б. Основы программирования в Delphi 7 — СПб.: БХВ-Петербург, 2003.

Для реализации данной задачи была использована среда Delphi 6.

Любая программа в DELPHI состоит из файла проекта (файл с расширением DPR) и одного или нескольких модулей (файлы с расширением PAS). Каждый из таких файлов описывает программную единицу Object Pascal.

Файл проекта представляет собой программу, написанную на языке Object Pascal и предназначенную для обработки компилятором. Эта программа автоматически создается DELPHI и содержит лишь несколько строк. (View/ProjectSource).

Модуль — автономно компилируемая программная единица, включающая в себя различные компоненты раздела описаний (типы, константы, переменные, процедуры и функции) и, возможно некоторые исполняемые операторы инициирующей части.

Любой модуль имеет следующую структуру:

· Заголовок

· Секция интерфейсных объявлений

· Секция реализаций

· Секция инициации Терминатор Один из модулей, главный, содержит инструкции, с которых начинается выполнение программы. Главный модуль приложения формирует DELPHI.

Заголовок открывается зарезервированным словом UNIT, за которым следует имя модуля и точка с запятой. Имя модуля служит для его связи с другими модулями и основной программой. Эта связь устанавливается специальным предложением

USES <�список модулей> Секция интерфейсных объявлений открывается зарезервированным словом INTERFACE. В этой части содержатся объявления всех глобальных объектов модуля (типов, констант, переменных и подпрограмм), которые должны стать доступными основной программе и (или) другим модулям.

Секция реализаций открывается словом IMPLEMENTATION, содержит описание подпрограмм. В ней могут появляться локальные для модуля объекты.

Секция инициации — открывается словом BEGIN.

Терминатором модуля, как и терминатором программы является END с точкой.

Наиболее распространенным типом модуля в DELPHI является ФОРМА — модуль со связанным с ним окном. Интерфейсная часть такого модуля обычно содержит объявление нового класса, и автоматически обновляется в ходе конструирования окна. В интерфейсной части модуля-формы содержится также объявление объекта для соответствующего оконного класса.

Кроме того, есть модули, не связанные с видимыми окнами:

Модули данных имеют связанные с ними окна, однако эти окна никогда не появляются на экране. Необходимость в них появляется при использовании, например, компонентов доступа к базам данных страницы DATA ACCESS, и т. д.

Модули динамических библиотек предназначены для создания широко используемых в WINDOWS динамически связываемых библиотек DLL.

Модули потоков предназначены для реализации так называемых потоков команд — фрагментов программы, которые исполняются параллельно с другими фрагментами, разделяя с ними время процессора и остальные системные ресурсы.

Разработчики языка OBJECT PASCAL ввели для обозначения объектов специальный термин — Класс. Классами В OBJECT PASCAL называются специальные типы, которые содержат поля, методы и свойства. Как и любой другой тип, класс служит лишь образцом для создания конкретных экземпляров реализации, которые называются объектами.

В основе классов лежат три фундаментальных принципа, которые называются инкапсуляция, наследование и полиморфизм.

Инкапсуляция.

Класс представляет собой единство трех сущностей — полей, методов и свойств. Объединение этих сущностей в единое целое и называется инкапсуляцией. Библиотека классов Delphi — это, фактически, набор «кирпичиков», созданных программистами Borland для построения программ.

Полями называются инкапсулированные в классе данные. Поля могут быть любого типа, в том числе — классами, например,

Type TMyClass = class aIntField: Integer; aStrField: String; aObjField: Tobject; end;

Инкапсулированные в классе процедуры и функции называются методами. Они объявляются так же, как и обычные подпрограммы:

Type TMyClass = class Function MyFunc (aPar: Integer) :Integer; Procedure MyProc;

end;

Свойства — это специальный механизм классов, регулирующий доступ к полям. Свойство объекта характеризуется полем, хранящем значение свойства, и двумя методами, обеспечивающими доступ к полю свойства — метод записи свойства (write), метод чтения свойства (read).

Наследование Концепция объектно-ориентированного программирования предполагает возможность определять новые классы посредством добавления полей свойств и методов к уже существующим классам. Такой механизм получения новых классов называется порождением. При этом новый, порожденный, класс наследует свойства и методы своего базового, родительского класса.

Полиморфизм — это возможность использовать одинаковые имена для методов, входящих в различные классы. Концепция полиморфизма обеспечивает при применении метода к объекту использование именно того метода, который соответствует классу объекта.

Используя визуальные компоненты из вкладки Standart, и зная приемы работ с массивами, была решена поставленная задача. Так как, требуется выполнение операции над матрицами, сначала были сформулированы с помощью генератора случайных чисел две матрицы целых чисел.

При решении задачи придержана техника пошаговой детализации, использованы циклические структуры.

В программе, предусмотрен вывод справки о программе и информации о разработчике.

1. Разработка эскизного и технического проектов программы

Придержан стандарт ГОСТ 19.404−79 к содержанию и оформлению программного документа «Пояснительная записка», входящего в состав документов на стадиях разработки эс кизного и технического проектов программы.

1.1 Задание

Тема: Разработка приложения для Windows, представляющего собой выполнение операции над матрицами.

Условие задачи:

Разработать проект, который обеспечивает выполнение операций сложения, вычитания и умножения над матрицами целых чисел. Выбор выполняемой операции осуществляет пользователь. Программа должна сгенерировать автоматическое заполнение матриц с целыми случайными числами. В программе должен быть предусмотрен вывод справок о разработчике и о программе.

1.2 Назначение и область применения

Необходимо разработать программу выполнения математических действий над матрицами. Программа может быть использована в учебном процессе в качестве наглядного пособия.

Поскольку ставится задача разработать приложение для Windows, то использоваться программа может только под управлением ОС Windows.

1.3 Технические характеристики

1.3.1 Постановка задачи

Постановка задачи — разработать проект, который обеспечивает выполнение операций сложения, вычитания и умножения над матрицами целых чисел. Выбор выполняемой операции осуществляет пользователь. Входная информация по задаче — две целочисленные матрицы, над которыми будут выполняться операции сложения, вычитания и умножения. Выходная информация это то же матрица, которая является результатом выбранной операции. Для программирования данной задачи используются структура данных — массив и циклические конструкции. Массив — совокупность однотипных элементов. Двумерный массив называются матрицей. Матрица определяется именем, размерность и типом. Например А[4,3] - матрица из 4 строк и 3 столбцов. Доступ к элементам массива осуществляется с помощью индексов. Для доступа к элементам матрицы используются два индекса. Например A[I, j] -элемент на пересечений i — строки, jстолбца. Операции сложения и вычитания матриц выполняются по элементно, т. е

С[I, j]=a[I, j]+b[I, j]; или С[I, j]=a[I, j]- b[I, j];

Для умножения матриц строка первой матрицы скалярно умножается на столбец второй матрицы. В результате получится один элемент новой матрицы. Например

С[1,1]=a[1,1]*b[1,1]+a[1,2]*b[2,1]+a[1,3]*b[3,1];

Чтобы произвести операции сложения и вычитания размеры матриц должны быть одинаковыми. Для выполнения операции умножения количество столбцов первой матрицы должно быть одинаковым количеством строк второй матрицы. В программе для удобства пользователю исходные матрицы формируются с помощью генерации случайных чисел. Использованы случайные числа в пределах от 0 до 10.

1.3.2 Описание алгоритма

По условию поставленной задачи необходимо программировать выполнения операции сложения, вычитания и умножения матриц.

Операцию должен выбрать пользователь.

Так как выполняются операции над матрицами, необходимо инициализировать исходные матрицы. Инициализация каждой матрицы выполняется вызовом отдельных процедур, т. е. нажатием на Label1 и Label2. Выбор операции осуществляется нажатием на соответствующую кнопку Button1, Button2, или Button3. Ниже в рисунке 1. приведена схема обобщенного алгоритма.

В программе решаются три независимые друг от друга подзадачи.

1. Сложение двух матриц.

2. Вычитание двух матриц.

3. Умножение двух матриц.

Схема алгоритма сложения матриц приведена на рисунке 2.

Рисунок 2. Сложение двух матриц

Схема алгоритма вычитания матриц приведена на рисунке 3.

Рисунок 3. Вычитание двух матриц

1.3.3 Организация входных и выходных данных

Входными данными в данной задаче являются исходные матрицы размером 10×10. Чтобы выполнить операции сложения и вычитания матрицы должны иметь одинаковые размеры. А для операции умножения количество столбцов первой матрицы должно быть одинаковым количеством строк второй матрицы. Поэтому для всех операции подходят квадратные матрицы.

Выходными данными является матрица результата.

В программе для удобства исходные матрицы формируются случайными числами.

1.3.4 Выбор состава технических и программных средств

Задание на курсовую работу — разработка приложения для Windows, поэтому использована среда разработки приложений Delphi.

Delphiэто среда быстрой разработки, в которой в качестве языка программирования используется Object Pascal. В основе идеологии Delphi лежит технология визуального программирования и методология объектно-ориентированного программирования. В курсовом проекте использованы три формы и следующие визуальные компоненты.

TLabel служит для отображения текста на экране. Можно изменить шрифт и цвет метки, если дважды щелкнуть на свойство Font в Инспекторе Объектов. Это легко сделать и во время выполнения программы, написав всего одну строчку кода.

TStringGrid — служит для представления текстовых данных в виде таблицы. Доступ к каждому элементу таблицы происходит через свойство Cell.

TButton позволяет выполнить какие-либо действия при нажатии кнопки во время выполнения программы. В Delphi все делается очень просто. Поместив TButton на форму, по двойному щелчку можно создать заготовку обработчика события нажатия кнопки. Над объектами проекта использованы события Show, Create, onClick, Close.

Для полноценной работы данной программы необходимы следующие ресурсы компьютера: процессор Pentium IV или Celeron 2.0Ghz.

Оперативная память не менее 512 Мбайт, достаточное количество свободного места на диске — порядка 1 Гбайт.

2. Разработка рабочего проекта

2.1 Разработка программы

Проект программы содержит три окна:

1. Form1 — главное окно (выполнение операции над матрицами).

2. Form2 — справка о разработчике.

3. Form3 — справка о программе.

Окно Form1 (рисунок 3).

Рисунок 3. Главное окно программы — Form1

Ниже приведены описание компонентов, некоторые похожие компоненты не описаны.

Компонент Form1

Свойства:

Сaption — Курсовая работа по программированию;

Border — bsSingle;

BiSystemMenu — false;

BiMinimaze — false;

BiHelp — False;

События: нет.

1- компонент TМainMenu

Свойства:

object MainMenu1: TMainMenu

Items

Справка (N1) О разработчике (N3) О программе (N4)

Выход (N2)

События:

Для N1 — событие BitBtn1Click (приводится ниже).

N2Click — закончить работу с приложением.

N3Click — перейти к работе со второй формой.

N4Click — перейти к работе с третьей формой.

2- компонент StringGrid1 Left = 152 Top = 42 Width = 220 Height = 180 DefaultColWidth = 20 DefaultRowHeight = 16 FixedCols = 0 FixedRows = 0

3- компонент Button2 Caption = '-'

событие OnClick = Button2Click

4- компонент Button4 Left = 200 Top = 336 Width = 121 Height = 25 Caption = контрольный пример событие OnClick = Button4Click

5 — компонент TLabel1

Свойства: Caption = Матрица 1

События OnClick = Label2Click

Ниже приводится окно Form2 (рисунок 4)

Рисунок 4. окно Form2

компонент Form2

Свойства

Caption Справка о разработчике

1-компонент Label1

Свойства Сaption Курсовой проект по дисциплине «Программирование»

2-компонент Label1

Свойства Сaption Программу разработал студент группы Узин-709−02 КРУ г. Астана

3-компонент Label1

Свойства Сaption Садреев Иван Событие OnClick

Компонент Form3

Рисунок 5

1- компонент Мемо1

2- компонент Button1

свойство Сaption Назад

Написание программы

Для решения поставленной задачи в программе были объявлены двумерные массивы (матрицы) D, A, B, C: Array[0.20,0.20] of integer;

Доступ к элементам массива осуществляется с помощью индексов, поэтому были объявлены целочисленные простые переменные.

m, n, k, i, j, p: integer;

В программе используются циклические конструкции. Кроме вложенных циклов с параметром программа не содержит сложных конструкции.

// процедура формирования матрицы А

procedure TForm1. Label2Click (Sender: TObject);

begin for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do

begin

stringGrid3.Cells[i, j]: =''; end;

for i:=0 to stringGrid1. ColCount-1 do

for j:=0 to stringgrid1. RowCount-1 do

begin

a[i, j]: =random (9);

stringGrid1.Cells[j, i]:=inttostr (a[i, j]); end;

end; // процедура умножения матриц

procedure TForm1. Button3Click (Sender: TObject);

begin

// обнуление матрицы D for k:=0 to stringGrid1. ColCount-1 do for i:=0 to stringGrid1. ColCount-1 do d[k, i]: =0;

for k:=0 to stringGrid1. ColCount-1 do

for i:=0 to stringGrid1. ColCount-1 do

begin for j:=0 to stringgrid1. RowCount-1 do d[k, i]: =d[k, i]+a[k, j]*b[j, i]; end; // Вывод результатов в StringGrid3 for i:=0 to 9 do for j:=0 to 9 do stringgrid3. Cells[j, i]: =inttostr (d[i, j]); end;

2.2 Спецификация программы

Исполняемый файл программы выполнения операции над матрицами имеет название Matr. exe и расположен на компакт-диске в каталоге Matr1Matriz. Состав проекта.

2.3 Текст программы

Листинг программы.

unit Unit1;

interface

uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Grids, Menus;

type TForm1 = class (TForm) MainMenu1: TMainMenu; N1: TMenuItem; N2: TMenuItem;

N3: TMenuItem;

N4: TMenuItem;

StringGrid1: TStringGrid;

StringGrid2: TStringGrid;

Button1: TButton;

Button2: TButton;

Button3: TButton;

Label1: TLabel;

StringGrid3: TStringGrid;

Label2: TLabel;

Label3: TLabel;

N5: TMenuItem;

Button4: TButton;

procedure FormCreate (Sender: TObject);

procedure Button1Click (Sender: TObject);

procedure Button2Click (Sender: TObject);

procedure Button3Click (Sender: TObject);

procedure N3Click (Sender: TObject);

procedure Label2Click (Sender: TObject);

procedure Label3Click (Sender: TObject);

procedure N4Click (Sender: TObject);

procedure N2Click (Sender: TObject);

procedure N5Click (Sender: TObject);

procedure Button4Click (Sender: TObject);

private { Private declarations } public { Public declarations } end;

var Form1: TForm1;

d, A, B, C: array[0.20,0.20] of integer;

m, n, k, i, j, p: integer;

implementation

uses Unit2, Unit3;

{$R *.dfm}

procedure TForm1. FormCreate (Sender: TObject);

begin

randomize; //генератор случайных чисел

// установление свойств компонента Stringrid2, Stringgrid3 присваивается количество строк и //столбцов компонент StringGrid1

stringgrid2.ColCount:= stringgrid1. ColCount;

stringgrid2.RowCount:= stringgrid1. RowCount;

stringgrid2.DefaultColWidth:=stringgrid1.DefaultColWidth;

stringgrid2.DefaultRowHeight:= stringgrid1. DefaultRowHeight;

stringgrid2.FixedCols:= stringgrid1. FixedCols;

stringgrid2.FixedRows:= stringgrid1. FixedRows;

stringgrid2.Height:=stringgrid1.Height;

stringgrid2.Width:= stringgrid1. Width;

stringgrid3.ColCount:= stringgrid1. ColCount;

stringgrid3.RowCount:= stringgrid1. RowCount;

stringgrid3.DefaultColWidth:=stringgrid1.DefaultColWidth;

stringgrid3.DefaultRowHeight:= stringgrid1. DefaultRowHeight;

stringgrid3.FixedCols:= stringgrid1. FixedCols;

stringgrid3.FixedRows:= stringgrid1. FixedRows;

stringgrid3.Height:=stringgrid1.Height;

stringgrid3.Width:= stringgrid1. Width;

for i:=0 to stringgrid1. RowCount-1 do for j:=0 to stringgrid1. colCount-1 do begin stringGrid1. Cells[i, j]: ='';

stringGrid2.Cells[i, j]: =''; end; end;

// процедура сложения матриц

procedure TForm1. Button1Click (Sender: TObject);

begin

for i:=0 to stringGrid1. RowCount-1 do

for j:=0 to stringgrid1. ColCount-1 do

begin

c[i, j]: =a[i, j]+b[i, j];

end;

for i:=0 to stringGrid1. RowCount-1 do

for j:=0 to stringgrid1. ColCount-1 do

stringgrid3.Cells[j, i]: =inttostr (c[i, j]); end;

//процедура вычитания матриц

procedure TForm1. Button2Click (Sender: TObject);

begin

for i:=0 to stringGrid1. ColCount-1 do

for j:=0 to stringgrid1. RowCount-1 do begin

c[i, j]: =a[i, j]-b[i, j];

end;

for i:=0 to stringGrid1. ColCount-1 do

for j:=0 to stringgrid1. RowCount-1 do

stringgrid3.Cells[j, i]: =inttostr (c[i, j]);

end; // процедура умножения матриц

procedure TForm1. Button3Click (Sender: TObject);

begin // инициализация матрицы D for k:=0 to stringGrid1. ColCount-1 do for i:=0 to stringGrid1. ColCount-1 do d[k, i]: =0; // Умножение for k:=0 to stringGrid1. ColCount-1 do for i:=0 to stringGrid1. ColCount-1 do begin for j:=0 to stringgrid1. RowCount-1 do d[k, i]: =d[k, i]+a[k, j]*b[j, i];

end; // Вывод результата в Stringrid for i:=0 to 9 do for j:=0 to 9 do stringgrid3. Cells[j, i]: =inttostr (d[i, j]); end;

// запуск формы 2 Справка о разработчике

procedure TForm1. N3Click (Sender: TObject);

begin form2. Show;

end;

//формирование матрицы А

procedure TForm1. Label2Click (Sender: TObject);

begin for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do begin stringGrid3. Cells[i, j]: ='';

end; for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do begin a[i, j]: =random (9);

stringGrid1.Cells[j, i]: =inttostr (a[i, j]); end; end;

//формирование матрицы В

procedure TForm1. Label3Click (Sender: TObject);

begin for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do begin stringGrid3. Cells[i, j]: ='';

end; for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do begin b[i, j]: =random (9); stringGrid2. Cells[j, i]: =inttostr (b[i, j]);

end;

end;

//запуск формы 3 Справка о программе

procedure TForm1. N4Click (Sender: TObject);

begin

form3.show;

end;

//Выход из программы

procedure TForm1. N2Click (Sender: TObject);

begin

form1.close;

form2.Close;

form3.Close;

end;

//Сообщение оператору `Помощь'

procedure TForm1. N5Click (Sender: TObject);

begin Showmessage ('Нажмите на кнопки Матрица 1 и Матрица 2 для формирования матриц');

end;

//Контрольный пример

procedure TForm1. Button4Click (Sender: TObject);

begin for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do begin

???a[i, j]: =1; b[i, j]: =random (2);

end; for j:=0 to stringGrid1. ColCount-1 do for i:=0 to stringgrid1. RowCount-1 do begin stringGrid2. Cells[j, i]: =inttostr (b[i, j]);

stringGrid1.Cells[j, i]:=inttostr (a[i, j]);

end; for i:=0 to stringGrid1. ColCount-1 do for j:=0 to stringgrid1. RowCount-1 do begin C[i, j]: =0;

d[i, j]: =0; stringGrid3. Cells[j, i]: =inttostr (C[i, j]); end;

end;

end.

2.4 Описание программы

Программа предназначена для выполнения операции сложения, вычитания и умножения матриц. Программа написана на языке Object Pascal. Работает в среде операционных систем Widows 2000/XP. Для полноценной работы данной программы необходимы следующие ресурсы компьютера: процессор Pentium IV или Celeron 2.0Ghz.

Оперативная память не менее 512 Мбайт, достаточное количество свободного места на диске — порядка 1 Гбайт.

Программа запускается нажатием на файл Matriz.exe. На открывающем окне формы расположен меню MainMenu, через которого можно открыть справки, помощь и закрыть программу. Ввод данных осуществляется с помощью случайных чисел. Нажатие на метки Матрица 1 и Матрица 2 вызывает процедуры формирования матриц. Элементы исходных матриц загружаются для отображения на форме в компонент StringGrid1 и StringGrid2. Выходная информация размещается в поле StringGrid3. Пользователю предлагается выбрать одну операцию нажатием на соответствующую кнопку. Программа загружается нажатием на файл Matriz. exe из папки Matr1.

Исходные матрицы описаны как квадратные целочисленные, диапазон значений элементов от 0 до 10. Такое ограничение обусловливается предотврощением перегруза памяти компьютера и ошибок связанные размерностью матриц. Значения для StringGrid1. ColCount и StringGrid1. RowCount задаются в окне ObjectInspektor. Эти значения в программе присваиваются для StringGrid2 и StringGrid3.

2.5 Тестирование программы

Правильность программы легко проверяется для операции сложения и вычитания, так как это производится покомпонентно (см. рисунки 6 и 7).

Рисунок 6. Результат сложения

Рисунок 7. Результат вычитания

Рисунок 8. Результат умножения Перечисляются требования, подлежащие проверке при испытании программы, а также порядок и методика их контроля. Приводятся исходные данные для решения контрольного примера и ожидаемые результаты.

Прилагается распечатка решения контрольного примера и снимки экрана с результатами тестирования.

2.6 Внедрение

В разделе описываются (руководство оператора ГОСТ 19.505−79):

· условия выполнения программы;

· выполнение программы;

· сообщения оператору.

В разделе «Условия выполнения программы» должны быть указаны условия, необходимые для выполнения программы (минимальный и/или максимальный состав аппаратурных и программных средств и т. п.).

В разделе «Выполнение программы» должна быть указана последовательность действий оператора, обеспечивающих загрузку, запуск, выполнение и завершение программы. В разделе приводятся сведения для проверки, обеспечения функционирования и настройки программы на условия конкретного применения. Перечисляется порядок и последовательность ввода исходных данных и получения результатов расчета.

В разделе «Сообщения оператору» должны быть приведены тексты сообщений, выдаваемых в ходе выполнения программы, описание их содержания и соответствующие действия оператора.

Содержание разделов допускается иллюстрировать поясняющими примерами, таблицами, схемами.

Список использованных источников

Немнюгин С.А. Turbo Pascal: Учебник для вуэов, СПб.: «Питер», 2007.

Немнюгин С.А. Turbo Pascal: практикум:. СПб.: Издательство «Питер», 2001.

Вирт Н. Алгоритмы и структуры данных. М., Мир, 2007.

Лабораторный практикум по информатике. Учебное пособие для вузов, СПб.: Питер, 2007

Фараонов В. В. Турбо Паскаль7.0. Практика программирования. М., Нолидж, 2001.

Архангельский, А. Я. Приемы программирования в Delphi на основе VCL [Текст] / А. Я. Архангельский. — М.: Бином-Пресс, 2006. — 933 с.

Павловская, Т. А. Паскаль. Программирование на языке высокого уровня — СПб.: Питер, 2004. (допущен Министерством образования).

Культин, Н. Б. Основы программирования в Delphi 7 — СПб.: БХВ-Петербург, 2003.

Зубов, А. В. Программирование на Delphi. Трюки и эффекты. — СПб.: Питер, 2005.

Павловская, Т. А. Паскаль. Программирование на языке высокого уровня. — СПб.: Питер, 2004. (допущен Министерством образования).