Файл: Курсовая работа студента 2 курса 09. 02. 07 Информационные системы и программирование Магомедалиева Мурада Магомедовича.docx
Добавлен: 09.11.2023
Просмотров: 50
Скачиваний: 3
ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.
Приложения
Алгоритм программы
Рисунок А.1 - Обработка событий экранных форм программы
Рисунок А.2 - Алгоритм процедуры BitBtn1Click программа delphi алгоритм
Моя программа выполняет тестирование студентов по программированию. При открытии программы появляется окно (рис В.1), тестирования в котором нужно вести Фамилию Имя и Группу. Тестирование состоит из 20 вопросов, в каждом вопросе четыре варианта ответа необходимо выбрать один правильный (рис В.2). В конце тестирования появляется окно в котором выводится бал за количество ответов по 12 бальной системе (рис В.3).
Рисунок В.1 - Окно авторизации
Рисунок В.2 - Внешний вид формы FormTest
Рисунок В.3 – Итог
program DatabaseDesignQuiz;
uses
SysUtils;
var
Score: Integer;
Answer: Char;
begin
Score := 0;
// Вопрос 1
WriteLn('1. Что такое база данных?');
WriteLn('A. Это программа для создания таблиц');
WriteLn('B. Это набор связанных данных');
WriteLn('C. Это графический интерфейс для работы с данными');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'B' then
Inc(Score);
// Вопрос 2
WriteLn('2. Какая концепция базы данных описывает связи между таблицами?');
WriteLn('A. Иерархическая');
WriteLn('B. Сетевая');
WriteLn('C. Реляционная');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'C' then
Inc(Score);
// Вопрос 3
WriteLn('3. Какое ключевое слово используется для добавления новой записи в таблицу?');
WriteLn('A. ADD');
WriteLn('B. INSERT');
WriteLn('C. UPDATE');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'B' then
Inc(Score);
// Отображение результата
WriteLn('Результат:');
WriteLn('Вы набрали ', Score, ' баллов из 3.');
// Ожидание нажатия клавиши перед выходом
WriteLn('Нажмите любую клавишу для выхода...');
ReadLn;
end.
КОД 2
program DatabaseDesignQuiz;
uses
SysUtils;
var
Score: Integer;
Answer: Char;
begin
Score := 0;
// Вопрос 1
WriteLn('1. Что такое база данных?');
WriteLn('A. Это программа для создания таблиц');
WriteLn('B. Это набор связанных данных');
WriteLn('C. Это графический интерфейс для работы с данными');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'B' then
Inc(Score);
// Вопрос 2
WriteLn('2. Какая концепция базы данных описывает связи между таблицами?');
WriteLn('A. Иерархическая');
WriteLn('B. Сетевая');
WriteLn('C. Реляционная');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'C' then
Inc(Score);
// Вопрос 3
WriteLn('3. Какое ключевое слово используется для добавления новой записи в таблицу?');
WriteLn('A. ADD');
WriteLn('B. INSERT');
WriteLn('C. UPDATE');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'B' then
Inc(Score);
// Вопрос 4
WriteLn('4. Какое ключевое слово используется для удаления записей из таблицы?');
WriteLn('A. DELETE');
WriteLn('B. REMOVE');
WriteLn('C. ERASE');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'A' then
Inc(Score);
// Вопрос 5
WriteLn('5. Какая операция используется для объединения данных из двух или более таблиц?');
WriteLn('A. JOIN');
WriteLn('B. MERGE');
WriteLn('C. COMBINE');
Write('Ваш ответ: ');
ReadLn(Answer);
if Answer = 'A' then
Inc(Score);
// Отображение результата
WriteLn('Результат:');
WriteLn('Вы набрали ', Score, ' баллов из 5.');
// Ожидание нажатия клавиши перед выходом
WriteLn('Нажмите любую клавишу для выхода...');
ReadLn;
end.
1* Delphi - универсальный и легко изучаемый язык, используемый для создания сложных приложений и баз данных.
2 Гольцман, В. MySQL 5.0. / В. Гольцман. – СПб. и др. Питер, 2021. – 253 c. (дата обращения 30.05.2023)
-
3Буч, Г. Язык UML. Руководство пользователя. [Электронный ресурс] / Г. Буч, Д. Рамбо, И. Якобсон. — Электрон. дан. — М. : ДМК Пресс, 2018. — 496 с. —URL: http://e.lanbook.com/book/1246 (дата обращения 20.05.2023)
4* Массив - это формальное обледенение нескольких однотипных объектов (чисел, символов, строк и т.д.), рассматриваемое как единое целое. Массивы могут содержать множество однотипных элементов и предоставляют возможность обращения к отдельным элементам по номеру.
5 Фаронов В.В. «DELPHI. Программирование на языке высокого уровня». - Питер, 2022. (дата обращения 21.05.2023)
6 Ульман, Л. MySQL. [Электронный ресурс] — Электрон. дан. — М. : ДМК Пресс, 2018. — 352 с. — URL: http://e.lanbook.com/book/1241 (дата обращения 23.05.2023)
7 Савелов, А.В. Разработка мобильного приложения под Android // Молодые учёные в решении актуальных проблем науки. 2022. С. 543-544. (дата обращения 23.05.2023)
8*Для разнообразия при различных запусках программы предусмотрен механизм перемешивания вопросов, чтобы порядок следования вопросов менялся.
9 Фаронов В.В. Turbo Pascal 7.0. Начальный курс. - М.: Нолидж, 2020. (дата обращения 20.05.2023)
10* При нажатии кнопки "Начать" на форме авторизации (FormAvto), следует сформировать имя файла из имени студента и его группы, а затем открыть файл для записи
11* При нажатии кнопки "Начать" на форме авторизации (FormAvto), следует скрыть форму FormAvto и показать форму с тестами (FormTest).
12* При нажатии кнопки "Начать" на форме авторизации (FormAvto), следует сгенерировать базу вопросов и перемешать их случайным образом.
13 Зуев Е.А. Программирование на языке Turbo Pascal 6. 0,7.0. - М.: Радио и связь, Веста, 2021. (дата обращения 21.05.2023)
14 Тарасов, С.В. СУБД для программиста. Базы данных изнутри. [Электронный ресурс] — Электрон. дан. — М. : СОЛОН-Пресс, 2019. — 320 с. — URL: http://e.lanbook.com/book/64959 (дата обращения 20.05.2023)
15 Зуев Е.А. Программирование на языке Turbo Pascal 6. 0,7.0. - М.: Радио и связь, Веста, 2021. (дата обращения 21.05.2023)
16 Пахретдинов Р.А. Уязвимости платформы Android // Актуальные научные исследования в современном мире. 2021. № 4-3 (72). С. 93-97- (дата обращения 30.05.2023)
17* Процедура BitBtn1Click предназначена для анализа ответа и вывода очередного вопроса или итоговой оценки
18 Пейтон, К. PHP 5 и MySQL 5 / К. Пейтон, А. Меллер ; пер. с нем. под ред. С. М. Молявко. – Электрон. дан. – М. : Бином-Пресс , 2018. – 366 с.-(дата обращения 29.05.2023
19 Пахретдинов Р.А. Уязвимости платформы Android // Актуальные научные исследования в современном мире. 2021. № 4-3 (72). С. 93-97- (дата обращения 30.05.2023)