Алгоритмический язык Pascal

Основные понятия алгоритмического языка. Элементарные конструкции и концепция типа для данных. Стандартные типы данных и константы. Операторы присваивания. ввода и вывода. Структура программы. Постановка задачи, алгоритм решения и анализ результатов.

Рубрика Программирование, компьютеры и кибернетика
Вид курсовая работа
Язык русский
Дата добавления 05.12.2008
Размер файла 54,4 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

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

24

Министерство общего и профессионального образования Российской Федерации

Воронежский государственный технический университет

Кафедра конструирования и производства радиоаппаратуры

Выполнил: студент группы РК-051
Руководитель работы:

Новикова И.А.

.

Воронеж 2006

  • Содержание
  • Введение. 3
  • 1. Теоретическая часть. 4
    • 1.1. Основные понятия алгоритмического языка. 4
    • 1.2. Основные символы 5
    • 1.3. Элементарные конструкции. 7
    • 1.4. Концепция типа для данных. 8
    • 1.5. Стандартные типы данных. 11
    • 1.6. Константы 15
    • 1.7. Переменные. Инициализация переменных. 16
    • 1.8. Оператор присваивания. 18
    • 1.9. Операторы ввода и вывода. 18
    • 1.10. Структура программы. 21
  • 2. Экспериментальная часть. 24
    • 2.1. Постановка задачи. 24
    • 2.2. Алгоритм решения задачи. 25
    • 2.3. Описание программы. 26
    • 2.4. Анализ ошибок и отладка программы. 27
    • 2.5. Анализ результатов. 27
  • Заключение. 28
  • Список литературы. 29
  • Приложение. 30

Введение

В настоящее время, с наступлением века высоких технологий, ни одна отрасль науки и техники не представима без использования вычислительной техники. В свою очередь работа вычислительной техники не возможна без наличия программного обеспечения, соответствующего современным требованиям качества. Для создания такого программного обеспечения человеку необходимо добиться взаимопонимания между программистом и машиной. Именно в этих целях создаются языки программирования (алгоритмические языки), которые одинаково понятны как человеку, так и машине.

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

Алгоритмический язык Pascal является языком среднего уровня. Этот язык не позволяет воплощать в жизнь сложно алгоритмированные проекты. Pascal может быть использован для обучения работы рационализираванию и другой предварительной обработки алгоритмов, а так же для написания небольших вспомогательных программ, используемых более крупными приложениями. Также программы, написанные на этом языке могут послужить основой для создания более сложных приложений, обладающих меньшей потребностью в системных ресурсах машины.

1. Теоретическая часть.

1.1 Основные понятия алгоритмического языка

СОСТАВ ЯЗЫКА. Обычный разговорный язык состоит из четырех основных элементов: символов, слов, словосочетаний и предложений. Алгоритмический язык содержит подобные элементы, только слова называют элементарными конструкциями, словосочетания - выражениями, предложения - операторами. Символы, элементарные конструкции, выражения и операторы составляют иерархическую структуру, поскольку элементарные конструкции образуются из последовательности символов, выражения - это последовательность элементарных конструкций и символов, а оператор - последовательность выражений, элементарных конструкций и символов.

ОПИСАНИЕ ЯЗЫКА есть описание четырех названных элементов. Описание символов заключается в перечислении допустимых символов языка. Под описанием элементарных конструкций понимают правила их образования. Описание выражений - это правила образования любых выражений, имеющих смысл в данном языке. Описание операторов состоит из рассмотрения всех типов операторов, допустимых в языке. Описание каждого элемента языка задается его СИНТАКСИСОМ и СЕМАНТИКОЙ. Синтаксические определения устанавливают правила построения элементов языка. Семантика определяет смысл и правила использования тех элементов языка, для которых были даны синтаксические определения.

СИМВОЛЫ языка - это основные неделимые знаки, в терминах которых пишутся все тексты на языке.

ЭЛЕМЕНТАРНЫЕ КОНСТРУКЦИИ - это минимальные единицы языка, имеющие самостоятельный смысл. Они образуются из основных символов языка.

ВЫРАЖЕНИЕ в алгоритмическом языке состоит из элементарных конструкций и символов, оно задает правило вычисления некоторого значения.

ОПЕРАТОР задает полное описание некоторого действия, которое необходимо выполнить. Для описания сложного действия может потребоваться группа операторов. В этом случае операторы объединяются в СОСТАВНОЙ ОПЕРАТОР или БЛОК.

