3. Создание отчетов
Создание автоотчета Переселенцы:
Отчеты, Создать, Автоотчет ленточный, Переселенцы:
Закроем окно с сохранением.
Откроем отчет в режиме Конструктора и введем вычисляемое поле для подсчета числа переселенцев.
С помощью кнопки Поле на Панели элементов создадим вычисляемое поле по формуле: =count([Фамилия]).
Закроем с сохранением.
Откроем отчет для просмотра, состоящего из 2 страниц.
Страница 2:
Создадим отчет с групповыми итогами на базе Запрос1 с помощью Мастер отчетов.
Добавим уровни группировки:
Получили:
Откроем отчет в режиме Конструктор:
Подведем итоги по областям и пунктам.
Щелкнем правой кнопкой, Сортировка и группировка.
Установим для области и пункта свойство Примечание группы:
Закроем окно. В схеме отчета появились зоны примечаний групп, в которых введем с помощью кнопки Вычисляемое поле на Панели элементов тексты «Всего по пункту», «Всего по области» и функцию счета =Count(*):
Закроем отчет с сохранением.
Откроем отчет:
4. Создание кнопочной формы
Создадим Кнопочную форму в режиме Конструктор.
Щелкнем Создание в режиме конструктора.
Появится окно Форма1. Правым щелчком выведем области заголовка и примечаний.
Щелкнем по кнопке Аа на Панели элементов и построим заголовок формы Кнопочная форма, отформатируем кнопками на панели инструментов.
Затем щелкнем по кнопке Вкладки на Панели элементов и создадим вкладку, в которой будут сгруппированы кнопки по открытию форм.
Затем щелкнем по кнопке Кнопка на Панели элементов и создадим во вкладке кнопку по открытию формы Области. Выполним предлагаемые команды:
Кнопка Области создана:
Аналогично во вкладке создадим кнопки по открытию форм Населенный пункт, Рождаемость.
Вкладку переименуем в Формы.
Перейдем на новую вкладку и создадим кнопки по открытию запросов.
При создании кнопки для запроса выбираем Разное, выполнить запрос.
Создадим кнопку для запроса Переселенцы области.
Создадим Вкладку Отчет и кнопку по просмотру отчета Переселенцы.
Затем создадим кнопку по закрытию Кнопочной формы.
В результате получим:
Закроем с сохранением Кнопочная форма.
Настроим форму: Сервис, Параметры запуска
База данных создана.
Закрываем Базу данных и программу.
Откроем базу данных, проверим работу Кнопочной формы.
Создадим пароль на открытие БД: Сервис, Защита, Задать пароль БД. Появится сообщение:
Выполним инструкцию.
После открытия БД вновь выполним Сервис, Защита и введем пароль aab.
ОК, закроем БД.
Откроем БД и введем пароль:
После открытия БД закроем ее.
Часть 2. Алгоритмизация и программирование
Общее задание:
1. Построить блок-схему алгоритма решения задачи.
2. Проверить работу программы тестами, указав в отчете входные и выходные данные для каждого теста.
Для решения каждой задачи создается программа на языке Object Pascal и блок-схема.
1. Условный оператор
2. Даны две точки А(x1,y1) и В(x2,y2). Составить алгоритм, определяющий, которая из точек находится ближе к началу координат.
Решение
Имеем разветвляющийся алгоритм.
1) Блок-схема алгоритма представлена на рис. 1.
2) Программа
program 1;
{$APPTYPE CONSOLE}
uses
SysUtils
var x1,y1,x2,y2,R1,R2: real;
begin
writeln('Vvedite A');
readln(x1,y1);
writeln('Vvedite B');
readln(x2,y2);
R1:=sqr(x1^2+y1^2));
R2:=sqr(x2^2+y2^2));
if R1=R2 then writeln('Раноудалены')
else
if R1>R2 then writeln('Ближе В')
else
writeln('Ближе А');
readln;
end.
Рисунок 1 – Блок-схема алгоритма