Елементи для введення даних: текстове поле, прапорець, випадаючий список. Завдання для 8 класу.

Завдання 1. Логічні вирази
Завдання 2. Створити проект “Розв’язки квадратного рівняння”
Квадратне рівняння, це рівняння виду ax²+bx+c=0, де а,b,c – числа (a≠0)
Дано: a,b,c
Знайти: x1,x2
Зв’язок: D=b²-4ac — дискримінант
Якщо, D≥0 маємо два розв’язки: x1=(-b+√D)/(2a), x2=(-b-√D)/(2a)
Якщо, D<0 розв’язків не існує.
 Елементи для введення даних: текстове поле, прапорець, випадаючий список.
Співвідношення типів даних та елементів для введення даних, зчитування даних з елементів введення.

Завдання 3. Виконайте тестове завдання 38 з комп’ютерною перевіркою на сайті interactive.ranok.com.ua
Завдання 4. Скласти програму, в якій реалізовано головоломку Лойда: із заданого набору чисел вибрати ті, сума яких дорівнює 50.
1. Створіть новий проект.
2. Додайте на форму десять компонентів CheckBox (див. рисунок). Властивостям Caption компонентів CheckBox надайте значень з набору чисел, запропонованих С. Лойдом: 25, 27, З, 12, 6, 15, 9, 30, 21, 19.
3. Додайте на форму два компоненти Label. Властивості Caption компонента Label1 надайте значення «Сума чисел:». Компонент Label2 призначений для виведення суми чисел, які відповідають вибраним прапорцям.
4. Опишіть змінну S як глобальну:
var Form1:TForm1;
S: Integer;
4. Створіть процедуру обробки події OnCreate для форми.
5. Змінна S набуває значення 0 при завантаженні форми:
procedure TFormi.FormCreate(Sender: TObject);
begin
S := 0;
end;
6. Створіть спільний для всіх прапорців обробник події OnCIick. У програмному коді реалізується такий алгоритм: якщо прапорець установлений, відповідне число додається до суми S, якщо прапорець скинутий, відповідне число віднімається від суми S. Після цього значення суми виводиться в напис І.аЬеІ2.
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
with (Sender as TCheckBox) do begin
If Checked Then
S := S + StrToInt(Caption)
Else s := S – StrToInt(Caption);
end;
Label2.Caption := IntToStr(S);
end;
7.Запустіть проект. Спробуйте розв’язати головоломку.