Действия, заданные операторами, выполняются над ДАННЫМИ. Предложения алгоритмического языка, в которых даются сведения о типах данных, называются ОПИСАНИЯМИ или неисполняемыми операторами. Объединенная единым алгоритмом совокупность описаний и операторов образует ПРОГРАММУ на алгоритмическом языке.

В процессе изучения алгоритмического языка необходимо отличать алгоритмический язык от того языка, с помощью которого осуществляется описание изучаемого алгоритмического языка. Обычно изучаемый язык называют просто языком, а язык, в терминах которого дается описание изучаемого языка - МЕТАЯЗЫКОМ.

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

-металингвистическая символика, называемая Бэкуса-Наура формулами;

-синтаксические диаграммы;

-скобочные конструкции.

Мы в последующем изложении будем пользоваться неформальным способом.

1.2.Основные символы

Основные символы языка-буквы, цифры и специальные символы составляют его алфавит. ТУРБО ПАСКАЛЬ включает следующий набор основных символов:

1) 26 латинских строчных и 26 латинских прописных букв:

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z

a b c d e f g h i j k l m n o p q r s t u v w x y z

2) _ подчеркивание

3) 10 цифр:

0 1 2 3 4 5 6 7 8 9

4) знаки операций:

+ - * / = <> < > <= >= := @

5) ограничители:

. , ' ( ) [ ] (. .) { } (* *) .. : ;

6) спецификаторы:

^ # $

7) служебные (зарезервированные) слова:

ABSOLUTE EXPORTS LIBRARY SET

ASSEMBLER EXTERNAL MOD SHL

AND FAR NAME SHR

ARRAY FILE NIL STRING

ASM FOR NEAR THEN

ASSEMBLER FORWARD NOT TO

BEGIN FUNCTION OBJECT TYPE

CASE GOTO OF UNIT

CONST IF OR UNTIL

CONSTRUCTOR IMPLEMENTATION

PACKED USES

DESTRUCTOR IN PRIVATE VAR

DIV INDEX PROCEDURE VIRTUAL

DO INHERITED PROGRAM WHILE

DOWNTO INLINE PUBLIC WITH

ELSE INTERFACE RECORD XOR

END INTERRUPT REPEAT

EXPORT LABEL RESIDENT

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

1.3.Элемнтарные конструкции

Элементарные конструкции языка ПАСКАЛЬ включают в себя имена, числа и строки. Имена (идентификаторы) называют элементы языка - константы, метки, типы, переменные, процедуры, функции, модули, объекты. Имя - это последовательность букв и цифр, начинающаяся с буквы. В именах может использоваться символ _ подчеркивание. Имя может содержать произвольное количество символов, но значащими являются 63 символа.

Не разрешается в языке ПАСКАЛЬ использовать в качестве имен служебные слова и стандартные имена, которыми названы стандартные константы, типы, процедуры, функции и файлы.

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

Примеры имен языка ПАСКАЛЬ:

A b12 r1m SIGMA gamma I80_86

Числа в языке ПАСКАЛЬ обычно записываются в десятичной системе счисления. Они могут быть целыми и действительными. Положительный знак числа может быть опущен. Целые числа записываются в форме без десятичной точки, например:

217 -45 8954 +483

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

28.6 0.65 -0.018 4.0 5Е12 -1.72Е9 73.1Е-16

ПАСКАЛЬ допускает запись целых чисел и фрагментов действительных чисел в форме с порядком в шестнадцатеричной системе счисления:

$7F $40 $ABC0

Строки в языке ПАСКАЛЬ - это последовательность символов, записанная между апострофами. Если в строке в качестве содержательного символа необходимо употребить сам апостроф, то следует записать два апострофа. Примеры строк:

'СТРОКА' 'STRING' 'ПРОГРАММА' 'АД' `ЮТАНТ'.

1.4.Концепция типа для данных

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

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

В языке ПАСКАЛЬ существует правило: тип явно задается в описании переменной или функции, которое предшествует их использованию. Концепция типа языка ПАСКАЛЬ имеет следующие основные свойства:

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

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

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

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

Тип определяет:

-возможные значения переменных, констант, функций, выражений, принадлежащих к данному типу;

-внутреннюю форму представления данных в ЭВМ;

-операции и функции, которые могут выполняться над величинами, принадлежащими к данному типу.

Обязательное описание типа приводит к избыточности в тексте программ, но такая избыточность является важным вспомогательным средством разработки программ и рассматривается как необходимое свойство современных алгоритмических языков высокого уровня. В языке ПАСКАЛЬ существуют скалярные и структурированные типы данных.

К скалярным типам относятся стандартные типы и типы, определяемые пользователем.

Стандартные типы включают целые, действительные, символьный, логические и адресный типы. Типы, определяемые пользователем, - перечисляемый и интервальный.

Структурированные типы имеют четыре разновидности: массивы, множества, записи и файлы.

Кроме перечисленных, TURBO PASCAL включает еще два типа - процедурный и объектный.

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

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

-к любому порядковому типу может быть применена стандартная функция Ord, которая в качестве результата возвращает порядковый номер конкретного значения в данном типе;

-к любому порядковому типу могут быть применены стандартные функции Pred и Succ, которые возвращают предыдущее и последующее значения соответственно;

- к любому порядковому типу могут быть применены стандартные функции Low и High, которые возвращают наименьшее и наибольшее значения величин данного типа.

В языке ПАСКАЛЬ введены понятия эквивалентности и совместимости типов.

Два типа Т1 и Т2 являются эквивалентными (идентичными), если выполняется одно из двух условий:

-Т1 и Т2 представляют собой одно и то же имя типа;

- тип Т2 описан с использованием типа Т1 с помощью равенства или последовательности равенств. Например:

type

T1 = Integer;

T2 = T1;

T3 = T2;

Менее строгие ограничения определены совместимостью типов. Например, типы являются совместимыми, если:

-они эквивалентны;

-являются оба либо целыми, либо действительными;

-один тип - интервальный, другой - его базовый;

-оба интервальные с общим базовым;

один тип - строковый, другой - символьный.

В ТУРБО ПАСКАЛЬ ограничения на совместимость типов можно обойти с помощью приведения типов. Приведение типов позволяет рассматривать одну и ту же величину в памяти ЭВМ как принадлежащую разным типам. Для этого используется конструкция

Имя_Типа (переменная или значение).

Например,

Integer ('Z')

представляет собой значение кода символа 'Z' в двухбайтном представлении целого числа, а

Byte(534)

даст значение 22, поскольку целое число 534 имеет тип Word и занимает два байта, а тип Byte занимает один байт, и в процессе приведения старший байт будет отброшен.

1.5.Стандартные типы данных

К стандартным относятся целые, действительные, логические, символьный и адресный типы.

ЦЕЛЫЕ типы определяют константы, переменные и функции, значения которых реализуются множеством целых чисел, допустимых в данной ЭВМ.

тип диапазон значений требуемая память

__________________________________________________________

Shortint -128 .. 127 1 байт

Integer -32768 .. 32767 2 байта

Longint -2147483648 .. 2147483647 4 байта

Byte 0 .. 255 1 байт

Word 0 .. 65535 2 байта

__________________________________________________________

Над целыми операндами можно выполнять следующие арифметические операции: сложение, вычитание, умножение, деление, получение остатка от деления. Знаки этих операций:

+ - * div mod

Результат арифметической операции над целыми операндами есть величина целого типа. Результат выполнения операции деления целых величин есть целая часть частного. Результат выполнения операции получения остатка от деления - остаток от деления целых. Например:

17 div 2 = 8, 3 div 5 = 0.

17 mod 2 = 1, 3 mod 5 = 3.

Операции отношения, примененные к целым операндам, дают результат логического типа TRUE или FALSE (истина или ложь).

В языке ПАСКАЛЬ имеются следующие операции отношения: равенство =, неравенство <>, больше или равно >=, меньше или равно <=, больше >, меньше <.

К аргументам целого типа применимы следующие стандартные (встроенные) функции, результат выполнения которых имеет целый тип:

Abs(X), Sqr(X), Succ(X), Pred(X),

и которые определяют соответственно абсолютное значение Х, Х в квадрате, Х+1, Х-1.

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

Sin(X), Cos(X), ArcTan(X), Ln(X), Exp(X), Sqrt(X).

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

Результат выполнения функции проверки целой величины на нечетность Odd(X) имеет значение истина, если аргумент нечетный, и значение ложь, если аргумент четный:

X=5 Odd(X)=TRUE , X=4 Odd(X)=FALSE.

Для быстрой работы с целыми числами определены процедуры:

Inc(X) X:=X+1

Inc(X,N) X:=X+N

Dec(X) X:=X-1

Dec(X,N) X:=X-N

ДЕЙСТВИТЕЛЬНЫЕ типы определяет те данные, которые реализуются подмножеством действительных чисел, допустимых в данной ЭВМ.

Тип Диапазон Количество цифр Требуемая

значений мантиссы память (байт)

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

Real 2.9e-39 .. 1.7e+38 11 6

Single 1.5e-45 .. 3.4e+38 7 4

Double 5.0e-324 .. 1.7e+308 15 8

Extended 3.4e-4932 .. 1.1e+4932 19 10

Comp -9.2e+18 .. 9.2e+18 19 8

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

Тип Real определен в стандартном ПАСКАЛЕ и математическим сопроцессором не поддерживается.

Остальные действительные типы определены стандартом IEEE 457 и реализованы на всех современных компьютерах.

Для их использования при наличии сопроцессора или при работе на ЭВМ типа 80486 необходимо компилировать программу с ключом {$ N+}, а при отсутствии сопроцессора - с ключами {$N-,E+}.

Тип Comp хотя и относится к действительным типам, хранит только длинные целые значения.

Над действительными операндами можно выполнять следующие арифметические операции, дающие действительный результат:

сложение +, вычитание -, умножение *, деление /.

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

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

К действительным аргументам применимы функции, дающие действительный результат:

Abs(X), Sqr(X), Sin(X), Cos(X), ArcTan(X), Ln(X), Exp(X),

Sqrt(X), Frac(X), Int(X), Pi.

Функция Frac(X) возвращает дробную часть X, функция Int(X) - целую часть X.

Безаргументная функция Pi возвращает значение числа Пи действительного типа.

К аргументам действительного типа применимы также функции

Trunc(X) и Round(X), дающие целый результат. Первая из них выделяет целую часть действительного аргумента путем отсечения дробной части, вторая округляет аргумент до ближайшего целого.

ЛОГИЧЕСКИЙ тип (Boolean) определяет те данные, которые могут принимать логические значения TRUE и FALSE.

К булевским операндам применимы следующие логические операции:

not and or xor.

ЛОГИЧЕСКИЙ тип определен таким образом, что FALSE < TRUE. Это позволяет применять к булевским операндам все операции отношения.

В ТУРБО ПАСКАЛЬ введены еще разновидности логического типа: ByteBool, WordBool и LongBool, которые занимают в памяти ЭВМ один, два и четыре байта соответственно.

СИМВОЛЬНЫЙ тип (Char) определяет упорядоченную совокупность символов, допустимых в данной ЭВМ. Значение символьной переменной или константы - это один символ из допустимого набора.

Символьная константа может записываться в тексте программы тремя способами:

-как один символ, заключенный в апострофы, например:

'A' 'a' 'Ю' 'ю';

-с помощью конструкции вида #K, где K - код соответствующего символа, при этом значение K должно находиться в пределах 0..255;

-с помощью конструкции вида ^C, где C - код соответствующего управляющего символа, при этом значение C должно быть на 64 больше кода управляющего символа.

К величинам символьного типа применимы все операции отношения.

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

Ord(C) Chr(K).

Первая функция определяет порядковый номер символа С в наборе символов, вторая определяет по порядковому номеру К символ, стоящий на К-ом месте в наборе символов. Порядковый номер имеет целый тип.

К аргументам символьного типа применяются функции, которые определяют предыдущий и последующий символы:

Pred(C) Succ(C). Pred('F') = 'E' ; Succ('Y') = 'Z' .

При отсутствии предыдущего или последующего символов значение соответствующих функций не определено.

Для литер из интервала 'a'..'z' применима функция UpCase(C), которая переводит эти литеры в верхний регистр 'A'..'Z'.

АДРЕСНЫЙ тип (Pointer) определяет переменные, которые могут содержать значения адресов данных или фрагментов программы. Для хранения адреса требуются два слова (4 байта), одно из них определяет сегмент, второе - смещение.

Работа с адресными переменными (указателями) будет рассмотрена позже, сейчас отметим, что для получения значения адреса какой-либо переменной введена унарная операция @.

1.6.Константы

Тип констант в языке ПАСКАЛЬ определяется по их виду: константы целого типа - это целые числа, не содержащие десятичной точки, константы действительного типа - действительные числа, логические константы - логические значения TRUE и FALSE, символьные константы - либо строки длиной в один символ, либо конструкции вида #K или ^K.

Язык ПАСКАЛЬ допускает использовать синонимы для обозначения констант, в этом случае текст программы содержит раздел описания констант, например: {}

1.7.Переменные. Инициализация переменных

Тип переменных определяется пользователем в разделе описания переменных:{}

В настоящее время в профессиональном программировании принято записывать имена переменных с использованием так называемой венгерской нотации.

Венгерская нотация - это соглашение о наименованиях переменных и функций. Соглашение широко используется при программировании на языках PASCAL, C и в среде WINDOWS.

Венгерская нотация основывается на следующих принципах:

-имена переменных и функций должны содержать префикс, описывающий их тип;

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

Префиксы записываются малыми буквами, первая буква каждого слова -заглавная, префиксы и слова записываются либо слитно, либо через символ _ (подчеркивание).

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

Префикс Тип Префикс Тип

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

by Byte si Single

sh Shortint d Double

i Integer e Extended

w Word c Comp

l Longint ch Char

r Real b Boolean

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

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

a Array

s String

sz Stringz

se Set

re Record

f File

t Text

Например:

rV, arVector[1..20], sName, iCount.

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

Для задания начальных значений переменным (инициализации переменных) TURBO PASCAL позволяет присваивать начальные значения переменным одновременно с их описанием. Для этого используется конструкция имя переменной:

тип = значение;

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

const rWeight: Real = 0.4;

1.8.Оператор присваивания

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

1.9.Операторы ввода и вывода

Рассмотрим организацию ввода и вывода данных с терминального устройства. Терминальное устройство - это устройство, с которым работает пользователь, обычно это экран (дисплей) и клавиатура.

Для ввода и вывода данных используются стандартные процедуры ввода и вывода Read и Write, оперирующие стандартными последовательными файлами

INPUT и OUTPUT.

Эти файлы разбиваются на строки переменной длины, отделяемые друг от друга признаком конца строки. Конец строки задается нажатием клавиши ENTER.

Для ввода исходных данных используются операторы процедур ввода:

Read(A1,A2,...AK);

ReadLn(A1,A2,...AK);

ReadLn;

Первый из них реализует чтение К значений исходных данных и присваивание этих значений переменным А1, А2, ..., АК.

Второй оператор реализует чтение К значений исходных данных, пропуск остальных значений до начала следующей строки, присваивание считанных значений переменным А1, А2, ..., АК. Третий оператор реализует пропуск строки исходных данных.

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

Чтение исходных данных логического типа в языке ПАСКАЛЬ недопустимо.

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

var rV, rS: Real;

iW, iJ: Integer;

chC, chD: Char;

Read(rV, rS, iW, iJ);

Read(chC, chD);

Значения исходных данных могут отделяться друг от друга пробелами и нажатием клавиш табуляции и Enter.

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

Write(A1,A2,...AK);

WriteLn(A1,A2,...AK);

WriteLn;

Первый из этих операторов реализует вывод значений переменных А1, А2,...,АК в строку экрана. Второй оператор реализует вывод значений переменных А1, А2, ..., АК и переход к началу следующей строки. Третий оператор реализует пропуск строки и переход к началу следующей строки.

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

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

Форма представления значений в поле вывода соответствует типу переменных и выражений: величины целого типа выводятся как целые десятичные числа, действительного типа - как действительные десятичные числа с десятичным порядком, символьного типа и строки - в виде символов, логического типа - в виде логических констант TRUE и FALSE.

Оператор вывода позволяет задать ширину поля вывода для каждого элемента списка вывода. В этом случае элемент списка вывода имеет вид А:К, где А - выражение или строка, К - выражение либо константа целого типа.

Если выводимое значение занимает в поле вывода меньше позиций, чем К, то перед этим значением располагаются пробелы. Если выводимое значение не помещается в ширину поля К, то для этого значения будет отведено необходимое количество позиций. Для величин действительного типа элемент списка вывода может иметь вид А:К:М, где А - переменная или выражение действительного типа, К - ширина поля вывода, М - число цифр дробной части выводимого значения. К и М - выражения или константы целого типа. В этом случае действительные значения выводятся в форме десятичного числа с фиксированной точкой.

Пример записи операторов вывода:

var rA, rB: Real; iP,iQ:Integer;

bR, bS: Boolean; chT, chV, chU, chW: Char;

WriteLn(rA, rB:10:2);

WriteLn(iP, iQ:8);

WriteLn(bR, bS:8);

WriteLn(chT, chV, chU, chW);

1.10.Структура программы

Программа на языке ПАСКАЛЬ состоит из заголовка, разделов описаний и раздела операторов.

Заголовок программы содержит имя программы, например:

Program PRIM;

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

Раздел описания модулей определяется служебным словом USES и содержит имена подключаемых модулей (библиотек) как входящих в состав системы TURBO PASCAL, так и написанных пользователем. Раздел описания модулей должен быть первым среди разделов описаний.

Имена модулей отделяются друг от друга запятыми:

uses CRT, Graph;

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

label 3, 471, 29, Quit;

Описание констант позволяет использовать имена как синонимы констант, их необходимо определить в разделе описаний констант:

const K= 1024; MAX= 16384;

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

var P,Q,R: Integer;

A,B: Char;

F1,F2: Boolean;

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

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

begin.......end

последовательность операторов. Операторы отделяются друг от друга символом ; .

Текст программы заканчивается символом точка.

Кроме описаний и операторов ПАСКАЛЬ - программа может содержать комментарии, которые представляют собой произвольную последовательность символов, расположенную между открывающей скобкой комментариев { и закрывающей скобкой комментариев }.

Текст ПАСКАЛЬ - программы может содержать ключи компиляции, которые позволяют управлять режимом компиляции.

Синтаксически ключи компиляции записываются как комментарии. Ключ компиляции содержит символ $ и букву-ключ с последующим знаком + (включить

режим) или - (выключить режим). Например:

{$E+} - эмулировать математический сопроцессор;

{$F+} - формировать дальний тип вызова процедур и функций;

{$N+} - использовать математический сопроцессор;

{$R+} - проверять выход за границы диапазонов.

Некоторые ключи компиляции могут содержать параметр, например:

{$I имя файла} - включить в текст компилируемой программы названный файл.

Пример записи простой программы:

Program TRIANG;

var A, B, C, S, P: Real;

begin

Read(A,B,C);

WriteLn(A,B,C);

P:=(A+B+C)/2;

S:=Sqrt(P*(P-A)*(P-B)*(P-C));

WriteLn('S=',S:8:3)

end.

2. Экспериментальная часть.

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

Задана действительная квадратная матрица А порядка n. Построить и вывести на печать матрицу:

2.2.Алгоритм решения задачи

Алгоритм Алгоритм функции

функции вычисляющей вычисляющей n!

n-степень числа (fac(a))

(step(a,b)).

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

При запуске программы появляется окно с запросом порядка исходной матрицы. После ввода порядка матрицы необходимо нажать "Enter". Далее появляется окно с вопросом: "ввести вручную?"; и двумя кнопками "Yes" и "No". Если нажать "Yes" то матрица будет задана пользователем с клавиатуры, если "No" то матрица будет заполнена случайным образом числами то 1 до 100. После заполнения матрицы необходимо нажать "Enter" для вывода на экран матрицы полученной из первоначальной по формуле:. Заключающей стадией выполнения программы является вывод окна с вопросом: "Повторить?"; и двумя кнопками "Yes" и "No".

2.4.Анализ ошибок и отладка программы

В ходе реализации проекта возникли следующие трудности:

· Отсутствие функций и процедур позволяющих вычислить n-ую степень числа и факториал числа.

· Отсутствие типа данных, переменная которого была бы способна вместить число (5!)5 и более.

Устранение данных трудностей:

· Написание подпрограмм выполняющих требуемые действия.

· Наложение ограничений на размер изначальной матрицы.

2.5.Анализ результатов

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

Заключение

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

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

Список литературы

1.Епанешников А.М., Епанешников В.А. Программирование в среде Turbo Pascal 7.0. -М.: Диалог-МИФИ, 1995, -288 с.

2.Фаронов В.В. Турбо Паскаль 7.0 М.: Нолидж,2002

3. Методические указания к лабораторным работам № 5-8 по курсу "Алгоритмические языки и программирование" для студентов специальности 23.03 "Конструирование и технология радиоэлектронных средств" дневной и заочной форм обучения./Воронеж. Политехн. ин-т; Сост.: В.М. Шишкин, Н.Э. Самойленко. Воронеж. 1991.- 44 с.

4. ГОСТ 19.003-80. Единая система программной документации. Схемы алгоритмов и программ. Обозначения условные и графические. -М.: Государственный комитет СССР по стандартам. 1988, -144 с.

5. Методические указания по выполнению курсовых работ по дисциплине "Алгоритмические языки и программирование" для студентов специальности 23.03 всех форм обучения./Воронеж. Политехн. ин-т; Сост. В.М. Шишкин, Н.Э. Самойленко. Воронеж. 1990.- 34 с.

Приложение

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

program 7.2;

uses Graph ,Crt;

label lb1,lb2,lb3,lb4,

rb1,rb2,rb3,rb4,

b2,b1;

var mp,mb,n,

i,j,

r,w,

t,q,

v,b: integer;

a: array [1..10,1..10] of single;

s,e:string; z:char;

function fac(x:longint):longint;

var i,

k,

q:longint;

begin

k:=1;

for i:=1 to x do

begin

q:=k*i;

k:=q;

end;

fac:=q;

end;

procedure vivod;

begin

for i:=1 to n do

for j:=1 to n do

begin

str(a[i,j]:6:4,s);

outtextxy(20+60*(i-1),20+15*j,s );

end;

end;

function step(r,t:longint):longint;

var k,

w:longint;

begin

w:=r;

for k:=1 to t-1 do

r:=r*w;

step:=r;

end;

procedure okno;

begin

setviewport(w,q,w+v,q+b,clipon);

setfillstyle(1,t);

bar(0,0,640,420);

setcolor(15);

setlinestyle(0,2,1);

line(0,0,0,b);

line(3,3,3,b-3);

line(0,0,v,0);

line(3,3,v-3,3);

line(v,0,v,b);

line(v-3,3,v-3,b-3);

line(v,b,0,b);

line(v-3,b-3,3,b-3);

end;

begin

randomize;

directvideo:=false;

mb:=detect;

initgraph(mb,mp,'c:\bp\bgi');

lb1:

cleardevice;

settextstyle(0,0,0);

setbkcolor(5);

t:=1;

w:=2;

q:=2;

b:=80;

v:=280;

okno;

outtextxy(4,18,'Введите порядок матрицы');

outtextxy(4,30,'(от 1 до 4) n=');

gotoxy(16,3);

read(n);

readln;

if n>4 then

goto b1;

cleardevice;

w:=115;

v:=400;

q:=200;

b:=100;

t:=7;

okno;

setfillstyle(1,9);

setcolor(4);

setlinestyle(0,0,3);

bar(20,30,100,60);

bar(380,30,300,60);

line(19,29,101,29);

line(19,29,19,61);

line(19,61,101,61);

line(101,61,101,29);

line(381,29,381,61);

line(381,61,299,61);

line(299,61,299,29);

line(299,29,382,29);

settextstyle(0,0,2);

outtextxy(100,10,'Ввести вручную?');

settextstyle(4,0,0);

outtextxy(35,21,'No');

outtextxy(325,22,'Yes');

setcolor(2);

readkey;

rb3:rb4:

z:=readkey;

setfillstyle(1,9);

setcolor(4);

setlinestyle(0,0,3);

bar(20,30,100,60);

bar(380,30,300,60);

line(19,29,101,29);

line(19,29,19,61);

line(19,61,101,61);

line(101,61,101,29);

line(381,29,381,61);

line(381,61,299,61);

line(299,61,299,29);

line(299,29,382,29);

settextstyle(0,0,2);

outtextxy(100,10,'Ввести вручную?');

settextstyle(4,0,0);

outtextxy(35,21,'No');

outtextxy(325,22,'Yes');

setcolor(2);

if z=#75 then

begin

setfillstyle(1,4);

bar(20,30,100,60);

outtextxy(35,21,'No');

outtextxy(325,22,'Yes');

z:=readkey;

if z=#13 then

goto rb1

else goto rb3;

end;

if z=#77 then

begin

setfillstyle(1,4);

bar(380,30,300,60);

outtextxy(35,21,'No');

outtextxy(325,22,'Yes');

z:=readkey;

if z=#13 then

goto rb2

else goto rb4;

end;

rb1:

cleardevice;

settextstyle(0,0,0);

t:=1;

w:=10;

q:=60;

v:=300;

b:=140;

okno;

outtextxy(w+10,q-50,'Сгенерированная матраца :');

for i:= 1 to n do

for j:=1 to n do

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

vivod;

readkey;

goto b2;

rb2:

cleardevice;

settextstyle(0,0,0);

w:=10;

q:=60;

v:=520;

b:=180;

t:=1;

okno;

outtextxy(w,q-50,'Введите матрицу, нажимая Enter между a[i,j]:');

for j:=1 to n do

for i:=1 to n do

begin

str(i,s);

str(j,e);

s:='a['+e+','+s+']=';

outtextxy(w+(i-1)*120,q-52+j*16,s);

gotoxy(i*15-4,j+5);

read(a[i,j]);

end;

b2:

{ cleardevice; }

settextstyle(0,0,0);

t:=1;

w:=55;

q:=180;

v:=300;

b:=150;

okno;

outtextxy(w,5,'Изменённая матрица :');

for i:=1 to n do

for j:=1 to n do

a[i,j]:=a[i,j]/step(fac(i),j);

vivod;

readkey;

b1:

cleardevice;

w:=115;

v:=400;

q:=200;

b:=100;

t:=7;

okno;

setfillstyle(1,9);

setcolor(4);

setlinestyle(0,0,3);

bar(20,30,100,60);

bar(380,30,300,60);

line(19,29,101,29);

line(19,29,19,61);

line(19,61,101,61);

line(101,61,101,29);

line(381,29,381,61);

line(381,61,299,61);

line(299,61,299,29);

line(299,29,382,29);

settextstyle(0,0,2);

outtextxy(125,20,'Повторить?');

settextstyle(4,0,0);

outtextxy(35,21,'Yes');

outtextxy(325,22,'No');

setcolor(2);

readkey;

lb3:lb4:

z:=readkey;

setfillstyle(1,9);

setcolor(4);

setlinestyle(0,0,3);

bar(20,30,100,60);

bar(380,30,300,60);

line(19,29,101,29);

line(19,29,19,61);

line(19,61,101,61);

line(101,61,101,29);

line(381,29,381,61);

line(381,61,299,61);

line(299,61,299,29);

line(299,29,382,29);

settextstyle(4,0,0);

outtextxy(35,21,'Yes');

outtextxy(325,22,'No');

setcolor(2);

if z=#75 then

begin

setfillstyle(1,4);

bar(20,30,100,60);

outtextxy(35,21,'Yes');

outtextxy(325,22,'No');

z:=readkey;

if z=#13 then

goto lb1

else goto lb3;

end;

if z=#77 then

begin

setfillstyle(1,4);

bar(380,30,300,60);

outtextxy(35,21,'Yes');

outtextxy(325,22,'No');

z:=readkey;

if z=#13 then

goto lb2

else goto lb4;

end;

lb2:

end.


Подобные документы

  • Общая характеристика языков программирования. Описание языка Паскаль: основные субъекты языка; структура Паскаль-программы; типизация и объявление данных. Операторы присваивания и выражения. Структурные операторы, организация ветвлений и циклов.

    дипломная работа [276,6 K], добавлен 26.01.2011

  • Программирование линейных алгоритмов. Процедуры ввода READ и READLN и вывода WRITE и WRITELN. Примеры решения задач на языке Паскаль. Оператор присваивания и выражения. Основные способы формирования структурных операторов. Операторы вызова процедур.

    курсовая работа [44,3 K], добавлен 18.03.2013

  • История создания и применение языка Basic. Стандартные математические и строковые функции. Операции и выражения языка. Блоки данных и подпрограммы. Операторы управления, цикла, ввода-вывода и преобразования информации. Константы, переменные, массивы.

    контрольная работа [2,3 M], добавлен 04.05.2015

  • Элементарные конструкции языка ПАСКАЛЬ: имена, числа и строки. Стандартные типы данных. Организация ввода и вывода данных с терминального устройства. Разработка программы, изменяющей первоначальную матрицу по заданной схеме и выводящей ее на экран.

    курсовая работа [68,6 K], добавлен 09.07.2015

  • История языка Pascal, его основные концепции. Линейный и циклический алгоритмы, типы данных. Условные операторы, операторы цикла. Программа вычисления суммы n первых членов геометрической прогрессии по любым двум ее членам, номера которых известны.

    отчет по практике [421,8 K], добавлен 07.06.2010

  • Язык BASIC как семейство высокоуровневых языков программирования. Средства алгоритмического языка программирования и их типы. Способы ввода исходных данных. Особенности оператора условного перехода. Детальная характеристика циклических вычислений.

    реферат [64,4 K], добавлен 02.05.2015

  • Анализ операторов ввода и вывода, а также характеристика форматов, используемых в этих операторах. Оформление законченной программы с применением этих операторов. Структура программы. Алфавит языка и типы данных. Ввод и вывод информации. Форматный вывод.

    лабораторная работа [62,0 K], добавлен 15.07.2010

  • Элементы языка Object Pascal: идентификаторы, константы, переменные, выражения. Структура проекта Delphi. Операторы и метки. Типы данных языка OPascal. Статические и динамические массивы. Записи с вариантными полями. Совместимость и преобразование типов.

    курс лекций [385,4 K], добавлен 18.02.2012

  • Информационные технологии и защиты данных. Методы защиты информации. Виды информационной безопасности и умышленные угрозы. Программирование на языке Turbo Pascal. Типы числовых данных. Функции ввода и вывода. Логические операторы, символьные переменные.

    курсовая работа [1,7 M], добавлен 16.05.2016

  • Алгоритмы и алфавит языка Турбо Паскаль. Основные типы данных. Операторы присваивания, перехода и выбора. Понятие массива в Паскале. Особенности работы со строками в программе. Использование линейного поиска и поиска с барьером. Основные виды сортировок.

    учебное пособие [53,2 K], добавлен 09.11.2009

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.