Тест по Delphi - файл 1.doc

3. 
   Элемент Button находится на вкладке:
   
   1. 
      Additional;
      
   2. 
      Standard;
      
   3. 
      Win32.
      

4. 
   Поле редактирования – …
   
   1. 
      Label;
      
   2. 
      Caption;
      
   3. 
      Edit.
      

5. 
   Свойство компонента Label AutoSize – …
   
   1. 
      признак того, что размер поля определяется его содержимым;
      
   2. 
      признак того, что размер поля меняется автоматически;
      
   3. 
      признак того, что размер поля не определяется его содержимым.
      

6. 
   Приложение сохраняется следующим образом (выберите оптимальный вариант):
   

1. 
   File – Save as… – Создаем папку – Сохраняем;
   
2. 
   File – Save as… – Save Project as…;
   
3. 
   File – Save as… – Создаем папку – Сохраняем модуль – Save Project as… – В ту же папку сохраняем проект;
   
4. 
   File – Save Project as…
   

7. 
   Задача: «Вычислить сумму первых N натуральных чисел». Выберите верную процедуру для решения этой задачи (на нумерацию компонентов не обращать внимания):
   

1) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

writeln (‘Введите N’);

readln(N);

S:=0;

For i:=1 to N do s:=s+i;

Writeln(‘Сумма первых ’, N, ‘ чисел равна ’, s);

end;

2) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

N := StrToInt(Edit1.Text);

S:=0;

For i:=1 to N do s:=s+i;

Label2.Text := ‘Сумма равна ’+ IntToStr(s);

end;

3) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

N := StrToInt(Edit1.Text);

S:=0;

For i:=1 to N do s:=s+i;

Label2.Caption := ‘Результат’+ IntToStr(s);

end;

8. 
   Составить программу, которая вычисляет сумму нечетных чисел отрезка [a,b].
   

Тест по Delphi

Вариант 2

1. 
   Язык Delphi —
   

1. 
   строго типизированный объектно-ориентированный язык, в основе которого лежит язык Pascal;
   
2. 
   строго типизированный объектно-ориентированный язык, в основе которого лежит язык Object Pascal;
   
3. 
   строго типизированный объектно-ориентированный язык, в основе которого лежит язык Visual Basic.
   

2. 
   Окно Object Inspector —
   

1. 
   окно просмотра списка объектов;
   
2. 
   окно редактора свойств объектов;
   
3. 
   это не окно Delphi.
   

3. 
   Элемент Edit находится на вкладке:
   

1. 
   Additional;
   
2. 
   Standard;
   
3. 
   Win32.
   

4. 
   Поле вывода текста (поле статического текста) – …
   

1. 
   Label;
   
2. 
   Caption;
   
3. 
   Edit.
   

5. 
   Чтобы поменять цвет кнопки Button
   

1. 
   нужно в окне Object Inspector выбрать свойство Color и из появившегося списка выбрать цвет;
   
2. 
   нужно в окне Object Inspector (на вкладке Properties) выбрать свойство Color и из появившегося списка выбрать цвет;
   
3. 
   цвет кнопки невозможно поменять.
   

6. 
   Приложение сохраняется следующим образом (выберите оптимальный вариант):
   

1. 
   File – Save as… – Создаем папку – Сохраняем;
   
2. 
   File – Save as… – Создаем папку – Сохраняем модуль – Save Project as… – В ту же папку сохраняем проект;
   
3. 
   File – Save as… – Save Project as…;
   
4. 
   File – Save Project as…
   

7. 
   Задача: «Вычислить сумму первых N натуральных чисел». Выберите верную процедуру для решения этой задачи (на нумерацию компонентов не обращать внимания):
   

1) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

N := StrToInt(Edit1.Text);

S:=0;

For i:=1 to N do s:=s+i;

Label2.Caption := ‘Результат’+ IntToStr(s);

end;

2) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

writeln (‘Введите N’);

readln(N);

S:=0;

For i:=1 to N do s:=s+i;

Writeln(‘Сумма первых ’, N, ‘ чисел равна ’, s);

end;

3) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

N := StrToInt(Edit1.Text);

S:=0;

For i:=1 to N do s:=s+i;

Label2.Text := ‘Сумма равна ’+ IntToStr(s);

end;

8. 
   Составить программу, которая вычисляет произведение четных чисел отрезка [a,b].
   

Тест по Delphi

Вариант 3

1. 
   В основе систем быстрой разработки (RAD-систем, Rapid Application Development — среда быстрой разработки приложений) лежит
   

1. 
   объектно-ориентированное программирование;
   
2. 
   технология визуального проектирования и событийного программирования;
   
3. 
   технология визуального проектирования и объектно-ориентированного программирования.
   

2. 
   Как называется окно, в котором отображаются возможные события и свойства объекта?
   

1. 
   Object Inspector;
   
2. 
   Object TreeView;
   
3. 
   Form1;
   
4. 
   Unit1.
   

3. Элемент Label находится на вкладке:

1. 
   Additional;
   
2. 
   Standard;
   
3. 
   Win32.
   

1. 
   Поле редактирования – …
   

1. 
   Label;
   
2. 
   Caption;
   
3. 
   Edit.
   

5. 
   Свойство компонента Label Wordwrap – …
   

1) признак того, что размер поля определяется его содержимым;

2) признак того, что слова, которые не помещаются в текущей строке, не отображаются;

3) признак того, что слова, которые не помещаются в текущей строке, автоматически переносятся на следующую строку.

5. 
   Приложение сохраняется следующим образом (выберите оптимальный вариант):
   

1. 
   File – Save as… – Создаем папку – Сохраняем модуль – Save Project as… – В ту же папку сохраняем проект;
   
2. 
   File – Save as… – Создаем папку – Сохраняем;
   
3. 
   File – Save as… – Save Project as…;
   
4. 
   File – Save Project as…
   

5. 
   Задача: «Вычислить сумму первых N натуральных чисел». Выберите верную процедуру для решения этой задачи (на нумерацию компонентов не обращать внимания):
   

1) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

writeln (‘Введите N’); readln(N);

S:=0;

For i:=1 to N do s:=s+i;

Writeln(‘Сумма первых ’, N, ‘ чисел равна ’, s);

end;

2) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

N := StrToInt(Edit1.Text);

S:=0;

For i:=1 to N do s:=s+i;

Label2.Caption := ‘Результат’+ IntToStr(s);

end;

3) procedure TForm1.Button1Click(Sender: TObject);

var

N, s, i : integer;

begin

N := StrToInt(Edit1.Text);

S:=0;

For i:=1 to N do s:=s+i;

Label2.Text := ‘Сумма равна ’+ IntToStr(s);

end;

5. 
   Составить программу, которая вычисляет количество четных чисел отрезка [a,b].
   

Ключи к тестам:

	1	2	3	4	5	6	7
Вариант 1	3	1	2	3	1	3	3
Вариант 2	2	2	2	1	3	2	1
Вариант 3	2	1	2	3	3	1	2

Уровень: легкий.
Критерии оценивания:

Оценка	Критерии
5	Студент верно ответил на 6-7 вопросов теста, и программа написана правильно
4	Студент верно ответил на 4-5 вопросов теста, и программа написана правильно
3	Студент верно ответил на 4-7 вопросов теста, и часть программы написана
2	Студент верно ответил не более, чем на 5 вопросов теста, и не справился с восьмым заданием (программа)

Примечание: Программа пишется в среде программирования Delphi.
Список литературы:

1. 
   Фленов М. Библия Delphi.
   
2. 
   Самоучитель по Delphi (AlexSOFT Co. Ltd).