Текст программы. 2. Какие разделы содержит модуль?

Контрольные вопросы:

1. что такое модуль?

2. Какие разделы содержит модуль?

3. как происходит оброщение к модулю?

4. Как подключить модуль к своей программе?

5. Компиляция модуля.

            Стр.           Изм Лист № докум. Подп. Дата.  

Лабораторная работа №6 Разработка программ с использованием одномерных и двумерных массивов. Цель работы: выработать умение в построении алгоритмических схем сложной структуры содержащих одномерные и двумерные массивы и способности реализации данных задач на компьютере. Задача работы: научиться составлять программы на языке Турбо паскаль, используя в них сложные типы данных. Теоретическая часть Массив – это структурированный тип данных, состоящий из фиксированного числа элементов, имеющих один и тот же тип. Формат записи массива Массив можно объявлять двумя различными способами: Одномерный массив: 1. Var <идентификатор>: Array[<тип индекса>] of <тип компонентов>; <идентификатор> - имя переменной массивного типа <тип индекса> - каким образом компоненты обозначены в самом массиве <тип компонентов> - какого типа компоненты хранятся в массиве 2. Type <имя типа> = array [<тип индекса>] of<тип компонента>; Var < идентификатор >:<имя типа>; <имя типа> - имя пользовательского типа Двумерный массив: 1. Var <идентификатор>: Array[<тип индекса элементов столбцов>,<тип индекса элементов строки>] of <тип компонентов>; <идентификатор> - имя переменной массивного типа <тип индекса> - каким образом компоненты обозначены в самом массиве <тип компонентов> - какого типа компоненты хранятся в массиве 2. Type <имя типа> = array [<тип индекса элементов столбцов>,<тип индекса элементов строки>] of <тип компонентов>; Var < идентификатор >:<имя типа>; <имя типа> - имя пользовательского типа Обрашение к элементу массива происходит по схеме: Одномерный массив: 1. присваевание значения < идентификатор >[< индекс >]:= <значение>; 2. использование в виде аперанда Пример:C:=A + B[1]; Двумерный массив: 1. присваевание значения < идентификатор >[< индекс столбца>, <индекс строки>]:= <значение>; 2. использование в виде аперанда Пример:C:=A + B[1,3]; Задания для самостоятельной работы Составить программу для решения задач Задача 1. Задача 2. Текст программы Контрольные вопросы: 6. что понимают под одномерным массивом? 7. каким образом происходит объявление одномерного массива? 8. как происходит оброщение к элиментам одномерного массива? 9. в каких операциях могут учавствовать массивы и какие при этом предявляются к ним требования? 10. что понимают под двумерным массивом? 11. каким образом происходит объявление двумерного массива? 12. как происходит оброщение к элиментам двумерного массива? 13. в каких операциях могут учавствовать массивы и какие при этом предявляются к ним требования?
						Стр.
Изм.	Лист.	№ докум.	Подп.	Дата

Лабораторная работа №7 Создание программы с использованием функций обработки строк. Цель работы: научиться работать с переменными строкового типа данных. Задача работы: научиться составлять программы на языке Турбо паскаль, используя в них строковый тип данных. Теоретическая часть Строка это последовательность символов. Колличество симвалов в строке равно от 0 до 255. Формат объявления строковой переменной Var <идентификатор>: String [<колличество симвалов >]; <идентификатор> - имя переменной строкового типа < колличество симвалов > - колличество симвалов в строке. Пораметор не обязательный. Фармат присваевания значения строковой переменной <идентификатор>:=’<страка симвалов>’; Операции со строковыми перемеными 1. сцепление (+) пример: ‘апр’+’нгш’=’апрнгш’ 2. отношения (=, <, >, <=, >=, <>) пример: ‘апр1’<’апр2’ - true стондартные функции для работы со строковыми перемеными Copy (s:string; index:integer; count:integer):string Функция возвращает подстроку, выделенную из исходной строки s, длиной count символов, начиная с символа под номером index. Concat (s1,[s2,...,sn]:string):string Функция выполняет слияние строк-параметров, которых может быть произвольное количество. Каждый параметр является выражением строкового типа. Если длина строки-результата превышает 255 символов, то она усекается до 255 символов. Данная функция эквивалентна операции конкатенации "+" и работает немного менее эффективно, чем эта операция. Length (s:string):integer Функция возвращает в качестве результата значение текущей длины строки-параметра функция Pos (substr,s:string):byte Функция производит поиск в строке s подстроки substr. Результатом функции является номер первой позиции подстроки в исходной строке. Если подстрока не найдена, то функция возвращает 0. Delete (var s:string; index,count:integer) Процедура удаляет из строки-параметра s подстроку длиной count символов, начиная с символа под номером index. Insert (source:string; var s:string;index:integer) Процедура предназначена для вставки строки source в строку s, начиная с символа index этой строки. Str (X: арифметическое выражение; var st: string) Процедура преобразует численное выражение X в его строковое представление и помещает результат в st. Val (st: string; x: числовая переменная; var code: integer) Процедура преобразует строковую запись числа, содержащуюся в st, в числовое представление, помещая результат в x. x - может быть как целой, так и действительной переменной. Если в st встречается недопустимый (с точки зрения правил записи чисел) символ, то преобразование не происходит, а в code записывается позиция первого недопустимого символа. Выполнение программы при этом не прерывается, диагностика не выдается. Если после выполнения процедуры code равно 0, то это свидетельствует об успешно произошедшем преобразовании. Chr (n: byte): char Функция возвращает символ по коду, равному значению выражения n. Если n можно представить как числовую константу, то можно также пользоваться записью #n. Ord (ch: char): byte; В данном случае функция возвращает код символа ch. UpCase (c: char): char; Если c - строчная латинская буква, то функция возвращает соответствующую прописную латинскую букву, в противном случае символ c возвращается без изменения. Задания для самостоятельной работы Составить программу для решения задач Задача 1. Задача 2. Текст программы Контрольные вопросы: 1. что понимают под строковым типом данных? 2. каким образом происходит объявление строкового типа данных? 3. какие операции можно произвадить с строковым типом данных? 4. стандартные процидуры и функции?
						Стр.
