![]() |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
|
procedure TForm1.N7Click(Sender: TObject); begin CheckBox1.Checked:=False; CheckBox2.Checked:=False; CheckBox3.Checked:=False; end; procedure TForm1.N8Click(Sender: TObject); begin CheckBox1.Checked:=true; CheckBox2.Checked:=true; CheckBox3.Checked:=true; end; procedure TForm1.N9Click(Sender: TObject); begin if CheckBox1.Checked=True then CheckBox1.Checked:= False else CheckBox1.Checked:= True; if CheckBox2.Checked=True then CheckBox2.Checked:= False else CheckBox2.Checked:= True; if CheckBox3.Checked=True then CheckBox3.Checked:= False else CheckBox3.Checked:= True; end; |
Рис. 6.
Завдання для самоконтролю
Задано дійсні величини
. Розробити програму, яка обчислює значення суми з заданою точністю
і вказує кількість врахованих доданків:
1. 2.
3.
4. 5.
6.
7. 8.
9.
10. 11.
12.
13. 14.
15.
16. 17.
18.
19. 20.
Структуровані типи даних
Дата публикования: 2014-11-03; Прочитано: 272 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!