- •Перелік описових питань.
- •Що таке підпрограми?
- •Що таке глобальні та локальні змінні?
- •Що таке бiблiотека? Які існують типи бібліотек?
- •Для чого призначені компоненти ScrollBars, ComboBox, RadioButton?
- •Що таке файл? Наведіть приклад оголошення файлу?
- •Наведіть опис процедури AssignFile, поясніть її призначення.
- •Наведіть процедуру для відкриття файлу у режимі додавання даних, створення нового файлу, закриття файлу.
- •Поясніть чому можуть виникати помилки відкриття файлів? Для чого потрібна функція іoResult?
- •Для чого потрібна функція DateToStr, функція Date? Коли виникає подія OnActivate?
- •Що таке вказівники?
- •Що таке динамічна змінна? Які інструкції використовуються для створення та знищення динамічних змінних?
- •Що таке реляційна база даних?
- •Які компоненти забезпечують доступ до бази даних, їх призначення?
- •Призначення компонента dbNavigator?.
- •Що таке властивість Canvas? Які властивості визначають розмір полотна?
- •Поясніть фрагмент коду:
- •Наведіть методи, що дозволяють накреслити на формі: ламану лінію, еліпс, прямокутник, багатокутник, сектор?
- •Для чого призначені компоненти Animate та MediaPlayer?
- •Що таке рекурсивна функція?
- •Для чого використовується компонент tMainMenu?
- •Що таке інтегроване середовище розробки програми Delphi?
- •Призначення вікна Object Inspector?
- •Що таке властивості об’єкту?
- •Що таке події?
- •Які перетворення здійснюють функції StrToInt і strToFloat та IntToStr і FloatToStr?
- •Що таке Code Templates, як ними користуватись?
- •Що таке Ехе-файл, з яких файлів складається проект Delphi?
- •Для чого потрібна програма InstallShield Express?
- •Перелічте правила запису арифметичних виразів.
- •Що таке підпрограми, їх призначення?
- •Що таке директиви компіляторові?
- •Наведіть загальний опис інструкції case
- •Що таке керуючі конструкції мови Delphi?
- •Перерахуйте та поясніть основні функції для роботи зі string-даними
- •Перерахуйте та поясніть основні функції для перетворення string-даних
- •Який об’єм пам’яті виділяється для збереження символів? Скільки всього різних символів є припустимо в Object Pascal?
- •Які операції можна виконувати над символами
- •Що таке компонент CheckBox? Що визначає властивість Checked компоненту CheckBox?
- •Перелік практичних завдань.
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
- •Чому дорівнює значення змінної k після виконання фрагменту програми:
Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
procedure TForm1.ButtonlClick(Sender: TObject);
const SIZE=5;
var a:array[1..SIZE]of integer; min:integer; i:integer;
begin
for i:=1 to SIZE do
a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);
min:=1;
for i:=2 to 0 do
if a[i]< a[min] then min:=i;
end;
a:array(1..SIZE) of integer;
a[i]:=IntToStr(StringGrid1.Cells[i-1,0]);
for i:=2 to SIZE do;
if a[i]:= a[min] then min:=i;
Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
procedure TForm1.ButtonlClick(Sender: TObject);
const SIZE=5;
var a:array(1..SIZE) of integer; min:integer; i:integer;
begin
for i:=1 to SIZE do
a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);
min:=1;
for i:=2 to SIZE do
if a[i]< a[min] then min:=i;
end;
a:array[1..SIZE]of integer;
a[i]:=StrToFloat(StringGrid1.Cells[i-1,0]);
for i:=2 to 0 do;
if a[0]< a[min] then min:=i;
Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
procedure TForm1.ButtonlClick(Sender: TObject);
const SIZE=5;
var a:array[1..SIZE]of integer; min:integer; i:integer;
begin
for i:=1 to SIZE do
a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);
min:=1;
for i:=2 to SIZE do
if a[i]:= a[min] then min:=i;
end;
a:array[1..5,5] of integer;
a[i]:=DateToInt(StringGrid1.Cells[i-1,0]);
for i=2 to SIZE do;
if a[i]< a[min] then min:=i;
Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
procedure TForml.Button1Click(Sender: TObject);
begin
if (Length(edit1.text):=0) or (Length(edit2.text):=0)
then ShowMessage('Помилка введення даних.' +#13+'Заповніть поля.')
else writeln(db, edit1.text,' ',edit2.text);
end;
(Length(edit1.text)=0) or (Length(edit2.text)=0);
ShowMessage('Помилка введення даних. +#13+Заповніть поля.');
ShowMessage(Помилка введення даних.' +#13+'Заповніть поля.);
ShowMessage('Помилка введення даних.' +#13+'Заповніть поля.');
Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
procedure TForml.Button1Click(Sender: TObject);
begin
if (Length(edit1.text)=0) or (Length(edit2.text)=0)
then ShowMessage(Помилка введення даних. +#13+Заповніть поля.)
else writeln(db, edit1.text,' ',edit2.text);
end;
(Length(edit1.text)=0) for (Length(edit2.text)=0);
ShowMessage('Помилка введення даних.' +#13+'Заповніть поля.')
ShowMessage(Помилка введення даних. +#13+Заповніть поля.);
ShowMessage('Помилка введення даних. +#13+Заповніть поля.');
Перед вами фрагмент коду з помилками, виберіть з запропонованих варіантів правильний запис:
procedure TForml.Button1Click(Sender: TObject);
begin
if (Length(edit1.text)=0) or (Length(edit2.text)=0);
then ShowMessage('Помилка введення даних. +#13+'Заповніть поля.')
else writeln(db, edit1.text,' ',edit2.text);
end;