Delphi. Лабораторная работа № 10. (4 часа) «Обработка данных в формате дата/время. Вывод данных из программы на печать». Цели: Научиться использовать тип данных TDateTime для обработки данных в формате дата/время. Научиться организовывать вывод данных из компонента StringGrid на печать. Закрепить навыки разработки приложений, в которых отображаются и обрабатываются структурированные данные - записи и файлы; Закрепить навыки применения компонентов OpenDialog и SaveDialog для открытия и сохранения файлов.

 

Ход работы:

1. Изучить (повторить) теоретический материал:

Тема 10. "Обработка данных в формате дата/время. Вывод данных из программы на печать".

 

Общая часть задания:

Разработать приложение, которое позволяет:

• создать структуру данных, определенную в вашем варианте (1 балл);

• для ввода дат в таблицу применить компонент MonthCalendar, или DateTimePicker (1 балл);

• сохранить данные в файл на диск при помощи компонента SaveDialog (1 балла);

• открыть с диска файл с данными при помощи компонента OpenDialog (1 балла);

• подготовить файл с данными для проверки работы программы (1 балла);

• организовать вывод данных из таблицы на печать (1 балл)

• обработать данные (в чем заключается обработка, определенно в вашем варианте) (4 балла).

2. Получить (уточнить) у преподавателя номер своего варианта.

3. Выбрать из списка номер вашего варианта и прочитать условия задач:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

4. Если возникли вопросы по условиям задач, задайте их преподавателю.

5. Скачать, распаковать, открыть и внимательно изучить пример: скачать архив.

6. Разработать приложение для своего варианта. 

7. Протестировать приложение.

8. Оформить отчет по лабораторной работе. Для этого следует в строке заголовка главной формы записать:

"ЛР N. Вариант N. Группа. Фамилия Имя." В начале программного модуля главной формы записать как комментарий:

•  номер, название, цель работы;

• номер варианта, условие задачи;

• дата окончания работы, Фамилия, Имя, группа.

9. Сдать преподавателю выполненную работу:

•  Работая в локальной сети колледжа, скопировать папку с работой («№группы_Фамилия_№ЛР») в папку на сетевом сервере: \\Server_uch\_БУФЕР\_Aud_27 (на рабочем столе создан ярлык к папке "_ЛР-сдача").

• Работая не в колледже, создать файл-архив папки с работой, зайти на сайте "Образовательный портал" в раздел "Обратная связь", заполнить поля формы, прикрепить свой файл-архив и отправить его преподавателю.

 

10. Оценки по проверенным работам можно посмотреть в электронном журнале:

• Работая в локальной сети колледжа, откройте ярлык на рабочем столе "Журнал".

• Работая не в колледже, зайти на сайте "Образовательный портал" в раздел "Учебные журналы", открыть журнал текущего семестра.

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

Вариант 1.

Структура данных: "Заказ стройматериалов".

 Обработка: Отобразить данные и вычислить общую сумму заказа за указанный месяц.

 Вариант 2.

Структура данных: "Инвентаризационная ведомость".

 

Примечание:

Коэффициент амортизации зависит от возраста и равен:

    - 1, если возраст меньше 2 лет;

    - 0,9, если возраст от 2 до 4 лет;

    - 0,75, если возраст от 4 до 7 лет;

    - 0,5, если возраст больше 7 лет.

Остаточная стоимость вычисляется как произведение начальной стоимости на коэффициент амортизации.

Обработка: Отобразить данные за указанный год покупки.

 

 Вариант 3.

Структура данных: "Журнал учета времени эксплуатации ПЭВМ и почасовой оплаты за предоставление аренды".

Тариф оплаты за 1 час: 1 200р.

 

Примечание:

Размер скидки зависит от продолжительности эксплуатации:

                    - если продолжительность < 10 часов: скидка = 0;

                    - от 10 до 24 часов: скидка = 0.2 * Оплата;

                    - если продолжительность > 24 часов: скидка = 0.4 * Оплата.

Обработка: Отобразить данные, у которых начало аренды попадает на выходной день (суббота, или воскресенье) и увеличить для них сумму оплаты в 1,5 раза.

 Вариант 4.

Структура данных: "Накладная на продовольственные товары".

 Обработка: Отобразить данные на просроченные товары на заданную дату.

Вариант 5.

Структура данных: "Расход бензина по автопарку".

 Обработка: Отобразить данные за указанный месяц и вычислить общий расход бензина по автопарку за этот месяц.

 Вариант 6.

Структура данных: "Журнал учета времени нахождения в рейсе и почасовой оплаты труда водителей".

Тариф оплаты за 1 час: 4 200р.

 

Примечание:

Размер премии зависит от продолжительности рейса:

                    - если продолжительность < 6 часов: премия = 0.1 * Оплата;

                    - от 6 до 12 часов: премия = 0.2 * Оплата;

                    - если продолжительность > 12 часов: премия = 0.4 * Оплата.

 

Обработка: Отобразить данные у которых время выезда попадает на выходной день (суббота, или воскресенье) и увеличить сумму оплаты этих рейсов на 50%.

 Вариант 7.

Структура данных: "Журнал учета времени нахождения в рейсе и почасовой оплаты труда водителей".

Тариф оплаты за 1 час: 4 200р.

 

Примечание:

