Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Учебная практика по VBA.doc
Скачиваний:
2
Добавлен:
21.08.2019
Размер:
614.4 Кб
Скачать

5. Файлы

  1. Создать файл, каждая запись которого имеет структуру: название товара, количество товара, цена за единицу. Выдать ведомость товара, количество которых меньше заданного А.

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

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

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

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

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

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

  8. Школе необходим последовательный файл для учета выпускников. 1) Создайте последовательный файл для канцелярии по учету выпускников. Храните в нем фамилию, имя, год выпуска, любимый вид спорта и нынешний род занятий выпускника. Для образца составьте файл на десять человек. 2) Воспользуйтесь этим файлом и напечатайте приглашения на очередной домашний матч «Зенита» тем выпускникам, которые назвали футбол своим любимым видом спорта.

  9. Компьютерная фирма ведет файл со сведениями о двадцати своих сотрудниках. 1) Создайте последовательный файл, содержащий имя и адрес каждого сотрудника (с указанием улицы, дома, квартиры и почтового индекса). 2) По содержимому файла напечатайте почтовые адреса для рассылки чеков еженедельной заработной платы.

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

  11. Налоговая инспекция поощряет налогоплательщиков, вносящих подоходный налог до истечения апрельского контрольного срока, делая им скидку. 1) Создайте файл, в котором содержались бы имена, сведения о сроках уплаты и размере налога для каждого нало­гоплательщика (ограничьтесь группой из шести человек). 2) Пусть ваша программа читает файл и делает скидку в 10% для тех, кто уплатил налог досрочно, а также выводит на экран их имена и размер скидки в рублях.

  12. Фабрика игрушек ведет учет фирм розничной торговли, сбывающих ее продукцию. Файл контрагентов содержит названия этих фирм, сведения об их местоположении и индекс кредитоспособности: низкая или высокая. 1) Напишите программу, которая создала бы последовательный файл контрагентов. 2) Напишите программу, которая создала бы два последовательных файла с именами good.dat и bad.dat соответственно для фирм с высокой и низкой кредитоспособностью.

  13. Предположим, адвокат Михаил Барщевский с помощью компьютера ведет учет своих клиентов и их дел (табл). 1) Напишите программу, которая позволяла бы ему вводить в последовательный файл следующие сведения: имя клиента, обвинение, исход дела.

Имя клиента

Обвинение

Исход дела

Сердюков

Клевета

Выиграно

Прохоров

Оскорбление

Проиграно

Мицкевич

Поджог

?????

Максимова

Взлом

Выиграно

Лерман

Взятка

Проиграно

2) Мицкевич «из огня попадает в полымя». Напишите программу, которая заменяла бы неопределенное решение суда на «Проиграно». Напечатайте обновленный файл.

  1. Хоккейные команды «Черные ястребы» и «Красные крылья» хранят в последовательных файлах имена всех своих двенадцати нападающих, число заброшенных ими шайб, сделанных голевых передач и заработанное штрафное время. 1) Создайте файлы black.dat и red.dat, содержащие информацию о каждой из двух команд. 2) Ваша программа по данным, извлеченным из этих файлов, должна создавать новый файл allstars.dat, в котором содержались бы имя, команда и сумма очков (голы и передачи) для шести лучших игроков обеих команд. Пусть имена и показатели результативности хоккеистов выводятся на экран.

  2. Имена и адреса всех, кто обращается за информацией в фирму, попадают в список рекламной рассылки. 1) Создайте основной файл master.dat из десяти записей в качестве списка рассылки и меньший файл family.dat из пяти записей для вновь обратившихся с запросами в фирму. Добавьте данные из второго файла в конец первого. 2) Напишите программу, которая случайным образом выбирала бы из основного файла одну запись и посылала бы адресату письмо с уведомлением о выигрыше приза.

  3. Инспектор колледжа ведет файл академических занятий студентов. 1) Создайте последовательный файл и заполните его фамилиями, названиями академических курсов и оценочным коэффициентом студентов. Воспользуйтесь данными, перечисленными в таблице. 2) Выберите «умных» студентов, т. е. тех, кто имеет оценку выше 88, и запишите сведения о них в файл best.dat. Пусть программа помогает инспектору формировать на основе этого файла группы углубленного обучения. По названию курса она должна выдавать список «умных» студентов, зачисленных в такую группу.

Фамилия студента

Курс

Оценочный коэффициент

Сердюков

Программирование

78

Прохоров

Японский язык

91

Мицкевич

Психология

56

Северский

Программирование

66

Максимова

Психология

45

Лерман

Корейский язык

90