Модули, записи и файлы

Модули, записи и файлы

Сибирский Государственный Унивеверситет Телекамуникаций и Информатики

| |

| | |Кафедра ВТ и ТС |

|КУРСОВАЯ РАБОТА |

| |ДИСЦИПЛИНА: Информатика |

| |ПРЕПОДАВАТЕЛЬ: Моренкова Ольга Илинична |

| |ТЕМА: Модули, записи и файлы. |

| |ИСПОЛНИТЕЛЬ: Грязина Дмитрия Владимировича |

| | |

|Новосибирск |

|2000г. |

С О Д Е Р Ж А Н И Е

Введение 3

Глава 1. Модули в Турбо Паскале. 6

1.1. Назначение и структура модуля 6

1.2. Компиляция модулей. 9

Глава 2. Алгоритмы 11

2.1. Вызывающая программа 12

2.2.Процедура формирование массива А 13

2.3. Процедура вывода массива А 14

2.4. Процедура произведение элементов массива А 15

2.5. Функция поиска максимального элемента векторного массива С…….…….16

Глава 3. Модуль основной программы 17

Глава 4. Основная программа 19

Глава 5. Результаты первой части курсовой работы 21

Глава 6. Записи. 22

Глава 7. Файлы.………………………………………………………………………..24

7.1. Операция с файлами как единое целое. 24

7.2. Структура файлов 26

Глава 8. Задание второй части курсовой работы 30

Глава 9. Алгоритм основной программы 31

Глава 10. Основная программа 32

Глава 11. Результаты второй части курсовой работы……………………………….34

Заключение 35

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

Введение

Целью курсового проектирования является приобретение и закрепление

навыков в организации вычислительных процессов и программирования на

алгоритмическом языке ПАСКАЛЬ. Основной акцент в работе уделяется

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

Кроме того, большое внимание уделяется работе с файлами, подробно

рассматриваются функции открытия и закрытия файла. Полученные знания

помогут в будущем более эффективно подходить к процессу разработки

программного обеспечения.

Язык программирования Pascal был разработан в 1968—1971 гг. Никлаусом

Виртом в Цюрихском Институте информатики (Швейцария). Первоначальная цель

разработки языка диктовалась необходимостью инструмента "для обучения

программированию как систематической дисциплине". Однако очень скоро

обнаружилась чрезвычайная эффективность языка Pascal в самых разнообразных

приложениях, от решения небольших задач численного характера до разработки

сложных программных систем — компиляторов, баз данных, операционных систем

и т.п. К настоящему времени Pascal принадлежит к группе наиболее

распространенных и популярных в мире языков программирования. Существуют

многочисленные реализации языка практически для всех машинных архитектур;

разработаны десятки диалектов и проблемно-ориентированных расширений языка

Pascal;

обучение программированию и научно-технические публикации в значительной

степени базируются на этом языке.

Характеристика и особенности языка. Существует ряд объективных причин,

обусловивших выдающийся успех языка Pascal. Среди них в первую очередь

необходимо указать следующие:

1. Язык в естественной и элегантной форме отразил важнейшие современные

концепции технологии разработки программ: развитая система типов,

ориентация на принципы структурного программирования, поддержка процесса

пошаговой разработки.

2. Благодаря своей компактности, концептуальной целостности и

ортогональности понятий, а также удачному первоначальному описанию,

предложенному автором языка, Pascal оказался весьма легок для изучения и

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

языков, как PL/I, Cobol, FORTRAN, достаточно полное описание языка Pascal

занимает около 30 страниц текста, а его синтаксические правила можно

разместить на одной странице.

3. Несмотря на относительную простоту языка, он оказался пригоден для

весьма широкого спектра приложений, в том числе для разработки очень

больших и сложных программ, например операционных систем.

4. Pascal весьма технологичен для реализации практически для всех, в том

числе и нетрадиционных, машинных архитектур. Утверждается, что разработка

Pascal-транслятора "почти не превышает по трудоемкости хорошую дипломную

работу выпускника вуза". Благодаря этому для многих ЭВМ существует

несколько различных реализации языка, отражающих те или иные практические

потребности программистов.

Язык Pascal стандартизован во многих странах. В 1983 году был принят

международный стандарт (ISO 7185:1983). Готовится (сведения на 1989 год)

стандарт СЭВ на Pascal.

Рассмотрим основные особенности языка Pascal.

1. Pascal является традиционным алгоритмическим языком программирования,

продолжающим линию Algol-60. Это означает, что программа на языке Pascal

представляет собой специально организованную последовательность шагов по

преобразованию данных, приводящую к решению некоторой задачи. Это отличает

Pascal от так называемых непроцедурных языков типа Prolog, по существу

представляющих собой формализмы для записи начальных условий некоторой

задачи и синтезирующих решение посредством встроенных механизмов

логического вывода.

2. Язык Pascal содержит удобные средства для представления данных.