Размер премии зависит от продолжительности рейса:

                    - если продолжительность < 6 часов: премия = 0.1 * Оплата;

                    - от 6 до 12 часов: премия = 0.2 * Оплата;

                    - если продолжительность > 12 часов: премия = 0.4 * Оплата.

Обработка: Отсортировать данные в хронологическом порядке дат (по возрастанию).

Вариант 8.

Структура данных: "Декларация о доходах".

 

Примечание:

Налог зависит от прибыли:

    - если прибыль < 100 тыс. руб., то налог составляет 14% от прибыли;

    - от 100 тыс. до 300 тыс. руб. - 18%;

    - более 300 тыс. руб. - 22%.

 

Обработка: Отобразить данные за указанный месяц и вычислить суммарный чистый доход за этот месяц (Прибыль - Налог).

Вариант 9.

Структура данных: "Ведомость начислений почасовой оплаты труда". 

 

Обработка: Отобразить данные с продолжительностью работ больше суток и увеличить им начисление на 80%.

Вариант 10.

Структура данных: "Ведомость начислений".

                Тариф за 1 рабочий день, руб.: 87500 

 

Примечание:

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

 

Обработка: Определить сотрудника с наименьшей суммой начисления.

Вариант 11.

Структура данных: "Ведомость выработки изделий". 

 

Обработка: Отобразить данные за указанный день и вычислить суммарную стоимость обработки изделий за этот день.

 

Вариант 12.

Структура данных: "Вычисление износа и текущей цены для автомобилей автопарка на _______________(дата)".

Коэффициент амортизации (доля износа от начальной цены за 1 год): 0,05

 

Примечание:

Если «Износ» превысил 95% от «Начальной цены», то считать его равным 95% «Начальной цены».

 

Обработка: Отобразить данные за указанный год начала эксплуатации и вычислить суммарный износ для этих автомобилей.

Вариант 13.

Структура данных: "Сведения о сданной в ремонт аппаратуре". 

 

Обработка: Отобразить данные на аппаратуру, ремонт которых ещё не выполнен и с момента приема на сегодняшний (текущий) день прошло более 30 дней.

Вариант 14.

Структура данных: "Список больных в больнице". 

 

Обработка: Отобразить данные на больных по заданному диагнозу, которые на сегодняшний (текущий) день находятся в больнице более недели.

 

Вариант 15.

Структура данных: "Журнал учета телефонных переговоров с посекундной тарификацией".

Тариф оплаты за 1 cек., руб.: внутри сети: 3; в другие сети: 8,2

 

Обработка: Отобразить данные на звонки в ночное время (22:00 - 6:00) и уменьшить сумму оплаты этих звонков в 2 раза.

Вариант 16.

Структура данных: "Журнал учета телефонных переговоров  с поминутной тарификацией".

Тариф оплаты за 1 мин, руб.: внутри сети: 60; в другие сети: 250

 

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

 

Вариант 17.

Структура данных: "Ведомость оплаты за электроэнергию".

Тариф оплаты за 1 Квт * ч, руб.: 850 

Пеня за 1 просроченный день: 0,05% от суммы.

 

Обработка: Отобразить данные о платежах за указанный период (от <дата_1> до <дата_2>.

 

Вариант 18.

Структура данных: "Ведомость оплаты за эксплуатацию оборудования".

                        Тариф оплаты за 1 час: 850р.

 

Обработка: Отобразить данные за указанный месяц и вычислить суммарное время эксплуатации за этот месяц.

 

 Вариант 19.

Структура данных: "Учет выполненных работ с повременной оплатой труда".

      Тариф оплаты за 1 час, руб.: разгрузка – 22100; загрузка – 35200

 

Обработка: Отобразить данные за указанный день недели.

Вариант 20.

Структура данных: "Заказ стройматериалов".

 Обработка: Отобразить данные и вычислить общую сумму заказа за за указанный период (от <дата_1> до <дата_2>.

Вариант 21.

Структура данных: "Список деталей для обработки на станке". 

 

Обработка: Отобразить данные для тех деталей, у которых окончание работы приходится на ночное время (от 23:00 до 6:00).

Вариант 22.

Структура данных: "Журнал учета времени нахождения в рейсе и почасовой оплаты труда водителей".

Тариф оплаты за 1 час, руб.: 24 200

 

Примечание:

Размер премии зависит от продолжительности рейса и нахождения в рейсе в выходные дни:

 - если продолжительность <= 12 часов: премия = 0.2 * Оплата;

 - если продолжительность > 12 часов: премия = 0.4 * Оплата;

 - если рейс хотя бы частично попал на выходные дни (суббота, или воскресенье), то дополнительно начисляется премия 0.5 * Оплата.

 

Обработка: Отобразить данные с выездом за указанный месяц.

Вариант 23.

Структура данных: "Справочная автовокзала". 

Обработка: Клиент вводит запрос, в котором указывает: требуемый ему пункт назначения и интервал возможного времени отправления (например, "Минск", с 10:00 до 11:30). Программа отображает данные из таблицы, удовлетворяющие запрос клиента.

Вариант 24.

Структура данных: "Справочная ж/д вокзала". 

Обработка: Клиент вводит запрос, в котором указывает: требуемый ему пункт назначения и интервал времени отправления (например, "Минск", с 10.00 до 11.30). Программа отображает данные из таблицы, удовлетворяющие запрос клиента с наличием мест.