Вложенные процедуры и функции

Внутри процедур и функций могут находиться другие процедуры и функции. Они будут являться локальными по отношению к "материнской" процедуре и их можно будет вызывать только из нее самой. Например:

Здесь cde – локальная функция внутри процедуры abc.

3. ОБЪЕКТЫ ИССЛЕДОВАНИЯ, ОБОРУДОВАНИЕ, МАТЕРИАЛЫ И НАГЛЯДНЫЕ ПОСОБИЯ

3.1. IBM – совместимый компьютер.

3.2. Установленная операционная система Windows.

3.3. Установленное приложение Borland Delphi.

3.4. Справочная система приложения Borland Delphi.

4. ЗАДАНИЕ НА РАБОТУ

4.1. Изучение теоретические положения работы по программированию в среде Borland Delphi.

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

5. ПОРЯДОК ВЫПОЛНЕНИЯ РАБОТЫ

5.1. Ознакомиться с теоретическими положениями данной лабораторной работы.

5.2. Выполнить индивидуальное задание преподавателя по программированию (по заданиям приложения).

5.3. Оформить отчет по работе.

5.4. Защитить лабораторную работу путем ответа на вопросы преподавателя.

6. СОДЕРЖАНИЕ ОТЧЕТА

6.1. Описание цели работы.

6.2. Основные теоретические положения работы

6.3. Содержание индивидуального задания преподавателя по программированию.

6.4. Описание методики выполнения индивидуального задания.

7. СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

7.1. Delphi 7 : [наиболее полное руководство] / А. Д. Хомоненко [и др.];под общ.ред.А.Д.Хомоненко .— СПб. : БХВ - Петербург, 2007 .— 1216с. : ил. (7 экз.)

7.2. Программирование в Delphi 7 / П. Г. Дарахвелидзе, Е. П.Марков .— СПб.: БХВ -Петербург, 2004 .— 784c. : ил. (1 экз.)

7.3 Осипов Д. Delphi. Профессиональное программирование. - СПб.: Символ-Плюс, 2006. -1056 с., ил.

ПРИЛОЖЕНИЕ

Индивидуальные задания

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

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

3. Разработать функцию поиска минимального элемента одномерного массива.

4. Разработать процедуру поиска максимального элемента одномерного массива и его номера.

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

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

7. Разработать процедуру, определяющую, принадлежит ли точка m с координатами (х, у) треугольнику, заданному координатами вершин.

8. Разработать процедуру, меняющую местами две строки двухмерного массива.

9. Написать процедуру сортировки двухмерного числового массива по указанному столбцу.

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

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

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

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

14. Разработать процедуру, удаляющую указанную строку двухмерного массива. Удаленная строка заполняется нулями и переносится в конец массива.

15. Написать программу удаления всех строк двухмерного массива с отрицательными элементами.

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

17. Разработать функцию, определяющую количество цифр в заданном натуральном числе.

18. Разработать функцию, отыскивающую индекс заданного элемента в одномерном массиве.

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

20. Разработать функцию, отыскивающую индекс максимального элемента в указанной строке двухмерного массива.

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

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

23. Разработать функцию, которая вычисляет дискриминант квадратного уравнения.

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

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

26. Написать процедуру, упорядочивающую заданную строку слов по алфавиту.

27. Разработать функцию, которая определяет: пересекаются, касаются или не касаются две окружности с заданными координатами вершин и радиусами.

28. Разработать процедуру, определяющую уравнение перпендикуляра от центра окружности до прямой.

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

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

31. Разработать функцию, которая находит наибольший общий делитель двух целых чисел.

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

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

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

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

Министерство образования и науки Российской Федерации

Федеральное государственное бюджетное образовательное учреждение

высшего профессионального образования

«Тульский государственный университет»

Политехнический институт

Кафедра «Сварка, литье и технология конструкционных материалов»