Развитая система типов позволяет адекватно описывать данные, подлежащие

обработке, и конструировать структуры данных произвольной сложности. Pascal

является типизированным языком, что означает фиксацию типов переменных при

их описании, а также строгий контроль преобразований типов и контроль

доступа к данным в соответствии с их типом (как на этапе компиляции, так и

при исполнении программ).

3. Набор операторов языка Pascal отражает принципы структурного

программирования и позволяет записывать достаточно сложные алгоритмы в

компактной и элегантной форме.

Pascal является процедурным языком с традиционной блочной структурой и

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

сочетает в себе простоту реализации и использования и гибкие средства

параметризации.

4. Синтаксис языка достаточно несложен. Программы записываются в свободном

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

Глава 1. Модули в Турбо Паскале.

1.1. Назначение и структура модуля

Модуль - это автономно компилируемая программная единица, включающая в

себя различные компоненты раздела описаний (типы, константы,

переменные, процедуры и функции) и, возможно, некоторые исполняемые

операторы инициирующей части. В модулях Turbo PASCAL явным

образом выделяется некоторая "видимая" интерфейсная часть, в которой

сконцентрированы описания глобальных типов, констант и переменных, а

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

Появление объектов в интерфейсной части делает их доступными для других

модулей и основной программы. Тела процедур и функций располагаются в

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

Модули представляют собой прекрасный инструмент для разработки

библиотек прикладных программ и мощное средство модельного

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

что компилятор Turbo PASCAL размещает их программный код в отдельном

сегменте. Модуль имеет следующую структуру:

UNIT ;

INTERFACE

IMPLEMENTATION

BEGIN

END.

Здесь UNIT - зарезервированное слово, начинает заголовок

модуля;

- имя модуля (должно совпадать с именем файла, в

который помещен модуль);

IMPLEMENTATION - зарезервированное слово (выполнение), начинает

исполняемую часть; BEGIN - зарезервированное слово, начинает

инициирующую часть (часть модуля BEGIN

необязательна); END - зарезервированное слово, признак конца модуля.

Заголовок модуля состоит из зарезервированного слова UNIT и

следующего за ним имени модуля. Для правильной работы Turbo PASCAL и

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

это имя должно совпадать с именем файла, в который помещается исходный

текст модуля. Имя модуля служит для его связи с другими модулями и

основной программой. Эта связь устанавливается специальным приложением

USES . Здесь USES - зарезервированное слово; - список модулей, с которыми устанавливается связь,

элементами списка являются имена модулей, отделяемые друг от друга

запятыми. Если объявление USES используется, то оно должно открывать

раздел описаний основной программы. Модули могут использовать другие

модули. Предложение USES в модулях может следовать либо сразу за

зарезервированным словом INTERFACE, либо сразу за словом

IMPLEMENTATION. Интерфейсная часть открывается зарезервированным словом

INTERFACE. В этой части содержатся объявления всех глобальных

объектов модуля (типов, констант, переменных и подпрограмм), которые

должны стать доступными основной программе и (или) другим модулям.

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

только их заголовок. Объявление подпрограмм в интерфейсной части

автоматически сопровождается их компиляцией с использованием

дальней модели памяти. Таким образом, обеспечивается доступ к

подпрограммам из основной программы и других модулей. Порядок

появления различных разделов объявлений и их количество может быть

произвольным. Исполняемая часть начинается зарезервированным

словом IMPLEMEN- TATION и содержит описания подпрограмм, объявленных в

интерфейсной части. В ней могут объявляться локальные для модуля объекты -

вспомогательные типы, константы, переменные и блоки, а также метки, если

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

в интерфейсной части модуля, в исполняемой части должен

предшествовать заголовок, в котором можно опускать список формальных

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

интерфейсной части. Но если заголовок программы приводится в полном

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

с заголовком, объявленным в интерфейсной части. Инициирующая

часть завершает модуль. Она может отсутствовать вместе с

начинающим ее словом BEGIN или быть пустой - тогда за BEGIN сразу следует

признак конца модуля (слово END и следующая за ним точка). В

инициирующей части размещаются исполняемые операторы, содержащие

некоторый фрагмент программы. Эти операторы исполняются до передачи

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

работы. Например, в них могут инициироваться переменные, открываться

нужные файлы, могут устанавливаться связи с другими ПК по

коммуникационным каналам и т.п. Не рекомендуется делать инициирующую

часть пустой, лучше ее опустить: пустая часть содержит пустой оператор,

которому будет передано управление при запуске программы.

1.2. Компиляция модулей.

В среде Turbo PASCAL имеются средства, управляющие способом

компиляции модулей и облегчающие разработку крупных программных

проектов. В частности, определены три режима компиляции: COMPILE, MAKE

и BUILD. Режимы отличаются только способами связи компилируемого

модуля и основной программы с другими модулями, объявленными в приложении

