1.
Які з перелічених понять: 1) структурна декомпозиція, 2) інкапсуляція, 3) функціональна суперпозиція, 4) шаблон проектування, 5) перевантаження функцій, 6) поліморфізм поведінки, 7) наслідування, 8) структурованість зверху вниз, 9) алгоритмічна декомпозиція – є базовими для об’єктно-орієнтованого програмування? Номери правильних варіантів зазначте в порядку зростання.
2.
Виберіть правильне завершення такого твердження: «Інкапсуляція (в ООП) це –...»
1)... використання особливих протоколів доступу до даних.
2)... об’єднання даних і методів їх обробки, обмеження безпосереднього доступу до даних для підвищення надійності коду та приховання деталей реалізації.
3)... приховування даних в розділі реалізації модуля.
4)... спосіб проектування програм, згідно з яким доступ до даних має обмежене число користувачів.
3.
Виберіть правильне завершення такого твердження: «Поліморфізм поведінки (в ООП) це –...»
1)... здатність об’єктів певного класу по-різному відповідати на однакові повідомлення.
2)... здатність класів певної ієрархії змінювати власну поведінку залежно від потоку вхідних даних.
3)... здатність споріднених класів підтримувати однаковий протокол взаємодії, реалізуючи його у власний специфічний спосіб.
4)... здатність базового класу визначати різні способи створення об’єктів.
4.
Виберіть правильне завершення такого твердження: «Поліморфізм структур даних (в ООП) це –...»
1)... здатність структури містити екземпляри різних класів, пов’язаних наслідуванням.
2)... здатність структури змінювати внутрішню організацію.
3)... здатність структури перетворювати свої елементи за довільним заданим алгоритмом.
4)... здатність структури містити як елемент вкладені структури такого ж типу.
5.
Виберіть правильне завершення такого твердження: «Наслідування (в ООП) це –...»
1)... здатність класів мати таку саму структуру, як у базового класу.
2)... здатність класів отримувати від базового класу вибраний набір полів даних.
3)... спосіб оголошення нового класу на базі наявного так, що новий клас успадковує поля даних і функціональність базового.
4)... спосіб оголошення нового класу на базі наявного, що забороняє розширення функціональності нового класу.
6.
Виберіть правильне твердження з перелічених:
1) Усі екземпляри одного класу поділяють спільний набір полів та спільний набір методів.
2) Кожент екземпляр одного класу має власний набір полів та власний, окремий набір методів.
3) Усі екземпляри одного класу поділяють спільний набір полів та та кожен з них має власний набір методів.
4) Кожент екземпляр одного класу має власний набір полів та всі ці екземпляри поділяють спільний набір методів.
7.
Виберіть правильне завершення такого твердження: «Оголошення підкласу дає змогу...»
1)... уточнити, доповнити функціональність надкласу.
2)... узагальнити функціональність надкласу.
3)... використати частину функціональності надкласу.
4)... вилучити з оголошення класу зайві поля даних.
8.
Яким чином моделюють у програмі відношення «is-a» між сутностями реального світу? Наприклад, таке «Square is a Rectangle». Виберіть номер правильної відповіді.
1) Сутності моделюють двома різними незалежними класами: TSquare та TRectangle у наведеному прикладі.
2) Сутності моделюють класами, що перебувають у відношенні наслідування. У наведеному прикладі TRectangle – надклас, TSquare – підклас.
3) Сутності моделюють одним класом, що містить спеціальне поле для задання різновиду.
4) Сутності моделюють класами так, що у наведеному прикладі TSquare – надклас, TRectangle – підклас.
9.
Яким чином моделюють у програмі відношення «has-a» між сутностями реального світу? Наприклад, «Cylinder has a Circle». Виберіть номер правильної відповіді.
1) Сутності моделюють класами так, що полем одного з них є екземпляр іншого. У наведеному прикладі TCylinder містить поле типу TCircle.
2) Сутності моделюють класами, екземпляри яких пізніше включають в одну структуру.
3) Сутності моделюють класами, що перебувають у відношенні наслідування. У наведеному прикладі TCircle – надклас, TCylinder – підклас.
4) Сутності моделюють двома різними незалежними класами: TCircle та TCylinder у наведеному прикладі.
10.
Які з перелічених завдань: 1) створення екземплярів довільного типу, 2) оголошення протоколу взаємодії, 3) слугує базовим для побудови ієрархії класів, 4) визначення конкретної поведінки, 5) перевантаження функцій, 6) наслідування невідомої функціональності – виконує абстрактний клас? Номери правильних варіантів зазначте в порядку зростання.
11.
Який клас є спільним базовим для усіх класів у Object Pascal?
Виберіть номер правильної відповіді: 1) TClass; 2) object; 3) ProtoObject; 4) TObject; 5) CommonBase; 6) Такого класу нема.
12.
Як оголосити підклас MyClass на базі класу BaseClass мовою Object Pascal? Виберіть номер правильної відповіді:
1) type BaseClass(MyClass) = class … end;
2) class MyClass based on BaseClass … end;
3) class BaseClass subClass: MyClass … end;
4) type MyClass = subclass of BaseClass … end;
5) type MyClass = class(BaseClass) … end;
13.
Як правильно оголосити мовою Object Pascal поле даних цілого типу в класі MyCls?
Виберіть номер правильної відповіді:
1) type MyCls=class var i:integer; … end;
2) type MyCls=class field i:integer; … end;
3) type MyCls=class private i:integer; … end;
4) type MyCls=class var FInt:integer; … end;
5) type MyCls=class const i:integer; … end;
14.
Як позначають мовою Object Pascal доступну, відкриту частину оголошення класу?
Виберіть номер правильної відповіді: 1) public; 2) protected; 3) interface; 4) opened; 5) private.
15.
Як позначають мовою Object Pascal недоступну, закриту частину оголошення класу?
Виберіть номер правильної відповіді: 1) public; 2) protected; 3) implementation; 4) closed; 5) private.
16.
Як позначають мовою Object Pascal захищену частину оголошення класу?
Виберіть номер правильної відповіді: 1) public; 2) protected; 3) interface; 4) published; 5) private.
17.
Яку пам’ять займають екземпляри класів у об’єктній моделі Object Pascal?
Виберіть номер правильної відповіді: 1) статичну або стекову; 2) стекову; 3) статичну або динамічну; 4) лише динамічну; 5) лише статичну.
18.
Яким словом починають оголошення методу, що створює екземпляри класу (мовою Object Pascal)? Виберіть номер правильної відповіді: 1) function; 2) instance; 3) constructor; 4) procedure; 5) destructor; 6) class.
19.
Яким словом починають оголошення методу, що знищує екземпляри класу (мовою Object Pascal)? Виберіть номер правильної відповіді: 1) function; 2) instance; 3) constructor; 4) procedure; 5) destructor; 6) free.
20.
Яку ще директиву крім abstract вказують в оголошенні абстрактного методу (мовою Object Pascal)? Виберіть номер правильної відповіді: 1) overload; 2) override; 3) virtual; 4) dynamic; 5) reintroduce; 6) virtual або dynamic.
21.
Виберіть правильне завершення такого твердження: «Властивість (property) в оголошенні класу мовою Object Pascal...»
1)... впроваджує нове поле даних.
2)... об’єднує в одне поняття поле даних і методи доступу до нього.
3)... заборонена до використання.
4)... оголошує нову функціональність класу.
22.
Чи можна перевизначати поля даних у підкласах (мовою Object Pascal)?
Виберіть номер правильної відповіді: 1) ні, поля даних завжди успадковуються в повному складі; 2) так, але тільки віртуальні; 3) так, будь-які; 4) статичні – так, динамічні – ні.
23.
Які методи можна перевизначати у підкласах (мовою Object Pascal)?
Виберіть номер правильної відповіді: 1) ніякі не можна; 2) довільні; 3) статичні; 4) динамічні; 5) віртуальні.
24.
Виберіть правильне завершення такого твердження: «Метод читання простої властивості (property) в оголошенні класу мовою Object Pascal – це...»
1)... функція з одним параметром того ж типу, що й властивість.
2)... процедура з одним параметром того ж типу, що й властивість.
3)... функція з двома параметрами того ж типу, що й властивість.
4)... функція без параметрів, що повертає результат того ж типу, що й властивість.
25.
Виберіть правильне завершення такого твердження: «Метод запису простої властивості (property) в оголошенні класу мовою Object Pascal – це...»
1)... функція з одним параметром того ж типу, що й властивість.
2)... процедура з одним параметром того ж типу, що й властивість.
3)... поцедура з двома параметрами того ж типу, що й властивість.
4)... функція без параметрів, що повертає результат того ж типу, що й властивість.
26.
Виберіть правильне завершення такого твердження: «Метод читання властивості (property) з індексом в оголошенні класу мовою Object Pascal – це...»
1)... функція з одним параметром цілого типу, що повертає результат того ж типу, що й властивість.
2)... процедура з одним параметром того ж типу, що й властивість.
3)... процедура з двома параметрами: перший – цілого типу, другий – того ж типу, що й властивість.
4)... функція без параметрів, що повертає результат того ж типу, що й властивість.
27.
Виберіть правильне завершення такого твердження: «Метод читання властивості (property) з індексом в оголошенні класу мовою Object Pascal – це...»
1)... функція з одним параметром цілого типу, що повертає результат того ж типу, що й властивість.
2)... процедура з одним параметром того ж типу, що й властивість.
3)... процедура з двома параметрами: перший – цілого типу, другий – того ж типу, що й властивість.
4)... функція без параметрів, що повертає результат того ж типу, що й властивість.
28.
За допомогою якої директиви властивість (property) з індексом оголошують властивістю за замовчуванням класу мовою Object Pascal?
Виберіть номер правильної відповіді: 1) forward; 2) external; 3) main; 4) absolute; 5) default.
29.
Нехай оголошено клас
type MyCls = class private x:real;
public constructor Create(a:real); … end;
Як правильно утворити екземпляр цього класу? Виберіть номер правильної відповіді:
1) var c: MyCls; begin c:= MyCls.Create; …
2) var c: MyCls; begin c:= MyCls.Create(2.5); …
3) var c: MyCls; begin {екземпляр с вже створено} …
4) var c: MyCls; begin Create(с); …
5) var c: MyCls; begin c.Create(2.5); …
30.
Нехай оголошено клас
type MyClass = class private s: integer;
public constructor Create(a:integer); … end;
Як правильно утворити екземпляр цього класу? Виберіть номер правильної відповіді:
1) var A: MyClass; begin New(A, Create); …
2) var A: MyClass; begin c:= MyClass.Create(2.5); …
3) var A: MyClass; begin Create(с); …
4) var A: MyClass; begin {екземпляр A вже створено} …
5) var A: MyClass; begin A:= MyClass.Create(5); …
31.
За допомогою якого оператора мови Object Pascal можна перевірити тип об’єкта на етапі виконання програми? Виберіть номер правильної відповіді: 1) as; 2) with; 3) is; 4) self; 5) this.
32.
За допомогою якого оператора мови Object Pascal можна перетворити тип об’єкта на етапі виконання програми? Виберіть номер правильної відповіді: 1) as; 2) with; 3) is; 4) self; 5) this.
33.
Яка змінна в тілі кожного методу вказує на отримувача повідомлення (мова Object Pascal)? Виберіть номер правильної відповіді: 1) as; 2) result; 3) is; 4) self; 5) this.
34.
Для яких методів застосовується пізнє зв’язування? Виберіть номер правильної відповіді: 1) методи класу; 2) звичайні методи; 3) всі методи; 4) віртуальні методи; 5) методи опрацювання повідомлень операційної системи.
35.
Який оператор мови Object Pascal застосовують для гарантованого виконання частини програми у випадку виникнення винятків? Виберіть номер правильної відповіді: 1) try…finally…end; 2) with…do; 3) try…except…end; 4) while…do; 5) on…do.
36.
Який оператор мови Object Pascal застосовують для перехоплення винятків? Виберіть номер правильної відповіді: 1) try…finally…end; 2) with…do; 3) try…except…end; 4) while…do; 5) on…do.
37.
Який оператор мови Object Pascal застосовують для розпізнавання винятків? Виберіть номер правильної відповіді: 1) try…finally…end; 2) with…do; 3) try…except…end; 4) while…do; 5) on…do.
38.
Який оператор мови Object Pascal застосовують для запуску винятків? Виберіть номер правильної відповіді: 1) try…finally…end; 2) raise; 3) try…except…end; 4) while…do; 5) on…do.
39.
Який клас мови Object Pascal є базовим для ієрархії класів винятків? Виберіть номер правильної відповіді: 1) TObject; 2) WrongObject; 3) TClass; 4) Exception; 5) TExcept.
40.
Для яких методів застосовується раннє зв’язування? Виберіть номер правильної відповіді: 1) динамічні методи; 2) звичайні (статичні) методи; 3) всі методи; 4) віртуальні методи; 5) методи опрацювання повідомлень операційної системи.
41.
Нехай оголошено класи
type Base = class private id:integer; public … end;
Left = class(Base) private L:real; public … end;
Right = class(Base) private R:string; public … end;
Як оголосити масив для зберігання колекції десяти екземплярів довільних з цих класів? Виберіть номер правильної відповіді:
1) var C: array [1..10] of Base;
2) var C: array [1..10] of ^ TBase;
3) var C: array [1..10] of Left or Right;
4) var C: array [1..10] of (Base, Left, Right);
5) var C: array [1..10] of Base..Right;
42.
Нехай оголошено класи
type First = class private id:integer; public … end;
Second = class(First) private L:real; public … end;
Third = class(Second) private R:string; public … end;
Як оголосити масив для зберігання колекції семи екземплярів довільних з цих класів? Виберіть номер правильної відповіді:
1) var A: array [1..7] of First..Third;
2) var A: array [1..7] of @First;
3) var A: array [1..7] of First;
4) var A: array [1..7] of (First, Second, Third);
5) var A: array [1..7] of First and Second and Third;
43.
Нехай оголошено класи
type Base = class private id:integer; public … end;
Left = class(Base) private L:real; public … end;
Right = class(Base) private R:string; public … end;
Як оголосити динамічний масив для зберігання колекції екземплярів довільних з цих класів? Виберіть номер правильної відповіді:
1) var F: array of ^ TBase; 2) var F: array of Base; 3) var F: array of Left or Right;
4) var F: array of (Base, Left, Right); 5) var F: array of Base..Right;
44.
Нехай оголошено класи
type First = class private id:integer; public … end;
Second = class(First) private L:real; public … end;
Third = class(Second) private R:string; public … end;
Як оголосити динамічний масив для зберігання колекції екземплярів довільних з цих класів? Виберіть номер правильної відповіді:
1) var A: array of First..Third; 2) var A: array of @First;
3) var A: array of (First, Second, Third); 4) var A: array of First;
5) var A: array of First and Second and Third;
45.
Нехай оголошено класи
type First = class private id:integer; public … end;
Second = class(First) private L:real; public … end;
Third = class(Second) private R:string; public … end;
Як оголосити структуру для зберігання лінійного однозв’язного списку екземплярів довільних з цих класів? Виберіть номер правильної відповіді:
1) type List = ^ node; node = record val: @First; link:List end; var L: List;
2) type List = ^ node; node = record val: First; link:List end; var L: List;
3) type List = ^ node; node = record val: ^^ First; link:List end; var L: List;
4) type List = ^ node; node = record val: (First, Second, Third); link:List end; var L: List;
5) type List = ^ node; node = record val: First and Second and Third; link:List end; var L: List;
46.
Нехай оголошено класи
type Base = class private id:integer; public … end;
Left = class(Base) private L:real; public … end;
Right = class(Base) private R:string; public … end;
Як оголосити структуру для зберігання лінійного однозв’язного списку екземплярів довільних з цих класів? Виберіть номер правильної відповіді:
1) type List = ^ node; node = record val: @Base; link:List end; var L: List;
2) type List = ^ node; node = record val: Base and Left and Right; link:List end; var L: List;
3) type List = ^ node; node = record val: ^^ Base; link:List end; var L: List;
4) type List = ^ node; node = record val: (Base, Left, Right); link:List end; var L: List;
5) type List = ^ node; node = record val: Base; link:List end; var L: List;
47.
Нехай оголошено класи та змінні
type Base = class private id:integer; public … end;
Left = class(Base) private L:real; public … end;
Right = class(Base) private R:string; public … end;
var A: Base; B: Left; C: Right;
Вкажіть номер оператора, в якому неправильно виконано присвоєння:
1) A:=B; 2) B:=C; 3) A:=C; 4) A:=nil;
48.
Нехай оголошено класи та змінні
type First = class constructor Create; … end;
Second = class(First) … end;
Third = class(Second) … end;
var A: First; B: Second; C: Third;
Вкажіть номер оператора, в якому неправильно виконано присвоєння:
1) A:=B; 2) B:=C; 3) A:=C; 4) B:=A; 5) A:=Second.Create;
49.
Нехай оголошено класи та змінні
type Base = class private x:real; public constructor Create(a:real); … end;
Left = class(Base) … end;
Right = class(Base) … end;
var A: Base; B: Left; C: Right;
Вкажіть номер оператора, в якому неправильно виконано присвоєння:
1) A:=Base.Create(1); 2) A:=Left.Create(2); 3) A:=Right.Create(3);
4) A:=nil; 5) B:=Base.Create(1.5);
50.
Нехай оголошено класи та змінні
type First = class constructor Create; … end;
Second = class(First) … end;
Third = class(Second) … end;
var A: First; B: Second; C: Third;
Вкажіть номер оператора, в якому неправильно виконано присвоєння:
1) A:=B; 2) C:=First.Create; 3) A:=C; 4) B:=nil; 5) A:=Second.Create;
51.
Яку з компонент бібліотеки VCL використовують для побудови вікна аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
52.
Яку з компонент бібліотеки VCL використовують для додавання кнопок до вікна аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
53.
Яку з компонент бібліотеки VCL використовують як контейнер для групування елементів вікна аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
54.
Яку з компонент бібліотеки VCL використовують для відображення та редагування рядка тексту? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
55.
Яку з компонент бібліотеки VCL використовують для відображення та редагування багаторядкового тексту? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
56.
Яку з компонент бібліотеки VCL використовують для відображення напису в вікні аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
57.
Яку з компонент бібліотеки VCL використовують для побудови меню віконної аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
58.
Яку з компонент бібліотеки VCL використовують для візуального відокремлення частин вікна аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
59.
Яку з компонент бібліотеки VCL використовують для додавання кнопок з написом і піктограмою до вікна аплікації? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TMainMenu; 4) TForm; 5) TPanel; 6) TBitBtn; 7) TMemo; 8) TEdit.
60.
Яку з компонент бібліотеки VCL використовують для відображення у вікні аплікації простих геометричних фігур? Виберіть номер правильної відповіді: 1) TLabel; 2) TButton; 3) TShape; 4) TForm; 5) TPanel; 6) TBevel; 7) TMemo; 8) TEdit.
61.
З якою метою використовують компоненту класу TSaveDialog бібліотеки VCL? Виберіть номер правильної відповіді:
1) для завантаження файлів;
2) для зберігання файла;
3) для керування діалогом вибору імені файла для зберігання;
4) для керування діалогом вибору імені файла для зчитування;
5) для керування процесом зберігання даних до файла.
62.
З якою метою використовують компоненту класу TOpenDialog бібліотеки VCL? Виберіть номер правильної відповіді:
1) для завантаження файлів;
2) для зберігання файла;
3) для керування діалогом вибору імені файла для зберігання;
4) для керування діалогом вибору імені файла для зчитування;
5) для керування процесом завантаження даних з файла.
63.
З якою метою використовують компоненту класу TPopupMenu бібліотеки VCL? Виберіть номер правильної відповіді:
1) для створення меню вікна аплікації;
2) для створення контекстного меню довільної частини вікна аплікації;
3) для керування частинами меню аплікації;
4) для створення будь-яких меню в аплікації.
64.
З якою метою використовують компоненту класу TMenuItem бібліотеки VCL? Виберіть номер правильної відповіді:
1) для створення меню вікна аплікації;
2) для створення контекстного меню довільної частини вікна аплікації;
3) для керування частинами меню аплікації;
4) для створення будь-яких меню в аплікації;
5) для відображення окремих пунктів довільних меню в аплікації.
65.
З якою метою використовують компоненту класу TToolBar бібліотеки VCL? Виберіть номер правильної відповіді:
1) для створення меню вікна аплікації;
2) як контейнер для створення панелі інструментів вікна аплікації;
3) для керування частинами вікна аплікації;
4) як контейнер для створення рядка стану аплікації;
5) як контейнер, що містить синхронізатори реагування елементів керування на дії користувача.
66.
З якою метою використовують компоненту класу TStatusBar бібліотеки VCL? Виберіть номер правильної відповіді:
1) для створення меню вікна аплікації;
2) як контейнер для створення панелі інструментів вікна аплікації;
3) для керування частинами вікна аплікації;
4) як контейнер для створення рядка стану аплікації;
5) як контейнер, що містить синхронізатори реагування елементів керування на дії користувача.
67.
З якою метою використовують компоненту класу TActionList бібліотеки VCL? Виберіть номер правильної відповіді:
1) для створення меню вікна аплікації;
2) як контейнер для створення панелі інструментів вікна аплікації;
3) для керування частинами вікна аплікації;
4) як контейнер для створення рядка стану аплікації;
5) як контейнер, що містить синхронізатори реагування елементів керування на дії користувача.
68.
З якою метою використовують компоненту класу TThread бібліотеки VCL? Виберіть номер правильної відповіді:
1) для створення нового потоку обчислень та керування ним;
2) для створення процесу обміну даними між аплікаціями;
3) для керування іншими аплікаціями;
4) як контейнер для створення вкладеного коду аплікації.
69.
З якою метою використовують компоненту класу TRadioGroup бібліотеки VCL? Виберіть номер правильної відповіді:
1) для візуального групування елементів керування вікна аплікації;
2) для створення процесу обміну даними між аплікаціями;
3) для відображення групи альтернативних перемикачів та взаємодії з нею;
4) як контейнер для залежних візуальних компонент.
70.
З якою метою використовують компоненти класу TCheckBox бібліотеки VCL? Виберіть номер правильної відповіді:
1) для візуального групування елементів керування вікна аплікації;
2) для створення процесу обміну даними між аплікаціями;
3) для відображення групи альтернативних перемикачів та взаємодії з нею;
4) для відображенн незалежних перемикачів і взаємодії з ними.
71.
За якою з перелічених властивостей компонент бібліотеки VCL їх ідентифікують в програмі? Вкажіть номер правильної відповіді: 1) Caption; 2) Name; 3) Anchors; 4) Enabled; 5) Top; 6) Left; 7) Owner; 8) Parent; 9) Hint.
72.
За якою з перелічених властивостей візуальних компонент бібліотеки VCL відображає напис на компоненті? Вкажіть номер правильної відповіді: 1) Caption; 2) Name; 3) Anchors; 4) Enabled; 5) Top; 6) Left; 7) Owner; 8) Parent; 9) Hint.
73.
За якою з перелічених властивостей компонент бібліотеки VCL можна встановити власника компоненти? Вкажіть номер правильної відповіді: 1) Caption; 2) Name; 3) Anchors; 4) Enabled; 5) Top; 6) Left; 7) Owner; 8) Parent; 9) Hint.
74.
За якою з перелічених властивостей компонент бібліотеки VCL можна встановити відповідального за перемальовування компоненти? Вкажіть номер правильної відповіді: 1) Caption; 2) Name; 3) Anchors; 4) Enabled; 5) Top; 6) Left; 7) Owner; 8) Parent; 9) Hint.
75.
Яка з перелічених властивостей компоненти TMemo бібліотеки VCL містить текст, введений користувачем? Вкажіть номер правильної відповіді: 1) Caption; 2) Name; 3) Text; 4) Enabled; 5) Item; 6) Lines; 7) Owner; 8) Parent; 9) Hint.
76.
Яка з перелічених властивостей компоненти TEdit бібліотеки VCL містить текст, введений користувачем? Вкажіть номер правильної відповіді: 1) Caption; 2) Name; 3) Text; 4) Enabled; 5) Item; 6) Lines; 7) Owner; 8) Parent; 9) Hint.
77.
Яким з перелічених методів запускають на виконання стандартні діалоги бібліотеки VCL? Вкажіть номер правильної відповіді: 1) Open; 2) Show; 3) ShowModal; 4) SetEnabled; 5) Execute; 6) Run.
78.
Яким з перелічених методів запускають на виконання власноруч створений діалог так, щоб він не дозволив взаємодіяти з аплікацією до завершення діалога? Вкажіть номер правильної відповіді: 1) Open; 2) Show; 3) ShowModal; 4) SetEnabled; 5) Execute; 6) Run.
79.
Яким з перелічених методів запускають на виконання власноруч створений діалог у звичайному (не модальному) режимі? Вкажіть номер правильної відповіді:
1) Open; 2) Show; 3) ShowModal; 4) SetEnabled; 5) Execute; 6) Run.
80.
Яку з подій аплікації опрацьовують, щоб виконати певну роботу в фоновому режимі? Вкажіть номер правильної відповіді:
1) OActivaten; 2) OnHint; 3) OnHelp; 4) OnMessage; 5) OnException; 6) OnIdle.
81.
Що надрукує програма
program P005;
type One = class procedure Show; virtual; end;
Two = class(One) procedure Show; override; end;
procedure One.Show; begin write('-one'); end;
procedure Two.Show; begin write('+two'); end;
var a, b: One;
begin a:= Two.Create; b:= One.Create;
a.Show; b.Show; a.Show; end.
Виберіть номер правильної відповіді:
1) +two-one+two; 2) –one-one-one; 3) +two+two+two; 4) повідомлення про помилку.
82.
Що надрукує програма
program P005;
type One = class procedure Show; virtual; end;
Two = class(One) procedure Show; override; end;
procedure One.Show; begin write('_A'); end;
procedure Two.Show; begin write('_B'); end;
var a, b, c: One;
begin a:= One.Create; b:= Two.Create; c:= One.Create;
a.Show; b.Show; b.Show; c.Show; end.
Виберіть номер правильної відповіді:
1) _A_A_A_A; 2) _B_B_B_B; 3) _A_B_B_A; 4) повідомлення про помилку; 5) _A_B_B_C.
83.
Що надрукує програма
program P005;
type One = class procedure Show; virtual; end;
Two = class(One) procedure Show; override; end;
procedure One.Show; begin write('11'); end;
procedure Two.Show; begin write('2'); end;
var a, b, c: One;
begin a:= One.Create; b:= Two.Create;
c:=b; c.Show; b.Show; c:=a; c.Show; end.
Виберіть номер правильної відповіді:
1) 2112; 2) 2211; 3) 112211; 4) повідомлення про помилку; 5) 221122.
84.
Що надрукує програма
program P005;
type One = class procedure Show; virtual; end;
Two = class(One) procedure Show; override; end;
procedure One.Show; begin write('X'); end;
procedure Two.Show; begin write('O'); end;
var a, b, c: One;
begin a:= Two.Create; b:= One.Create;
c:=b; a.Show; c.Show; c:=a; c.Show; end.
Виберіть номер правильної відповіді:
1) XXX; 2) повідомлення про помилку; 3) OOO; 4) OXO; 5) XOX.
85.
Що надрукує програма
program P005;
type One = class procedure Show; virtual; end;
Two = class(One) procedure Show; override; end;
procedure One.Show; begin write('On'); end;
procedure Two.Show; begin write('T'); inherited Show; end;
var a, b: One;
begin a:= Two.Create; b:= One.Create;
b.Show; a.Show; a.Show; end.
Виберіть номер правильної відповіді:
1) повідомлення про помилку; 2) OnOnOn; 3) TTT; 4) OnTOnTOn; 5) OnTT.
86.
Що надрукує програма
program P005;
type ABC = class procedure Show; virtual; abstract; end;
TEast = class(ABC) procedure Show; override; end;
TWest = class(ABC) procedure Show; override; end;
procedure TEast.Show; begin write('E'); end;
procedure TWest.Show; begin write('W'); end;
var a, b: ABC; c: TWest;
begin a:= TEast.Create; b:= TWest.Create; c:= b as TWest;
b.Show; a.Show; a.Show; c.Show; end.
Виберіть номер правильної відповіді:
1) повідомлення про помилку; 2) WEEW; 3) EEWW; 4) EWWE; 5) EEEE.
87.
Що надрукує програма
program P005;
type ABC = class procedure Show; virtual; abstract; end;
DEF = class(ABC) procedure Show; override; end;
GHI = class(ABC) procedure Show; override; end;
procedure DEF.Show; begin write('D'); end;
procedure GHI.Show; begin write('I'); end;
var a, b: ABC; c: GHI;
begin a:= DEF.Create; b:= GHI.Create; c:= b as GHI;
c.Show; a.Show; a.Show; b.Show; end.
Виберіть номер правильної відповіді:
1) повідомлення про помилку; 2) DDDD; 3) IIII; 4) DIID; 5) IDDI.
88.
Що надрукує програма
program P005;
type ABC = class procedure Show; virtual; abstract; end;
DEF = class(ABC) procedure Show; override; end;
GHI = class(DEF) procedure Show; override; end;
procedure DEF.Show; begin write('*'); end;
procedure GHI.Show; begin inherited Show; write('I'); end;
var a, b: ABC;
begin a:= DEF.Create; b:= GHI.Create;
b.Show; a.Show; a.Show; b.Show; end.
Виберіть номер правильної відповіді:
1) ****; 2) *I***I; 3) IIII; 4) I**I; 5) повідомлення про помилку.
89.
Що надрукує програма
program P005;
type TGrd = class function get():char; virtual; abstract; end;
Jan = class(TGrd) function get():char; override; end;
Mar = class(Jan) function get():char; override; end;
function Jan.get():char; begin result:='*'; end;
function Mar.get():char; begin result:='V'; end;
var a, b, c: TGrd; s: string;
begin a:= Jan.Create; b:= Mar.Create; c:= b;
s:= c.get()+a.get()+b.get(); write(s); end.
Виберіть номер правильної відповіді:
1) ***; 2) *V*; 3) V*V; 4) VVV; 5) повідомлення про помилку.
90.
Що надрукує програма
program P005;
type TLet = class function get():char; virtual; abstract; end;
TEx = class(TLet) function get():char; override; end;
TOu = class(TLet) function get():char; override; end;
function TEx.get():char; begin result:='X'; end;
function TOu.get():char; begin result:='o'; end;
var a, b, c: TLet; s: string;
begin a:= TEx.Create; b:= TOu.Create; c:= b;
s:= a.get()+c.get()+b.get(); write(s); end.
Виберіть номер правильної відповіді:
1) Xoo; 2) XXX; 3) ooo; 4) oXX; 5) повідомлення про помилку.
91.
Що надрукує програма
program Prg007;
type TBase = class private id: integer;
public constructor Create(i: integer);
procedure print; virtual; end;
TDesc = class(TBase) procedure print; override; end;
constructor TBase.Create(i:integer); begin id:=i; end;
procedure TBase.print; begin write(id); end;
procedure TDesc.print; begin inc(id); write(id); end;
const n=3; var a:array[1..n]of TBase; i,k:integer;
begin for k:=1 to n do begin read(i); if odd(i)
then a[k]:=TDesc.Create(i) else a[k]:=TBase.Create(i); end;
for i:=1 to n do a[i].print;
end.
якщо у стандартному вхідному файлі задано '2 3 4'?
92.
Що надрукує програма
program Prg007;
type TParent = class private a,b:integer;
public constructor Create(x,y:integer);
function calc:integer; virtual; abstract; end;
TSon = class(TParent) function calc:integer; override; end;
TDaut = class(TParent) function calc:integer; override; end;
constructor TParent.Create(x,y:integer); begin a:=x; b:=y; end;
function TSon.calc:integer; begin result:=a+b; end;
function TDaut.calc:integer; begin result:=a*b; end;
var a,b,c:TParent; p,q,r:integer;
begin
a:=TSon.Create(2,2); p:=a.calc; b:=TDaut.Create(1,3); q:=b.calc;
if p>q then c:=TSon.Create(p,5) else c:=TDaut.Create(q,10);
r:=c.calc; write(p,q,r);
end.
93.
Що надрукує програма
program Prg007; const k=3;
type TOne = class private n: integer;
public constructor Create(i: integer);
procedure show; virtual; end;
TTwo = class(TOne) procedure show; override; end;
constructor TOne.Create(i: integer); begin n:=i; end;
procedure TOne.show; begin write(n); end;
procedure TTwo.show; begin write(2*n); end;
var a: array [1..k] of TOne; i, x: integer;
begin
for i:=1 to k do begin read(x);
if x<5 then a[i]:= TTwo.Create(x)
else a[i]:= TOne.Create(x); end; {for}
for i:=1 to k do a[i].show;
end.
якщо у стандартному вхідному файлі задано '2 7 3'?
94.
Що надрукує програма
program Prg007; const n=3;
type TRoot = class private id: integer;
public constructor Create(i: integer);
procedure print; virtual; end;
TBranch = class(TRoot) procedure print; override; end;
constructor TRoot.Create(i: integer); begin id:=i+1; end;
procedure TRoot.print; begin write(id); end;
procedure TBranch.print; begin dec(id); write(id); end;
var a: array [1..n] of TRoot; i, k: integer;
begin
for k:=1 to n do begin read(i);
if not odd(i) then a[k]:= TRoot.Create(i)
else a[k]:= TBranch.Create(i); end; {for}
for i:=1 to n do a[i].print;
end.
якщо у стандартному вхідному файлі задано '0 4 7'?
95.
Що надрукує програма
program Prg007;
type TBase = class private a, b: integer;
public constructor Create(x, y: integer);
function calc:integer; virtual; abstract; end;
TSum = class(TBase) function calc: integer; override; end;
TMult = class(TBase) function calc: integer; override; end;
constructor TBase.Create(x, y: integer); begin a:=x; b:=y; end;
function TSum.calc: integer; begin result:=a+b; end;
function TMult.calc:integer; begin result:=a*b; end;
var a, b, c: TBase; p, q, r: integer;
begin
a:= TSum.Create(2, 0); p:=a.calc; b:= TMult.Create(0, 2); q:=b.calc;
if p>q then c:= TSum.Create(p-1, 5) else c:= TMult.Create(q+1, 10);
r:=c.calc; write(p, q, r);
end.
96.
Що надрукує програма
program Prg007;
type TOper = class private a: integer;
public constructor Create(x: integer);
function calc(y: integer): integer; virtual; abstract; end;
TIncr = class(TOper) function calc(y: integer): integer; override; end;
TTimes = class(TOper) function calc(y: integer): integer; override; end;
constructor TOper.Create(x: integer); begin if x=0 then a:=1 else a:=abs(x); end;
function TIncr.calc(y: integer): integer; begin result:=a+y; end;
function TTimes.calc(y: integer): integer; begin result:=a*y; end;
var a, b, c: TOper; p, q, r: integer;
begin
a:= TIncr.Create(-5); p:=a.calc(0); b:= TTimes.Create(3); q:=b.calc(2);
if p>q then c:= TIncr.Create(p) else c:= TTimes.Create(q);
r:=c.calc(5); write(p, q, r);
end.
97.
Що надрукує програма
program Prg007;
type TVal = class private v: integer;
public constructor Create(i: integer);
procedure writeOut; virtual; end;
TDouble = class(TVal)
constructor Create(i: integer); end;
constructor TVal.Create(i:integer); begin v:=i; end;
procedure TVal. writeOut; begin write(v); end;
constructor TDouble.Create(i:integer); begin inherited Create(i*2); end;
const n=3; var a:array[1..n]of TVal; i,k:integer;
begin for k:=1 to n do begin read(i); if odd(i)
then a[k]:=TDouble.Create(i) else a[k]:=TVal.Create(i); end;
for i:=1 to n do a[i].writeOut;
end.
якщо у стандартному вхідному файлі задано '3 7 8'?
98.
Що надрукує програма
program Prg007; const n = 3;
type TOp = class private a, b: integer;
public constructor Create(x, y: integer);
function calc:integer; virtual; abstract; end;
TAdd = class(TOp) function calc: integer; override; end;
TSub = class(TOp) function calc: integer; override; end;
constructor TOp.Create(x, y: integer); begin a:=x; b:=y; end;
function TAdd.calc: integer; begin result:=a+b; end;
function TSub.calc:integer; begin result:=a–b; end;
var a: array [1..n] of TOp; i: integer;
begin
a[1]:= TSub.Create(3, 1); a[2]:= TAdd.Create(3, 1);
a[3]:= TAdd.Create(n+1, n–2); for i:=1 to n do write(a[i].calc);
end.
99.
Що надрукує програма
program Prg007; const n=3;
type TRoot = class private id: integer;
public constructor Create(i: integer);
procedure print; virtual; end;
TBranch = class(TRoot) procedure print; override; end;
constructor TRoot.Create(i: integer); begin id:=i+1; end;
procedure TRoot.print; begin write(id); end;
procedure TBranch.print; begin dec(id); write(id); end;
var a: array [1..n] of TRoot; i, k: integer;
begin
for k:=1 to n do begin read(i);
if not odd(i) then a[k]:= TRoot.Create(i)
else a[k]:= TBranch.Create(i); end; {for}
for i:=1 to n do a[i].print;
end.
якщо у стандартному вхідному файлі задано '3 2 0'?
100.
Що надрукує програма
program Prg007; const k=3;
type TOne = class private n: integer;
public constructor Create(i: integer);
procedure show; virtual; end;
TTwo = class(TOne) procedure show; override; end;
constructor TOne.Create(i: integer); begin n:=i; end;
procedure TOne.show; begin write(n); end;
procedure TTwo.show; begin write(2*n); end;
var a: array [1..k] of TOne; i, x: integer;
begin
for i:=1 to k do begin read(x);
if x<5 then a[i]:= TTwo.Create(x)
else a[i]:= TOne.Create(x); end; {for}
for i:=1 to k do a[i].show;
end.
якщо у стандартному вхідному файлі задано '4 6 2'?
Дата добавления: 2015-08-27; просмотров: 118 | Нарушение авторских прав
| <== предыдущая лекция | | | следующая лекция ==> |
| 1.При каком состоянии автомобиля его дальнейшая эксплуатация невозможна или не целесообразна | | | 1.Вопрос Согласно учредительным документам, уставный капитал компании, зарегистрированной в сентябре 2012 года, – 1 000 000 руб. Предположим, что по состоянию на 31 декабря 2012 года учредители |