Процедуры и функции

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

10. Типы данных «множество» и «запись»

10.1. Написать программу, проверяющую, является ли строка символов числом с плавающей точкой, т.е. состоит ли оно из цифр, знаков «+» и «-», точки, разделителя «е» или «Е», при­чем точка не может быть первым и последним символом мантиссы и не используется в порядке.

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

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

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

10.5. Заданы два слова. Написать программу, которая прове­рит, можно ли получить второе слово из букв первого.

Даны два непустых множества прописных и строчных букв. Написать программу, которая выводит:

10.6. общие буквы исходных множеств;

10.7. все буквы, встречающиеся в обоих множест­вах;

10.8. буквы, которых нет как в первом, так и во втором множе­стве;

10.9. буквы, которые есть в первом множестве, но нет во вто­ром;

10.10. прописные буквы, которые есть во втором множестве, но нет в первом;

10.11. все буквы, встречающиеся в обоих множествах, но без различения прописных и строчных;

10.12. выводит перечис­ленные множества в алфавитном порядке;

10.13. выводит перечис­ленные множества в порядке, обратном алфавитному.

Даны ml и m2 — множества номеров деталей двух меха­низмов, р - множество номеров пластмассовых деталей. Номер детали представляет собой трехзначное натуральное число. На­висать программу, которая вводит заданные множества с клавиатуры (признаком окончания ввода каждого множества является нуль) и выводит номера:

10.14. пластмассовых деталей среди деталей первого механизма;

10.15. одинаковых пластмассовых деталей среди деталей первого и второго механизмов;

10.16. пластмассовых деталей, которых нет среди деталей второго механизма;

10.17. индивидуальных деталей каждого механизма, не являющихся пластмассовыми.

10.18. В табл. 1 хранится список сотрудников фирмы, в табл. 2 – список сотрудников, владеющих английским языком, в табл. 3 – список сотрудников, владеющих французским языком, в табл. 4 – список сотрудников, владеющих немецким языком. Написать программу, выводящую фамилии сотрудников фирмы, не владеющих иностранными языками.

10.19. Массив содержит элементы, соответствующие росту школьников. Написать программу выбора школьников, рост каждого из которых меньше R.

10.20. Массив содержит элементы, соответствующие весу школьников. Написать программу выбора школьников, суммар­ный вес которых больше А.

10.21. Создан массив автовладельцев. Для каждого автовла­дельца известны номер, марка автомобиля, фамилия и адрес. На­писать программу, выясняющую, есть ли автовладельцы, имею­щие более одного автомобиля.

10.22. Создан массив автовладельцев. Для каждого автовла­дельца известны номер, марка автомобиля, фамилия и адрес. На­писать программу, выясняющую, сколько машин разных марок имеется в массиве.

10.23. Пусть точка описывается типом:

type

point = record

x,y: real

end;

Выпуклый многоугольник задан массивом вершин, перечисленных в порядке обхода по часовой
стрелке. Написать программу для определения периметра и площади многоугольника.

10.24. Используя понятие «запись», описать тип дата. Написать программу, которая из двух дат будет определять более раннюю, находить количество суток между заданными датами, количество лет, месяцев дней между заданными датами.

10.25. Пусть поле шахматной доски описывается типом

type

doska = record

vert: (a, b, с, d, e, f, g, h);

horiz: 1..8;

end;

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

Не нашли, что искали? Воспользуйтесь поиском: