![]() |
|
сделать стартовой | добавить в избранное |
![]() |
Компьютеры, Программирование
Программное обеспечение
Разработка программы на четырех языках программирования |
Министерство образования и науки Российской Федерации Федеральное агентство по образованию Государственное образовательное учреждение высшего профессионального образования « Комсомольский - на - Амуре государственный технический университет » Факультет компьютерных технологий Кафедра ПМИ РАСЧЕТНО-ГРАФИЧЕСКОЕ ЗАДАНИЕ по дисциплине ‹‹Языки программирования›› Студент группы 8КБ-1 Д.И.Карташов Преподаватель И.А. Трещёв Тема: Изучение IDE(I egra ed Developme E viro me ) urbo Pascal 7.0, Borla d C 3.11, Delphi 7, Builder C 6.0 . Цель работы: На четырех языках программирования ( urbo Pascal 7.0, Borla d C 3.11, Delphi 7, Builder C 6.0) написать программу, которая выводит на экран имя и фамилию студента. Для написания программы использовать стандартные средства графики и простейшие геометрические фигуры. Содержание Введение 1. Блок кода 2. Блок выполнения программы Вывод Список использованных источников Введение urbo Pascal — Интегрированная среда разработки программного обеспечения для платформ DOS и Wi dows 3.x и язык программирования в этой среде, диалект языка Паскаль от фирмы Borla d. urbo Pascal — это среда разработки для языка программирования Паскаль. Используемый в urbo Pascal диалект базировался на более раннем UCSD Pascal, получившем распространение, в первую очередь, на компьютерах серии Apple II. Компилирующая компонента urbo Pascal была основана на компиляторе Blue Label Pascal, первоначально созданном в 1981 году Андерсом Хейлсбергом для операционной системы asSys микрокомпьютера ascom. Позднее он был переписан как Compass Pascal для операционной системы CP/M, затем как urbo Pascal для DOS и CP/M. Достоинства: 1.Удобная среда разработки, включающая функциональный отладчик, доступный в любой момент. 2.Контекстная справочная система, по которой можно изучать язык без обращения к сторонним источникам. 3.Высокая скорость компиляции, высокая скорость выполнения откомпилированных программ. 4.Встроенная возможность использовать вставки на языке ассемблера. Недостатки: 1.Компилятор рассчитан на реальный режим DOS, применение которого сходит на нет. Однако в последних версиях компилятора и среды введена поддержка защищённого режима вместе с соответствующим отладчиком ( D). 2.В модуле CR имеется ошибка (некорректный подсчёт количества циклов для функции delay, не рассчитанный на быстрые процессоры, процессоры с переменной частотой и многозадачные среды), из-за которой при запуске программы на компьютерах с тактовой частотой более 200 MHz сразу происходило аварийное завершение с сообщением «Ru ime error 200 a ». Существуют разные варианты исправления модуля CR . В варианте Клауса Хартнегга ошибка 200 не возникает, но длительность Delay на быстрых компьютерах меньше желаемой, и эта проблема по незнанию иногда тоже считается недостатком urbo Pascal. Borla d C — среда программирования (IDE) на языках Си и C для DOS, Wi dows и Wi dows . Потомок urbo C. Его дебаггер urbo Debugger был написан для защищённого режима DOS. C Builder (по-русски обычно произносят ) - программный продукт, инструмент быстрой разработки приложений (RAD), интегрированная среда программирования (IDE), система, используемая программистами для разработки программного обеспечения на языке C .
C Builder объединяет в себе комплекс объектных библиотек (S L, VCL, CLX, MFC и др.), компилятор, отладчик, редактор кода и многие другие компоненты. Цикл разработки аналогичен Delphi. Большинство компонентов, разработанных в Delphi, можно использовать и в C Builder без модификации, но, к сожалению, обратное утверждение не верно. C Builder содержит инструменты, которые при помощи drag-a d-drop действительно делают разработку визуальной, упрощает программирование благодаря встроенному WYSIWYG - редактору интерфейса и пр. Delphi — язык программирования, который используется в одноимённой среде разработки. Сначала язык назывался Objec Pascal. Начиная со среды разработки Delphi 7.0, в официальных документах Borla d стала использовать название Delphi для обозначения языка Objec Pascal. Delphi — результат развития языка Турбо Паскаль, который, в свою очередь, развился из языка Паскаль. Паскаль был полностью процедурным языком, Турбо Паскаль, начиная с версии 5.5, добавил в Паскаль объектно-ориентированные свойства, а в Objec Pascal динамическую идентификацию типа данных с возможностью доступа к метаданным классов (то есть к описанию классов и их членов) в компилируемом коде, также называемом интроспекцией — данная технология получила обозначение R I. Так как все классы наследуют функции базового класса Objec , то любой указатель на объект можно преобразовать к нему, после чего воспользоваться методом Class ype и функцией ypeI fo, которые и обеспечат интроспекцию. Также отличительным свойством Objec Pascal от С является то, что объекты по умолчанию располагаются в динамической памяти. Однако можно переопределить виртуальные методы ewI s a ce и FreeI s a ce класса Objec . Таким образом, абсолютно любой класс может осуществить «желание» «где хочу — там и буду лежать». Соответственно организуется и «многокучность». 1. Блок кода Рисование с помощью графики urbo Pascal 7.0 Program my ame; uses Graph; var grDriver: I eger; grMode: I eger; ErrCode: I eger; begi grDriver := De ec ; I i Graph(grDriver, grMode,'D: BP BGI'); ErrCode := GraphResul ; if ErrCode = grOk he begi {Family} Li e(10, 10,10 ,50 ); Li e(10,20,30,5); Li e(10,30,30,50); Li e(40,50,50,10); Li e(50,10,60,50); Li e(40,30,65,30); Li e(70,10,70,50); Li e(70,10,80,10); Li e(70,30,80,30); Li e(80,10,80,30); Li e(80,10,100,10); Li e(90,10,90,50); Li e(100,50,110,10); Li e(110,10,120,50); Li e(100,30,120,30); Li e(125,10,125,50); Li e(130,10,130,50); Li e(135,10,135,50); Li e(125,50,135,50); Circle(155,30,18); Li e(180,10,180,50); Circle(190,20,9); Circle(190,40,9); { ame} Li e(30,100,40,80); Li e(40,80,50,100); Li e(25,100,55,100); Li e(25,100,25,105); Li e(55,100,55,105); Li e(60,105,70,80); Li e(70,80,90,105); Li e(60,90,90,90); Li e(107,105,107,70); Li e(107,85,115,85); Li e(115,105,115,70); Li e(120,70,120,105); Li e(120,105,130,70); Li e(130,70,130,105); Li e(135,105,145,70); Li e(145,70,155,105); Readl ; CloseGraph; e d else Wri el ('Graphics error:', GraphErrorMsg(ErrCode)); e d. Borla d C 3.11 #i clude &l ;graphics.h&g ; #i clude &l ;s dlib.h&g ; #i clude &l ;s dio.h
&g ; #i clude &l ;co io.h&g ; i mai (void) { i gdriver = DE EC , gmode, errorcode; i i graph(&gdriver, &gmode, &quo ;C: BORLA DC BGI&quo ;); errorcode = graphresul (); if (errorcode != grOk) { pri f(&quo ;Graphics error: %s &quo ;, grapherrormsg(errorcode)); pri f(&quo ;Press a y key o hal :&quo ;); ge ch(); exi (1); } {Family} Li e(10, 10,10 ,50 ); Li e(10,20,30,5); Li e(10,30,30,50); Li e(40,50,50,10); Li e(50,10,60,50); Li e(40,30,65,30); Li e(70,10,70,50); Li e(70,10,80,10); Li e(70,30,80,30); Li e(80,10,80,30); Li e(80,10,100,10); Li e(90,10,90,50); Li e(100,50,110,10); Li e(110,10,120,50); Li e(100,30,120,30); Li e(125,10,125,50); Li e(130,10,130,50); Li e(135,10,135,50); Li e(125,50,135,50); Circle(155,30,18); Li e(180,10,180,50); Circle(190,20,9); Circle(190,40,9); { ame} Li e(30,100,40,80); Li e(40,80,50,100); Li e(25,100,55,100); Li e(25,100,25,105); Li e(55,100,55,105); Li e(60,105,70,80); Li e(70,80,90,105); Li e(60,90,90,90); Li e(107,105,107,70); Li e(107,85,115,85); Li e(115,105,115,70); Li e(120,70,120,105); Li e(120,105,130,70); Li e(130,70,130,105); Li e(135,105,145,70); Li e(145,70,155,105); ge ch(); closegraph(); re ur 0; } Delphi7 u i GRAPH; i erface uses Wi dows, Messages, SysU ils, Varia s, Classes, Graphics, Co rols, Forms, Dialogs, S dC rls, Ex C rls; ype Form1 = class( Form) Bu o 1: Bu o ; Image1: Image; procedure Bu o 1Click(Se der: Objec ); priva e { Priva e declara io s } public { Public declara io s } e d; var Form1: Form1; impleme a io {$R .dfm} procedure Form1.Bu o 1Click(Se der: Objec ); begi wi h Image1 do begi {К} Ca vas.Move o(140,110); Ca vas.Li e o(140,170); Ca vas.Move o(170,110); Ca vas.Li e o(140,140); Ca vas.Li e o(170,170); {А} Ca vas.Move o(145,90); Ca vas.Li e o(160,30); Ca vas.Li e o(175,90); Ca vas.Move o(155,60); Ca vas.Li e o(170,60); {Р} Ca vas.Move o(145,90); Ca vas.Li e o(160,30); Ca vas.Li e o(175,90); Ca vas.Move o(155,60); Ca vas.Li e o(170,60); {А} Ca vas.Move o(180,90); Ca vas.Li e o(160,35); Ca vas.Li e o(175,90); Ca vas.Move o(155,60); Ca vas.Li e o(170,60); {Ш} Ca vas.Move o(60,30); Ca vas.Li e o(60,90); Ca vas.Li e o(90,30); Ca vas.Li e o(90,90); {О} Ca vas.Ellipse(225,30,255,90); {В} Ca vas.Move o(265,30); Ca vas.Li e o(265,90); Ca vas.Ellipse(265,30,295,60); Ca vas.Ellipse(265,60,300,90); {Д} Ca vas.Move o(100,110); Ca vas.Li e o(100,170); Ca vas.Li e o(130,110); Ca vas.Li e o(130,170); Ca vas.Move o(170,110); Ca vas.Li e o(140 {А} Ca vas.Move o(140,110); Ca vas.Li e o(140,170); Ca vas.Move o(170,110); Ca vas.Li e o(140,140); Ca vas.Li e o(170,170); {Н} Ca vas.Move o(180,110); Ca vas.Li e o(180,170); Ca vas.Li e o(210,110); Ca vas.Li e o(210,170); {И} Ca vas.Move o(220,110); Ca vas.Li e o(250,110); Ca vas.Move o(235,110); Ca vas.Li e o(235,170); {Л} Ca vas.Move o(260,170); Ca vas.Li e o(275,110); Ca vas.Li e o(290,170); Ca vas.Move o(270,140); e d; e d; e d. Builder C 6.0 #i clude &l ;vcl.h&g ; #pragma hdrs op #i clude &quo ;U i 1.h&quo ; #pragma package(smar i i ) #pragma resource &quo ; .dfm&quo ; Form1 Form1; fas call Form1:: Form1( Compo e Ow er) : Form(Ow er) { } void fas call Form1::Bu o 1Click( Objec Se der) { Form1-&g ;Image1-&g ; Ca vas-&g ; Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(60,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(60,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(90,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(90,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(100,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(100,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Ellipse(100,30,130,60); Form1-&g ;Image1-&g ; Ca vas-&g ;Ellipse(100,60,135,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(145,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(160,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(175,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(155,60); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(170,60); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(185,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(185,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(185,60); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(215,60); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(215,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(215,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Ellipse(225,30,255,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(265,30); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(265,90); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(60,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(60,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(60,140); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(90,140); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(90,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(90,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(100,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(100,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(130,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(130,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(140,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(140,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(170,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(140,140); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(170,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(180,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(180,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(210,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(210,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(220,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(250,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(235,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(235,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(260,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(275,110); Form1-&g ;Image1-&g ; Ca vas-&g ;Li e o(290,170); Form1-&g ;Image1-&g ; Ca vas-&g ;Move o(270,140); Form1-&g ;Image1-&g ; Ca vas-&g ; Li e o(280,140); } Вывод текста на экран urbo Pascal 7.0
Характер открытый, натура мечтательная. Рак самый загадочный знак из всего зодиака. Тип мыслителя, отличный разработчик архитектуры программных комплексов. Некоторый отрыв от реального приводит к возможным конфликтам с товарищами по работе - рекомендуется создание программ в одиночку. Мнительность приводит к скептицизму в области новых языков программирования и программных средств. Рекомендуемые языки программирования - ФОРТРАН, БЭЙСИК. При работе на персональном компьютере РАК не стремится к получению материальной выгоды, находя удовлетворение в добросовестной работе. Счастливый месяц - июнь, день- понедельник. Счастливые числа - 4,9,14,914. ЛЕВ ( с 21 июля по 20 августа) Знак огня. Под покровительством СОЛНЦА. Характер властный Натура богатая. Отличные программисты и пользователи персональных компьютеров, отличающиеся азартом и решимостью. Свойственное льву тщеславие приводит к большим успехам. Достигают успехов в применении персональных компьютеров в самых разнообразных областях. Рекомендуемая область деятельности - автоматизация инженерного труда и разработки в области искусственного интеллекта
1. Разработка программы на языке LISP для построения кривых Серпинского i-го порядка
2. Проектирование и разработка классов средствами языка программирования С++Builder6/0
3. Разработка программы на языке Borland Object Pascal (Ide Borland Delphi)
5. Разработка компьютерной программы на языке Паскаль для проведения простого теплофизического расчета
9. Языка программирования Delphi. Разработка практических заданий
10. Математические методы и языки программирования: симплекс метод
11. Разработка программы- тренажера "Управление электросетями"
12. Язык программирования Паскаль и ветвление
14. Тест на языке программирования Visual Basic
17. Разработка программы стимулирования сбыта
18. Разработка программы туристского путешествия в Великом Новгороде
19. Система программирования squeak smalltalk –новый этап развития языка программирования смолток
20. Разработка программы совершенствования организации международных перевозок
21. Разработка программы управления промышленным роботом на базе контроллера SIMATIC S5 фирмы SIEMENS
27. Общие сведения об языке программирования Qbasic
28. Разработка программы для построения кривых Серпинского i-го порядка
29. Логические задачи на языке программирования Prolog
30. Язык программирования Норма
31. Логические задачи на языке программирования Prolog
32. Операторы цикла в языке программирования Си++"
33. Особенности разработки программы KURS.EXE
34. Программа на языке Паскаль, реализующая операции над множествами
35. Проект разработки программы для фирмы-перевозчика
36. Работа со структурами в языке программирования Си++
37. Разработка программ с использованием динамической памяти
41. Разработка программы игры "Собери картинку"
42. Разработка программы на Delphi
43. Разработка программы представления табличных данных в виде диаграммы прямоугольников
44. Разработка программы решения системы линейных уравнений
45. Разработка программы, генерирующей пароли пользователей
46. Разработка программы-компилятора
47. Создание программного продукта на языке программирования Visual Basic for Applications
48. Создание программы на языке Delphi 7.0
49. Составить программу на языке Turbo Pascal для параллельной сортировки чисел
53. Разработка программы маркетинга на предприятии (на примере ИПЦ "Гузель")
57. Разработка программы финансового оздоровления предприятия
58. Разработка программы профессиональной подготовки заливщиков металла
60. Обучающая программа "Графика" программированию в графическом режиме на языке turbo-pascal 7.x
61. Деловой язык и культура речи юриста - тема "Разработка стратегии общения"
62. Диагностика банкротства предприятия и разработка антикризисной программы (на примере ООО «Оптима»)
65. Разработка синтаксического распознавателя вычисляемого оператора перехода языка FORTRAN
66. Аналитический обзор книги "Программирование на языке ассемблера..."
67. Программирование и алгоритмические языки
68. Разработка лабораторного практикума "Создание тестирующей программы"
69. Разработка системы задач (алгоритмы-программы) по дискретной математике
74. Разработка маркетинговой программы
76. Особенности разработки образовательных программ для руководителей высшего звена
77. Разработка демонстрационных программ для применения в процессе преподавания физики
79. Программа курса Латинский язык
80. Ознакомление с основами программирования на языке Си
81. Игровая программа TETRIS на языке Паскаль
82. Программирование на языках высокого уровня
83. Разработка алгоритмов и диалоговых программ автоматизированного формирования
84. Разработка игровой программы
85. Разработка программированных средств с помощью VBA
89. Первоначальные сведения о программировании на языке Pascal
90. Разработки мероприятий и уроков по английскому языку
91. Алгоритмический язык Pascal. Программа "Телефонный справочник"
93. Основы программирования на языке Паскаль
94. Программирование на алгоритмическом языке Бейсик
95. Программирование на языке С++
96. Программирование циклических и типовых программ на Ассемблере для микропроцессора КР580ИК80
97. Разработка алгоритма и программы для вычисления коэффициента оперативной готовности системы
98. Разработка базы данных средствами программы MS Access "Сотрудники"