Методическое пособие 555

Задание 6. Добавьте в класс MotorcycleClass конструктор, который вызывает метод Initialize.

Решение. Добавьте в секцию public класса MotorcycleClass следующий конструктор:

constructor Create; begin

inherited Create; Initialize;

end;

Задание 7. Ниже под описанием классов и методов добавьте следующий основной блок программы:

var

//объекты объявленных выше классов

Vehicle: VehicleClass;

Cycle: MotorcycleClass;

begin

//Создаем объекты //здесь будет вызван конструктор

Vehicle := new VehicleClass; Cycle := new MotorcycleClass;

//Описания мотоцикла с заданными // конструктором значениями Writeln('Мотоцикл по умолчанию: ',

Cycle.Describe);

//Задаем свойства транспортного средства // и мотоцикла

Vehicle.SetAll(3.2, 5, 180, 5600); Cycle.SetAll(3.4, 5, 52, 5900, 16.9, 'черный');

Writeln('Транспортное средство: ',

Vehicle.Describe);

Writeln('Мотоцикл: ',Cycle.Describe);

151

Writeln('Перекрасим мотоцикл!'); //Меняем цвет мотоцикла изменяя //свойство объекта,

//будет вызван соответствующий set-метод

Cycle.Exterior := 'Зеленый'; Writeln('Новый мотоцикл:', Cycle.Describe);

end.

Если все было сделано правильно, должен быть получен примерно такой результат, как показан на рисунке.

3. Контрольные вопросы и задания

1. Поясните, в чем состоит суть понятий класса и объек-

та.

2. В чем состоит суть основных принципов ООП: инкапсуляции, полиморфизма и наследования?

3. Какие преимущества дает использование ООП?

4. Как объявить класс в языке PascalABC.Net?

5.Чем отличаются члены класса, объявленные в разде-

лах private и public?

6.Что представляют собой поля, методы и свойства?

7.Для чего используются свойства? Что означают спецификаторы доступа read и write?

8.Как объявить класс, наследуемый от некоторого другого класса?

9.Что означает переопределение методов класса-предка при наследовании классов? Для чего используется ключевое

слово inherited?

10. Что такое перегрузка методов?

11. Как объявить объект некоторого класса?

152

12. Как создать объект (выделить под него память)?

13. Для чего предназначены конструкторы и деструкторы? В какой момент запускается конструктор?

153

БИБЛИОГРАФИЧЕСКИЙ СПИСОК

1. Несен А.В. Microsoft Word 2010: от новичка к профес-

сионалу / А.В. Несен. – М.: COJIOH-ПРЕСС, 2011. – 448 с.

2. Лебедев А. Понятный самоучитель Excel 2013 / А. Лебедев. – СПб.: Питер, 2014. – 128 с.

3.Леонтьев В.П. Office 2016. Новейший самоучитель / В.П. Леонтьев. – М.: Эксмо, 2015. – 368 с.

4.Информатика. Базовый курс / под ред. С.В. Симонови-

ча. – СПб.: Питер, 2005. – 640 с.

5.Керман М.К. Программирование и отладка в Delphi / М.К. Керман. – М.: Издательский дом «Вильямс», 2003. – 672 с.

6.Коффман Э. Turbo Pascal / Э. Коффман. – М.: Издательский дом «Вильямс», 2003. – 896 с.

7.Шилдт Г. C++: базовый курс / Г. Шилдт. – М.: Издательский дом «Вильямс», 2011 г. – 624 с.

8.Павловская Т.А. Паскаль. Программирование на языке высокого уровня / Т.А. Павловская. – СПб.: Питер, 2007. –

393 с.

9.Потапахин В.В. Turbo Pascal: решение сложных задач / В.В. Потопахин. – СПб.: БХВ-Петербург, 2006. – 208 с.

10.Фаронов В.В. Turbo Pascal / В.В. Фаронов. – СПб.: БХВ-Петербург, 2004. – 1056 с.

11.Справка PascalABC.Net. [Электронный ресурс]. Ре-

жим доступа: http://pascalabc.net/downloads/pabcnethelp/ index.htm.

154

155