USES. При компиляции модуля или основной программы в режиме

COMPILE компилируется только файл, находящийся в активном окне.

По умолчанию предполагается, что используемые модули уже

откомпилированы и результаты помещены в одноименные файлы с

расширением .TPU; файл с расширением .TPU (от английского Turbo Pаscal

Unit) создается в результате компиляции модуля. В режиме МАКЕ

компилятор проверяет наличие TPU-файлов для каждого объявленного

модуля. Если какой-либо из файлов не обнаружен, то система пытается

отыскать одноименный файл с расширением .PAS, т.е. файл с исходным

текстом модуля. Если PAS-файл найден, то происходит его компиляция.

Кроме того, в этом режиме система следит за возможными изменениями

исходного текста любого используемого модуля. Если в PAS-файл

(исходный текст модуля) внесены какие-либо изменения, то независимо от

того, есть ли уже в каталоге соответствующий TPU-файл или нет, система

осуществляет его компиляцию перед компиляцией основной программы. Если

изменения внесены в интерфейсную часть модуля, то будут

перекомпилированы также и все другие модули, обращающиеся к нему.

Режим МАКЕ существенно облегчает процесс разработки крупных программ

с множеством модулей. В режиме BUILD существующие TPU-файлы

игнорируются, и система пытается отыскать и компилировать

соответствующий PAS-файл для каждого объявленного в предложении USES

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

том, что учтены все сделанные им изменения в любом из модулей.

Подключение модуля к основной программе и их возможная

компиляция осуществляется в порядке их объявления в предложении

USES. При переходе к очередному модулю система предварительно

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

на друга могут образовывать древовидную структуру любой сложности,

однако запрещается явное или косвенное обращение модуля к самому себе.

Дело в том, что Turbo PASCAL разрешает ссылки на частично

откомпилированные модули, что приблизительно соответствует

опережающему описанию подпрограммы. Если интерфейсные части любых

двух модулей независимы, Turbo PASCAL сможет идентифицировать все

глобальные идентификаторы в каждом из модулей, после чего откомпилирует

тела модулей обычным способом.

Глава 2. Задание первой части курсовой работы

Разработать модуль (схемы алгоритмов и программы), содержащие процедуры и

функции, решающие поставленную задачу :

Вариант № 21

Вычислить произведение элементов каждого столбца матрицы :

Определить максимальное значение произведения :

Разработать вызывающую программу (алгоритм и текст программы), предусмотрев

процедуру очистки экрана и вывода информации на экран с текстовыми

комментариями. Например :

Курсовую работу выполнил студент группы А – 61 Иванов Роман Борисович

Вариант № 21

Разработанный модуль содержит следующие программы :

Процедуру формирования элементов матрицы в интервале –1.0 до 1.0.

Функцию определения суммы элементов той строки, где находиться

максимальный элемент.

Процедуру вывода элементов матрицы.

Результаты :

Сформированная матрица :

------------------------------

------------------------------

Сумма элементов строки, где находится максимальный элемент =…….

2.1. Вызывающая программа

2.2.Процедура формирования массива А

PROCEDURE FORM

2.3.Процедура ввывода массива А

PROCEDURE VIVOD

2.4.Процедура произведения элементов массива А

PROCEDURE PR

2.5.Функция поиска максимального элемента в векторном массиве С

FUNCTION MAX

Глава 3. Модуль основной программы

unit kurp1;

interface

const n=5;

type matr=array[1..n,1..n] of real;

vect=array[1..n] of real;

procedure form(var a:matr);

procedure vivod (var a:matr);

function max(c:vect):real;

procedure pr(a:matr;var c:vect);

implementation

procedure vivod (var a:matr);

var i,j:integer;

begin

for i:=1 to n do

begin

for j:=1 to n do

write (a[i,j]:6:2);

writeln;

end;

writeln;

end;

procedure form(var a:matr);

var i,j:integer;

begin

randomize;

for i:=1 to n do

for j:=1 to n do

a[i,j]:=random*2-1;

end;

function max( c:vect):real;

var i:integer;

m:real;

begin

m:=-2;

for i:=1 to n do

if c[i]>m then m:=c[i];

max:=m

end;

procedure pr(a:matr;var c:vect);

var i,j:integer;

begin

c[i]:=1;

for i:=1 to n do

begin

for j:=1 to n do

c[i]:=a[j,i]*c[i];

writeln('Произведение ',i,'-го столбца =',c[i]:6:4);

end;

writeln;

end;

end.

Глава 4. Основная программа

program kursovik;

uses crt,kurp1;

var a:matr;

c:vect;

begin

clrscr;

window (45,2,75,7) ;

writeln ('Курсовая работа по информатике') ;

writeln('Факультет АЭС группа А-92');

writeln ('студента: Грязина Дмитрия ');

window(1,1,80,25);

Страницы: 1, 2