Вращение треугольника. Реферат. Информатика, ВТ, телекоммуникации.
🛑 👉🏻👉🏻👉🏻 ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻
Вы можете узнать стоимость помощи в написании студенческой работы.
Помощь в написании работы, которую точно примут!
Похожие работы на - Вращение треугольника
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Скачать Скачать документ
Информация о работе Информация о работе
Нужна качественная работа без плагиата?
Не нашел материал для своей работы?
Поможем написать качественную работу Без плагиата!
Описание программы.....................................
2.1 Общие
сведения....................................................
2.2
Используемые технические cредства
2.3
Инструкция по выполнению....................... 8
2.4
Входные и выходные данные.....................
2.5
Испытание программы..................................... 9
Заключение.......................................................................
Список литературы...................................................
ПРИЛОЖЕНИЕ 1 (ТЕКСТ
ПРОГРАММЫ)...........12
Язык Turbo-Pascal - один из самых распространенных языков программирования
компьютеров. К важным достоинствам языка Turbo-Pascal относится небольшой
размер компилятора, высокая скорость трансляции программ, компиляции и их
компоновки. Кроме того, удобство и высокое качество дизайна диалоговой
оболочки, делают написание и отладку программ наиболее удобным в сравнении с
альтернативными языками нового поколения.
Данная курсовая работа представляет разработку программного продукта с
использованием системного языка нового уровня - Turbo-Pascal . Эта
программа позволяет любому пользователю ( с любым уровнем компьютерной
грамотности ) производить необходимые расчеты с высокой скоростью и достаточным
уровнем сервиса.
Темой данного курсового проекта,
который был выполнен в ходе изучения курса “ Основы программирования и алгоритмические
языки ”, - разработка программы для работы в графическом режиме с правильным
треугольником, используя элементы пересчета координат его вершин при вращении
треугольника вокруг описанной около него окружности .
Дан равносторонний треугольник.
Требуется вращать его в плоскости экрана вокруг центра описанной вокруг него окружности.
Алгоритм
работы программы имеет разветвленную структуру.
Программа
состоит из трех основных частей :
1.
Описание переменных используемых при решении поставленной задачи.
2.
Описание процедур при помощи которых была реализована данная программа.
3. Тело
главной программы, являющейся важнейшей составной частью решения поставленной
задачи.
Процедурная
часть программы состоит из набора процедур предназначенных для более
оптимальной реализации разработанного метода решения задачи.
В
программе используются стандартные модули языка Turbo-Pascal с набором
процедур, необходимых для выполнения работы.
При
составлении процедур были использованы классические методы просчета координат
вершин треугольника, вывода результата на экран.
Данная программа предназначена для
визуального отображения вращающегося треугольника в плоскости
экрана.
Наличие модулей Crt, Graph, System, Drivers .
Модуль System является автоматически подключаемым и хранит все процедуры
и функции стандартного Паскаля, а также встроенные процедуры и функции Турбо
Паскаля, модуль Crt содержит процедуры и функции, обеспечивающие управление
текстовым режимом работы экрана. С помощью входящих в модуль подпрограмм можно
перемещать курсор в произвольную позицию экрана, менять цвет выводимых символов
и окружающего фона, создавать и удалять окна. Кроме того, в модуле содержатся
процедуры управления звуком и процедуры работы с клавиатурой. Сервис при работе
в графическом режиме предоставлен в модуле Graph (прорисовка линий,
отображение текста в графическом режиме, установка нужного видеорежима и
шрифта, изменение аттрибута линий и текста) . Модуль Drivers
(точнее объект TEvent ) использовался с целью упрощения обработки
событий, поступивших с клавиатуры.
Наличие операционной системы MS-DOS
версии 3.xx и выше или OS/2 Warp 3.0 & FullScreen DOS . Программа не
требует ни высокой скорости процессора, ни большого объема оперативной памяти и
места на диске, ни наличия манипулятора типа Mouse . В комплекте с
исполняемым файлом находится файл со шрифтом TRIP.CHR , необходимый для
корректной работы программы.
При отладке программы был использован компьютер
типа IBM Pentium 120 Triton & PipeLine Cashe 256 / 16Mb RAM, в состав которой
входит :
монитор 17’’ с адаптером SVGA S3TRIO Trio64 764;
Для вызова программы необходимо убедиться, что
файлы CURSPROJ.EXE и TRIP.CHR находятся в одной директории. После проверки
необходимо запустить файл CURSPROJ.EXE или в среде Паскаля откомполировать файл
CURSPROJ.PAS (в коплекте прилагается файл EGAVGA.OBJ , необходимый для линковки
в основную программу файла EGAVGA.BGI).
Интерфейс программы представлен на английском языке ввиду
временного отсутсвия дополнительных русских шрифтов.
Возможные действия в процессе выполнения программы:
- остановить/продолжить вращение
треугольника.
- изменить направление
вращения.
- c помощью клавиш вверх/вниз
можно менять скорость вращения треугольника.
- выход из программы.
Программа CURSPROJ.PAS имеет размер 3772 байт или
120 строк.
Выполняемый файл CURSPROJ.EXE имеет размер 24348
байт.
Входными данными для данной программы
является двумерный массив, содержащий координаты вершин равностороннего
треугольника.
Выходные данные : Визуальное отображение вращения
треугольника и текущих координат каждой из вершин.
Программа была испытана для всех вариантов
ввода-вывода и различных типов видеоадаптеров, что исключает возникновение
фатальных сбоев при работе программы.
Данная курсовая
работа представляет собой программный продукт, предназначенный для работы в
графическом режиме. Программный продукт написан на современном языке
Turbo-Pascal, который позволил наиболее просто представить эту работу.
В ходе выполнения
курсового проекта я ознакомился с новыми приемами программирования и особенностями
языка Turbo-Pascal что позволило разработать данный программный продукт.
Епанешников А.М., Епанешников
В.А., Программирование в среде TURBO PASCAL 7.0.-Москва:”Диалог-МИФИ”,1995
Зуев Е.А., Система программирования
Turbo Pascal.-Москва: СП “Диалог”,1992
Довгаль С.И., Сбинтев А.И.,
Персональые ЭВМ: TURBO PASCAL V7.0, Обектное программирование.-Киев:
“Двгаль”,1995
Ctr : Array [1 .. 2 , 1 ..
3] of Integer =((-77,0 , 77 ),
(-50,91,-50));
procedure SetCenter(x_nc ,
y_nc : integer);
New(P); Str(Num,P^); Str2 :=
P^; Dispose(P);
Line(x_c+ctr[1][1],y_c+ctr[2][1],x_c+ctr[1][2],y_c+ctr[2][2]);
Line(x_c+ctr[1][2],y_c+ctr[2][2],x_c+ctr[1][3],y_c+ctr[2][3]);
Line(x_c+ctr[1][3],y_c+ctr[2][3],x_c+ctr[1][1],y_c+ctr[2][1]);
procedure DrawText(XX,YY :
Integer; Text : String);
if Time2W
> 2 Then Time2W := Time2W - 1;
OutTextXY(85,10, 'ƒƒƒƒƒƒƒƒƒƒƒƒƒ');
OutTextXY(90,10,Str2(100-Time2W));
if Time2W
< 100 Then Time2W := Time2W + 1;
OutTextXY(85,10,'ƒƒƒƒƒƒƒƒƒƒƒ');
SetColor(LightRed);
OutTextXY(1,30,
'Freeze');
OutTextXY(1,30, 'ƒƒƒƒƒƒƒƒƒƒƒƒƒ');
Xn := Round(ctr[1][a] *
cos(Angle) + K * ctr[2][a] * sin(Angle));
Yn := Round(-K * ctr[1][a]
* sin(Angle) + ctr[2][a] * cos(Angle));
Ctr[1][a] := Xn; Ctr[2][a]
:= Yn;
DrawText(105,60,Str2(x_c+ctr[1][1]));
DrawText(105,75,Str2(x_c+ctr[2][1]));
DrawText(105,90,Str2(x_c+ctr[1][2]));
DrawText(155,60,Str2(x_c+ctr[2][2]));
DrawText(155,75,Str2(x_c+ctr[1][3]));
DrawText(155,90,Str2(x_c+ctr[2][3]));
grMode:=VGAHi; {video mode
VGA 640x480x16colors}
OutTextXY(1,10,'Speed :
'+Str2(100-Time2W));
OutTextXY(10,60,' Corn. 1
X Y');
OutTextXY(10,75,' Corn. 2
X Y');
OutTextXY(10,90,' Corn. 3
X Y');
SetTextStyle(TriplexFont,
HorizDir, 2);
OutTextXY(10,425,'ƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ');
OutTextXY(10,415,'ƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ');
OutTextXY(10,420,'
-Exit -Freeze '+
' -Speed -Direction ');
OutTextXY(10,420,'
ESC Enter Up/Down TAB ');
SetTextStyle(DefaultFont,
HorizDir, 1);
Repeat ShowD Until
Event.KeyCode = kbEsc;
else Writeln('Graphics error
: ', GraphErrorMsg(ErrCode));
Похожие работы на - Вращение треугольника Реферат. Информатика, ВТ, телекоммуникации.
Диссертация Духовно Нравственное Воспитание Младших Школьников
Контрольная Работа На Тему Простейшие Измерения На Местности
Реферат Атомная Энергетика И Окружающая Среда
Курсовая работа по теме Технико-экономическое обоснование деятельности организации
Дипломная Работа На Тему Планирование Рекламной Кампании На Примере Ао "Шоколадная Фабрика "Победа""
Реферат На Тему Овощи
Курсовая работа: Причины трудности усвоения заданий младшими школьниками в процессе обучения
Примеры Тем Магистерских Диссертаций Техносферная Безопасность
Реферат: Характеристика северного экономического района
Как Начать Мини Сочинение
Курсовая Работа На Тему Природа Самары Как Отражение Мирового Экологического Кризиса
Курсовая работа по теме Правовые основы организации страхового дела в Российской Федерации
Дипломная работа по теме Анализ механизма международно-правового регулирования миротворческих операций ООН по поддержанию мира
Реферат: Особливості застосування теорії комунікації у маркетингу
Сочинение по теме Внешние и внутренние интертексты в стихотворении Б.Л. Пастернака «Сказка»
Реферат: Трехмерная графика Теория
Курсовая Работа На Тему Технология Восстановления Гильзы Цилиндра Автомобиля Камаз
Контрольная Работа На Тему Культура И Современные Эпидемиологические Тенденции В Психологии
Политика Безопасности Предприятия Курсовая
Курсовая работа по теме Интерпретация вечных образов в апокрифах К. Чапека
Похожие работы на - Некоторые принципы воспитания в династии Романовых
Курсовая работа: Право приватної власності за законодавством України
Учебное пособие: Пожары и взрывы