Вопросы для самоконтроля

Часть II. Delphi

17.Какой компонент Delphi предназначен для создания окна выбора файла для сохранения информации и как его использовать?

18.С какой целью программисты создают в программах структуру данных −

запись?

19.Опишите методику использования структуры данных − запись.

20.Назначение оператора With.

21.Покажите фрагмент программы "Должники", где происходит ввод исходных данных из файла.

22.Покажите фрагмент программы "Должники", где производится вывод результатов в файл.

23.Что произойдет при работе программы "Добавление записей в файл", если файл с указанным именем не будет найден?

24.Что произойдет в программе "Чтение записей из файла", если файл с указанным именем не будет найден?

25.Для чего в программе "Чтение записей из файла" применяется функция EOF?

Задачи для самостоятельного решения

№ 9.1. Подсчитать значение Q, вычисляемое по формуле

N

Yi

Q i 1 N!

где Yi — элементы массива Y с размерностью N. Массив Y ввести из файла на диске. Вывод обеспечить: 1) на экран; 2) в файл на диске.

№9.2. Дан массив X, содержащий вещественные числа. Найти и записать на место X(1) — наибольший элемент массива X, а на место X(N) — наименьший элемент массива (X1,X2,...,XN). Ввод исходного массива X осуществить из файла на диске. Вывод обеспечить:1) на экран; 2) в файл на диске.

№9.3 Дан массив Q(N), состоящий из отрицательных и положительных чисел. Составить из Q два массива: A, содержащий только положительные числа; B, содержащий только отрицательные. Массив Q вводится из файла на диске. Вывести исходный массив и массивы, полученные в процессе преобразования. Вывод обеспечить:1) на экран; 2) в файл на диске.

№9.4. Даны натуральное число N, действительные числа

Часть II. Delphi

X1,X2,..., Xn. Получить (1+r)/(1+s),где r — сумма всех тех членов последовательности X1, X2,..., Xn, которые не превосходят 1, а s — сумма членов, больших 1. Вывести сначала массив X. Затем r, s. Ввод исходных данных осуществить из файла на диске. Вывод — по желанию пользователя программы либо на экран или

вфайл на диске.

№9.5. Дана последовательность из N различных чисел. Найти сумму чисел этой последовательности, расположенных между максимальным и минимальным числами (в сумму включить и оба этих числа). Последовательность ввести из файла на диске. Вывести исходную последовательность в виде таблицы с указанием порядкового номера числа в последовательности и самого числа и сумму чисел. Вывод предусмотреть:1) в файл на диске; 2) на экран.

№9.6. Даны: n — целое число (n>=2), последовательность действительных чисел : a1, a2,..., an. Получить:

min(a1+a2,a2+a3,...,an-1+an); max(a1,a1a2,a1a2a3,...,a1...an-1an).

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

№9.7. Дан файл f1, который содержит номера телефонов сотрудников учреждения: указывается фамилия сотрудника, его инициалы и номер телефона. Найти телефон сотрудника по его фамилии и инициалам. Вывод по желанию пользователя либо на экран, либо в файл на диске.

№9.8. Дан файл f, содержащий сведения о кубиках: размер каждого кубика (длина ребра в см), его цвет (красный, желтый, зеленый или синий) и материал (деревянный, металлический, картонный). Найти: а) количество кубиков каждого из перечисленных цветов и их суммарный объем;

б) количество деревянных кубиков с ребром 3 см и количество металлических кубиков с ребром, большим 5 см. Вывод по желанию пользователя либо на экран, либо в файл на диске.

№9.9. Сведения об автомобиле состоят из его марки, номера и фамилии владельца. Дан файл f, содержащий сведения о нескольких автомобилях. Найти: а) фамилии владельцев и номера автомобилей данной марки; б) количество автомобилей каждой марки. Вывод по желанию пользователя либо на экран, либо в файл на диске.

Часть II. Delphi

№9.10. Дан файл f, содержащий сведения о книгах. Сведения о каждой из книг — это фамилия автора, название и год издания.

а) Найти названия книг данного автора, изданных до 2002 года.

б) Определить, имеется ли книга с названием «Информатика». Если да, то сообщить фамилию автора и год издания. Если таких книг несколько, то сообщить имеющиеся сведения обо всех этих книгах. Вывод по желанию пользователя либо на экран, либо в файл на диске.

№9.11. В память компьютера вводятся по очереди координаты N точек. Определить , сколько из них попадает в кольцо с внутренним радиусом R1 и внешним R2. Обе окружности имеют общий центр с координатами X0 и Y0. Результаты обработки выдать либо в файл на диске, либо на экран.

№9.12. Имеется таблица со среднесуточными температурами за период с 1.06.XX по 31.08.XX с точностью до 0,1 градуса. Необходимо определить и вывести на экран,

апо просьбе пользователя и в файл на диске, максимальную и минимальную среднесуточные температуры за указанный период, а также дни, в которые среднесуточная температура отличалась от максимальной или минимальной не более чем на 0,5 градуса. Исходные данные вводить из ранее подготовленного файла. Форма представления исходных данных в файле:

Июнь 1…...температура

2……– —…...– —…...– 30…...–

Июль, август — аналогично.

Форма вывода исходных данных и результатов на экран и в файл: Среднесуточные температуры:

Июнь.

Дата температура Дата температура и т.д. 1….…–……...6……– всего 6 пар столбцов

2…….–……..7……– 3…….–……..8……– 4…….–……..9……– 5…….–…….10…...–

Июль, август — аналогично. Максимальная температура XX градусов была:

Часть II. Delphi

виюне: число, число, и т.д.

виюле: число, число, и т.д.

вавгусте: число, число, и т.д.

Минимальная температура ХХ градусов была:

виюне: число, число, и т.д.

виюле: число, число, и т.д.

вавгусте: число, число, и т.д.

№9.13. Дан файл f, содержащий сведения о веществах: указывается название вещества, его удельный вес и проводимость (проводник, полупроводник, изолятор).

а) Найти удельные веса и названия всех полупроводников.

б) Выбрать данные о проводниках и упорядочить их по убыванию удельных весов. Составить программу. Вывод по желанию пользователя либо на экран, либо в файл

на диске.

№9.14. Даны два файла f1 и f2. Файл f1 — это инвентарный файл, содержащий сведения о том, сколько изделий разных видов продукции хранится на складе (вид продукции задается его порядковым номером). Файл f2 — это вспомогательный файл, содержащий сведения о том, на сколько уменьшилось или увеличилось количество изделий по некоторым видам продукции. Вспомогательный файл может содержать несколько сообщений по продукции одного вида или не содержать ни одного такого сообщения. Обновить инвентарный файл на основе вспомогательного, образовав новый файл g.

№9.15. Составить программу назначения студентов на стипендию по результатам экзаменационной сессии:

1) если сессия сдана на все «5»,то стипендия повышенная; 2) если на «4» и «5», то стипендия обыкновенная; 3) если есть хотя бы одна «3»,то стипендия не назначается.

Исходные данные ввести из файла на диске. Вывод обеспечить:1) на экран дисплея;

2)в файл.

№9.16. Даны координаты n точек на плоскости:X1,Y1,..., Xn, Yn

(n=20). Найти номера двух точек, расстояние между которыми наибольшее (считать, что такая пара точек единственная). Координаты точек вводятся из файла. Вывести координаты точек в виде таблицы, номера двух точек, расстояние между которыми наибольшее и само расстояние между ними. Вывод предусмотреть: 1) в файл; 2) на экран.