Изм.	Лист.	№ докум.	Подп.	Дата

Лабораторная работа №8 Создание графического изображения с помощью стандартных процедур. Цель работы: закрепить навык создания объектов векторной графики. Задача работы: научиться составлять программы на языке Турбо паскаль, используя в них функции графики. Теоретическая часть Графика в Паскале строится при помощи подключения модуля Граф, то есть на экране компьютера можно получать не только последовательности символов, но и разнообразные рисунки, схемы, картинки. Процесс построения изображений с помощью графических процедур разбивается на отдельные этапы: 1. Переключить монитор в графический режим с помощью оператора InitGraph (Driver, mode, <путь к драйверу>). 2. Установить разрешающую способность экрана по умолчанию режимом Detect или процедурой SetGraphMode. Режим Detect устанавливает разрешающую способность экрана 640*480 пикселей, т.е. координата Х может принимать значения от 0 по 639, а У от 0 по 479. 3. Очистить и инициализировать графический экран процедурой ClearDevice. 4. Установить цвет фона оператором SetBkColor и цвет изображения оператором SetColor. 5. Вывести на экран точки, отрезки, прямоугольники, дуги, окружности, эллипсы. 6. Вывести на экран закрашенные фигуры. 7. Вывести тексты и подписи на экран. Для использования операторов Write и Writeln в графическом режиме необходимо выполнить следующую операцию присваивания: DirectVideo:= FALSE; Или использовать процедуру Outtextxy(x,y,st), которая выводит строку st, начиная с позиции x, y. Цвета в операторах задаются с помощью своих кодов: 0 – черный; 4 – красный; 8 – темно-серый; 12 – ярко-красный; 1 – синий; 5 – пурпурный; 9 – ярко-синий; 13 – ярко-пурпурный; 2 –зеленый; 6 – коричневый; 10 – ярко-зеленый; 14 – желтый; 3 – бирюзовый; 7 – светло-серый; 11 – ярко-бирюзовый; 15 – белый. Цифровое кодирование цвета соответствует последовательности IRGB для 0-3 битов. Бит 3 – бит интенсивности I, бит 2 – бит красного R, бит 1 – бит зеленого G, бит 0 – бит синего B. Например, 11=8+2+1, т.е. биты 3,1,0 – интенсивный сине-зеленый (бирюзовый). Основные графические операторы для построения изображений: PutPixel (X, Y, цвет) - вывод точки на экран, где X, Y - координаты точки; Line (X1, Y1, X2, Y2) - проводит линию из точки с координатами (X1, Y1) в точку с координатами (X2, Y2); Rectangle (X1, Y1, X2, Y2) - прямоугольник со сторонами, параллельными осям координат; (X1, Y1) и (X2, Y2) - координаты, определяющие одну из диагоналей прямоугольника; Bar (X1, Y1, X2, Y2) - закрашенный прямоугольник (без окантовки); Circle (X, Y, радиус) – на экран выводится окружность с центром в точке (X, Y)(тип integer); Arc (X, Y, начальный угол, конечный угол, радиус) - на экран выводится дуга окружности с центром в точке (X, Y); углы задаются в градусах; дуга рисуется ПРОТИВ часовой стрелки; Ellipse (X, Y, начальный угол, конечный угол, горизонтальный радиус, вертикальный радиус) - на экран выводится эллиптическая дуга с центром в точке с координатами (X, Y) (тип integer); SetFillStyle (заполнение, цвет) – определение вида и цвета заполнения области; FloodFill (x, y, цвет границы) – заливка замкнутой области. Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:   1234567  Сейчас читают про: Охрана редких и вымирающих видов Ремонт посудомоечных машин своими руками Показатели тесноты корреляционной связи для многофакторной корреляционно-регрессионной модели Дифференциальное уравнение гармонических колебаний и его решение Календарный (паспортный) и биологический возраст, их соотношения, критерии определения биологического возраста на разных этапах онтогенеза Угловая скорость и угловое ускорение Самый сильный аргумент, почему эволюция человека не могла быть Чем дальше я оглядываюсь в прошлое, тем дальше могу заглянуть в будущее. © Черчилль ==> читать все изречения... 5702 5622 Понравился сайт? Поделись им с друзьями: