- •Правила оформления лабораторных работ по курсу «Информатика», раздел «Основы программирования на языке Delphi»
- •Лабораторная работа №1. Программирование алгоритмов линейной структуры
- •Лабораторная работа №2
- •2) Составить программу для выполнения указанного ниже задания, используя оператор множественного ветвления.
- •Контрольные вопросы
- •Лабораторная работа №3. Программирование алгоритмов циклической структуры.
- •1)Задание:
- •Лабораторная работа №4 Обработка массивов данных. Программирование одномерных массивов.
- •Вопросы
- •Лабораторная работа №5. Обработка массивов данных. Обработка матриц.
- •Программа.
- •Вопросы
- •Лабораторная работа №6 Программирование пользовательских процедур и функций
- •Внешний вид формы:
- •Варианты заданий
- •Вопросы
- •Лабораторная работа № 7 "Тест по информатике"
- •1. Постановка задачи
- •2. План разработки программы
- •3. Задание
3. Задание
Для контроля правильности работы программы вывести на панель набранную пользователем сумму баллов.
Подсказка. Заголовку соответствующей панели (или метки) присвоить значение IntToStr(sum).
Запустите программу и убедитесь, что верная сумма баллов получается лишь при последовательном выборе переключателей сначала из RadioGroup1, затем из RadioGroup2 и т.д. Если порядок нарушен, то результат может быть неверным. Чтобы этого не случилось, вставьте дополнительную кнопку и сделайте подсчет баллов только после ее нажатия.
Сделайте возможным повторный запуск программы.
Для наглядности вывести результат разным цветом.
Подсказка. В оператор Case при выводе результата задать свойству Font.Color выбранный цвет. Например: Panel1.Font.Color:=clRed;
Усовершенствуйте программу, введя в раздел описания массив констант с номерами правильных ответов, а в программе только сравнивайте индекс переключателя со значением константы.