УП 02. Эксплуатация ЭВМ. Основы алгоритмизации и программирования
министерство образования и науки Российской Федерации
Старооскольский технологический институт им. А. А. УГАРОВА
(филиал) федерального государственного автономного образовательного учреждения
«Национальный исследовательский технологический университет «МИСиС»
ОСКОЛЬСКИЙ ПОЛИТЕХНИЧЕСКИЙ КОЛЛЕДЖ
Д. Д. Артюхина
Т. Н. Коренькова
УП 02. ЭКСПЛУАТАЦИЯ ЭВМ.
ОСНОВЫ АЛГОРИТМИЗАЦИИ И ПРОГРАММИРОВАНИЯ
Учебное пособие для студентов специальности
09.02.04 – Информационные системы (по отраслям)
Одобрено научно-методическим советом ОПК в качестве учебного пособия
Старый Оскол 2017 г
ББК
УДК
Рецензенты:
преподаватель ОПК СТИ НИТУ «МИСиС» В.
Д., Н.
УП 02. Эксплуатация ЭВМ. Основы алгоритмизации и программирования: учебное пособие. – Старый Оскол: СТИ НИТУ «МИСиС», 2017. – 136 с.
Учебное пособие посвящено методологии программирования на языке Delphi.
Содержит первоначальные сведения по кодированию, запуску и отладке программ. Содержит тексты задач и, в необходимых случаях, указания по технологии их решения.
Методика программирования и кодирования программ для каждого типа задач изложена в виде законченных примеров.
Работа используется при выполнении практических работ по УП 02. Основы алгоритмизации и программирования. Учебное пособие предназначено для студентов системы СПО, обучающихся по специальности 09.02.04 – Информационные системы (по отраслям).
© Д., Н., 2017
© ОПК СТИ НИТУ «МИСиС»
СОДЕРЖАНИЕ
ВВЕДЕНИЕ.. 4
ПРАКТИЧЕСКАЯ РАБОТА № 1. 8
ПРАКТИЧЕСКАЯ РАБОТА № 2. 16
ПРАКТИЧЕСКАЯ РАБОТА № 3. 23
ПРАКТИЧЕСКАЯ РАБОТА № 4. 30
ПРАКТИЧЕСКАЯ РАБОТА № 5. 36
ПРАКТИЧЕСКАЯ РАБОТА № 6. 45
ПРАКТИЧЕСКАЯ РАБОТА № 7. 51
ПРАКТИЧЕСКАЯ РАБОТА № 8. 56
ПРАКТИЧЕСКАЯ РАБОТА № 9. 64
ПРАКТИЧЕСКАЯ РАБОТА № 9 а. 74
ПРАКТИЧЕСКАЯ РАБОТА № 10. 78
ПРАКТИЧЕСКАЯ РАБОТА № 11. 82
ПРАКТИЧЕСКАЯ РАБОТА № 12. 87
ПРАКТИЧЕСКАЯ РАБОТА № 13. 92
ПРАКТИЧЕСКАЯ РАБОТА №14. 96
ПРАКТИЧЕСКАЯ РАБОТА № 15. 100
ДОПОЛНИТЕЛЬНЫЕ ЗАДАНИЯ.. 112
ВВЕДЕНИЕ
В последние десятилетия в программировании возник и получил широкое развитие объектно-ориентированный подход. Это метод программирования, имитирующий реальную картину мира: информация, используемая для решения задачи, представляется в виде множества взаимодействующих объектов. Каждый из объектов имеет свои свойства и способы поведения. Взаимодействие объектов осуществляется при помощи передачи сообщений: каждый объект может получать сообщения от других объектов, запоминать информацию и обрабатывать ее определенным образом и, в свою очередь, посылать сообщения.
Объектно-ориентированная идеология используется практически во всех современных программных продуктах, включая ОС.
Первый объектно-ориентированный язык программирования Simula-67 был создан как средство моделирования работы различных приборов и механизмов.
В настоящее время широко используются системы визуального программирования: DELPHI, VISUAL BASIC, VISUAL C++.
Популярность этих ЯП объясняется тем, что они делают сложную технологию работы с визуальными компонентами WINDOWS доступной широкому кругу пользователей путем использования графического интерфейса.
Delphi – среда разработки программ, относящаяся к так называемым RAD-системам (Rapid Application Development – среда быстрой разработки приложений), суть которых состоит в том, что среда разработки берет на себя большую часть рутинной работы по созданию и настройке стандартизированных элементов интерфейса разрабатываемого проекта – кнопок, полей ввода данных, списков, переключателей и др.
Слово Delphi – это название города в древней Греции, в котором пророчествовали оракулы.
Версия Delphi 1 была выпущена в 1995 году. Программирование в среде Delphi7 существенно отличается от программирования в процедурных ЯП.
Основные принципы, которые отличают этот ЯП от процедурных:
• Отделение объектов программы, которые связаны с интерфейсом пользователя, от их программной части.
• Скорость и простота создания и настройки интерфейса пользователя, в котором используются готовые блоки – кнопки, поля ввода, переключатели и т. д.
ТЕОРЕТИЧЕСКАЯ ЧАСТЬ
Процедуры и функции Delphi
Математические
Назначение | Пример использования | |
ABS | Возвращает абсолютное значение | Y:=ABS(X); |
ROUND | Округление к ближайшему целому | Y:=ROUND(X) |
TRUNC | Округление в меньшую сторону | Y:=TRUNC(X) |
INT | Возвращает целую часть вещественного числа | Y:=INT(X) |
FRAC | Возвращает дробную часть числа | Y:=FRAC(X) |
SQR | Возвращает квадрат указанного значения | Y:=SQR(X) |
SQRT | Возвращает квадратный корень | Y:=SQRT(X) |
RANDOM | Возвращает случайное число из области, ограниченной заданным значением | Y:=RANDOM(100) |
RANDOMIZE | Позволяет задать случайное начальное значение для функции RANDOM | RANDOMIZE |
TAN | Возвращает тангенс указанного числа | Y:=TAN(X) |
Для работы с датами и временем
Назначение | Пример использования | |
CurrentYear | Возвращает текущий год | Label2.Caption := IntToStr(CurrentYear) |
Date | Возвращает текущую дату | Label2.Caption:= DateToStr(Date) |
DayOfWeek | Возвращает число от 1 до 7,которое определяет день недели | If DayOfWeek(Date)=1 then Label2.Caption :='воскресенье'; |
DecodeDate | Преобразует дату в раздельные составляющие: год, месяц, день | DecodeDate(Date, Year, Moth, Day); |
Time | Возвращает текущее время в формате TDateTime | Label2.Caption :=TimeToStr(Time); |
DecodeTime | Преобразует время в раздельные составляющие: час, минуту, секунду, миллисекунду | DecodeTime(Time, H,M, Sec, MSec); |
IncMonth | Возвращает дату, отстоящую от заданной даты на указанное число месяцев | s:=IncMonth(Date,4); |
Диалоговые
Назначение | Пример использования | |
ShowMessage | Позволяет отобразить информационное окно с предустановленной кнопкой Ok | |
ShowMessage(‘Error ’) | ||
InputBox | Позволяет создавать окно диалога для ввода пользовательской информации | |
S:=InputBox('Вход в систему','Ваш пароль','777'); | ||
MessageDlg | Позволяет отобразить информационное окно с набором кнопок | |
If MessageDlg('Вы уверены? ',mtConfirmation,[mbYes, mbNo],0) = mrYes Then Exit; |
Преобразование типов
Назначение | Пример использования | |
VAL | Преобразование строки в целое или вещественное число | VAL(STROKA, Y,CODE) |
STR | Преобразование целого или вещественного числа в строку | STR(Y, STROKA) |
DateToStr | Преобразование даты в строку | Label2.Caption:= DateToStrDate(Date) |
StrToDate | Преобразование строки в дату | S:=StrToDate(Edit1.text); |
TimeToStr | Преобразование строки во время | Label2.Caption :=TimeToStr(Time); |
Для работы с символами и строками
Назначение | Пример использования | |
CHR | Возвращает символ по указанному коду ASCII | S:=CHR(X) |
INSERT | Позволяет вставить одну строку в другую, начиная с заданного символа | Insert(context, stroka,3) |
COPY | Возвращает заданную часть строки | S:=COPY(stroka,1,5) |
LENGTH | Возвращает число символов строки | K:= LENGTH(stroka) |
POS | Возвращает позицию вхождения указанной последовательности символов в заданную строку | K:=POS(context, stroke) |
UpperCase | Возвращает строку, все строчные латинские буквы в которой преобразованы к прописным. | S2:= UpperCase(S1) |
LowerCase | Возвращает строку, все прописные латинские буквы в которой преобразованы к строчным. | S2:= LowerCase(S1) |
DELETE | Позволяет получить строку, из которой удалена заданная часть | DELETE(stroka,2,4) |
TRIM | Возвращает строку, в которой удалены пробелы с обеих сторон | S2:=TRIM(s1) |
Именованные константы в Delphi
|
Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
Основные порталы (построено редакторами)