Программа тестирования - Разработать программу для проведения тестов по какой-либо дисциплине. Вопросы группируются с помощью компонентов TGroupBox. 2. Должен быть хотя-бы один вопрос с выбором одного варианта ответа (компоненты TRadioButton). В примере э

Лабораторная работа 2. Вариант . ЛР Программа тестирования Цель работы: / задача из РК программа в Pascal Lazarus. В архиве также файл с объяснениями работы программы. Тэги: Программа на Lazarus, PascalObject, Pascal, Delphi, Turbo Delphi, Pascal ABC / Анимация, ЛР, РК, ДЗ, 2023 прога с модулем Условия для программы, под которые она выполнена: (Также добавлен код изменения цвета текста от варианта оценки за тест) Разработать программу для проведения тестов по какой-либо дисциплине. Пример на рисунке Требования к программе 1. Вопросы группируются с помощью компонентов TGroupBox. 2. Должен быть хотя-бы один вопрос с выбором одного варианта ответа (компоненты TRadioButton).

В примере это вопрос 1. 3. Должен быть хотя-бы один вопрос с выбором нескольких вариантов ответа (компоненты ТСһескВох). В примере это вопрос 2. 4. Должен быть хотя бы один вопрос с открытым ответом без вариантов (компонент TEdit). В примере это вопрос 3. 5. При нажатии на кнопку Проверить вычисляется оценка. 6. Здесь показан только пример. Задание выполняется самостоятельно и индивидуально, Вы должны придумать свой набор вопросов и систему расчёта итоговой оценки. Примечания к работе 1. Для группировки нескольких компонентов в один логический блок используется компонент TGroupBox. Сначала на форму помещается компонент TGroupBox, потом внутрь него добавляются дочерние компоненты TLabel, TRadioButton, TCheckBox, TEdit или другие.

2. Для выбора одного варианта из нескольких используются компоненты TRadioButton. Для TRadioButton имеется свойство Checked типа Boolean - показывает, выбран ли компонент в данный момент. В каждый момент времени, из всех компонентов TRadioButton, принадлежащих одинаковому родительскому компоненту (это может быть форма или блок TGroupBox), может быть выбран только один. Компоненты TRadioButton, расположенные в разных блоках TGroupBox, выбираются независимо друг от друга. 3. Для выбора нескольких вариантов используются компонент TCheckBox. Для ТCheckВох имеется свойство Checked типа Boolean показывает, выбран ли компонент в данный момент 4. Компоненты TGroupBox, TCheckBox и TRadioButton имеют свойство Caption - заголовок, который отражается в верхней (для TGroupBox) или правой (TCheckBox и TRadioButton) части элемента управления.

5. Перевод из строк в целые и обратно осуществляется с помощью функций IntToStr и StrTolnt. Пример расчета оценки var rathing : integer; begin rathing := 2; if RadioButton1.Checked {синонимы} then inc(rathing); if not checkBox1.Checked {- намазывать} and not checkBox2. Checked {- хлынуть} and checkBox3.Checked {+ ненавидеть} and checkBox4.Checked (+ хрустеть} then inc (rathing); if Edit1.Text == \'6\' then inc(rathing); Программа в сделанном виде: теги: Тест по русскому языку Вопрос 1 Слова \"недуг\" - \"болезнь\" - это синонимы • антонимы • паронимы омонимы X Вопрос 2 Ко второму спряжению относятся глаголы намазывать хлынуть ненавидеть хрустеть Вопрос 3 Сколько слогов в слове Коллаборация? 6 Ваша оценка: 5 Проверить Пример расчета оценки var rathing : integer; begin rathing := 2; if RadioButton1.Checked {синонимы} then inc(rathing); if not checkBox1.Checked {- намазывать} and not checkBox2.

Checked {- хлынуть} and checkBox3.Checked {+ ненавидеть} and checkBox4.Checked (+ хрустеть} then inc (rathing); if Edit1.Text == \'6\' then inc(rathing);  .