3. Дополнительные задания

1. Изменить интерфейс программы: шрифты, цвет экрана и букв.

2. Выполнить проект так, чтобы при правильном выборе названия физической величины слово в левом списке исчезало.

Подсказка. В процедуру, относящуюся к ListBox2, там, где обрабатывается правильный ответ, включить:

ListBox1.Items.Delete(Num1);

ListBox1.Items.Insert(Num1, ‘ ’);

3. Расширить количество физических величин до 10. Внести необходимые изменения в программу.

Литература:

1. С. И. Бобровский. Учебный курс Delphi7. Питер, 2006г.

2. Г.Г. Рапаков, С.Ю. Ржеуцкая. Программирование на языке Паскаль. Санкт-Петербург, 2005г.

3. Н.Культин. Учебный курс Delphi. Санкт-Петербург, 2005г.

4. Н.Культин. Delphi в задачах и примерах. Санкт-Петербург, 2005г.

5. Е.Р. Алексеев, О.В. Чесноков. Шаг за шагом. Москва, 2005г.

Контроль

Вопросы:

1. Условный оператор (if ).

2. Оператор выбора (case).

3. Что такое подпрограмма?

4. Что такое формальный и фактический параметры?

5. Что такое функция?

6. Каков общий вид инструкции обращения к функции?

7. Как объявляют функцию?

8. Что такое процедура?

9. Как объявляют процедуру?

10. Какова инструкция вызова процедуры?

11. Три принципа объектного программирования: наследование, полиморфизм, инкапсуляция.

12. Что такое класс?

13. Что такое деструктор и конструктор?

14. Что такое событие?

15. Что такое метод?

16. В какой вкладке палитры компонентов находится компонент ListBox?

17. Что содержит свойство Items компонента ListBox?

18. Назначение свойства ItemIndex компонента ListBox.

Тема №26. Основы программирования в среде Delphi

Цель: Знакомство со структурными типами данных: массивами, записями, строками. Изучить компонент StringGrid и его основные свойства и методы.

Задачи обучения: Формирование умений и навыков работы с интегрированной средой Delphi 7, с панелями библиотеки визуальных компонентов, с компонентом StringGrid.

Основные вопросы темы:

1. Структурные типы данных: массивы, записи, строки.

2. Компонент StringGrid, его основные свойства (определение данных в фиксированной строке и столбце, использование данных из ячейки – cells).

3. Решение медицинских задач.

Методы обучения и преподавания: выполнение типовых заданий

Задание

Разработка проекта «Ввод и вывод массива»

1. Постановка задачи

Создать программу, с помощью которой можно выполнить:

после запуска программы пользователь вводит значения элементов массива. При нажатии кнопки Вычислить программа вычисляет сумму элементов массива и среднее арифметическое значение элементов массива (рис.24.7).

Рисунок 24.7

Пояснения: Новым в этой работе будет использование:

- компонента StringGrid;

- оператора цикла for.

2. План разработки программы

1. Открыть новый проект. Дать название форме Ввод и обработка массива.

2. Разместить на форме компоненты в соответствии с рисунком 24.8.

Рисунок 24.8

3. Сохранить проект в отдельной папке под именем, например, Pr5.pas и Project5.dpr в отдельной папке.

4. Запустить программу, затем закрыть окно проекта с помощью комбинаций клавиш Alt+F4.

5. Выполнить следующие действия:

Выделенная компонента	Окно инспектора объектов	Имя свойства	Действие
Label1	Параметры (Properties)	Caption	Введите массив целых чисел
Label2	Параметры (Properties)	Caption	Удалить название
StringGrid1	Параметры (Properties)	ColCount	5
		FixedCols	0
		RowCount	1
		DefaultRowHeight	24
		Height	24
		DefaultColWidth	64
		Width	330
		Options.goEditing	True
		Options.Always ShowEditor	True
		Options.goTabs	True
BitBtn1	Параметры (Properties)	Kind	bkOK
		Caption	Вычислить
	События (Events)	OnClick	for i:=1 to 5 do if length(StringGrid1.Cells[i-1,0]) <> 0 then a[i]:=StrToInt(StringGrid1.Cells[i-1,0]) else a[i]:=0; summ:=0; for i:=1 to 5 do summ:=summ+a[i]; sr:=summ/5; Label2.Caption:= 'Сумма элементов:' + IntToStr(summ) + #13 + 'Среднее арифметическое:' + FloatToStr(sr);

Между названием процедуры для кнопки Вычислить (BitBtn1) и словом begin описать переменные:

var

a:array[1..5] of integer;

summ:integer;

sr:real;

i:integer;

6. Сохранить проект, запустить и протестировать его.