Файл: Курсовая работа студента 2 курса 09. 02. 07 Информационные системы и программирование Магомедалиева Мурада Магомедовича.docx
Добавлен: 09.11.2023
Просмотров: 143
Скачиваний: 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; // Вопрос 1WriteLn('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' thenInc(Score); // Отображение результата WriteLn('Результат:'); WriteLn('Вы набрали ', Score, ' баллов из 3.'); // Ожидание нажатия клавиши перед выходом WriteLn('Нажмите любую клавишу для выхода...');ReadLn;end.КОД 2program DatabaseDesignQuiz;uses SysUtils;var Score: Integer; Answer: Char;begin Score := 0; // Вопрос 1WriteLn('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' thenInc(Score); // Отображение результата WriteLn('Результат:'); WriteLn('Вы набрали ', Score, ' баллов из 5.'); // Ожидание нажатия клавиши перед выходом WriteLn('Нажмите любую клавишу для выхода...'); ReadLn;end.
1* Delphi - универсальный и легко изучаемый язык, используемый для создания сложных приложений и баз данных.
2 Гольцман, В. MySQL 5.0. / В. Гольцман. – СПб. и др. Питер, 2021. – 253 c. (дата обращения 30.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)
Write('Вашответ: '); ReadLn(Answer); if Answer = 'B' thenInc(Score); // Отображение результата WriteLn('Результат:'); WriteLn('Вы набрали ', Score, ' баллов из 3.'); // Ожидание нажатия клавиши перед выходом WriteLn('Нажмите любую клавишу для выхода...');ReadLn;end.КОД 2program DatabaseDesignQuiz;uses SysUtils;var Score: Integer; Answer: Char;begin Score := 0; // Вопрос 1WriteLn('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' thenInc(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)