Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ОКР№3 ОА и П.doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
502 Кб
Скачать
☆

Вариант №4 Уровень I

  1. (2 балла) Установите соответствие между интерфейсными элементами и их описанием:

1.

TabControl

а)

Индикатор процесса. С помощью этого компонента можно отображать ход исполнения достаточно длительного по времени процесса, например, процесса переноса данных на дискету.

2.

RichEdit

б)

Дерево выбора. Представляет собой совокупность связанных в древовидную структуру пиктограмм. Обычно используется для просмотра структуры каталогов (папок) и других подобных элементов, связанных иерархическими отношениями.

3.

ProgressBar

в)

Набор закладок. Каждая закладка представляет собой прямоугольное поле с надписью и/или рисунком. Выбор той или иной закладки распознается программой и используется для управления содержимым окна компонента.

4.

TreeView

г)

Многострочный редактор форматированного текста. В отличие от компонента Memo страницы Standard текст в компоненте RichEdit подчиняется правилам Расширенного Текстового Формата (RTF - Rich Text Format) и может изменять такие свои характеристики, как шрифт, цвет, выравнивание и т. д.

5.

ListView

д)

Панель пиктограмм. Организует просмотр нескольких пиктограмм и выбор нужной. Этот компонент способен располагать пиктограммы в горизонтальных или вертикальных рядах и показывать их в крупном или мелком масштабе.

1 д 2 г 3 а 4 б 5 в

2. (3 балла) Опишите работу (назначение и свойства) в среде Delphi c компонентом TShape

Предназначен для отображения геометрической фигуры. Его свойства:

Shape – выбор фигуры

Align – выравнивание

Уровень II

3. (4 балла) Опишите последовательность действий при разработке программы, в которой должны быть реализованы две кнопки «Деактивация кнопки» и «Закрыть». Первая кнопка создаётся на основе компонента TButton, вторая кнопка на основе компонента TBitBtn.

Procedure TForm1.ButtonClick

Begin

Close

End

Уровень III

4. (5 баллов) Напишите программу для работы в среде Delphi для решения следующей задачи

var

x,a,b:real;

begin

writeln('Vvedite a,b');

readln(a,b);

if a<b then x:=a*a-1

else if a=b then x:=-b

else x:=(a-5)/b;

writeln('x=',x:5:2);

readln;

end;

end.

Уровень IV

5. (8 баллов) Напишите программу, для работы в среде Delphi, в которой на основе компонентов TMaskEdit, TLabel, TButton вычисляется выражение

i , i – нечётное, x>0

b= , i – чётное, x<0

, иначе

В качестве f(x) используйте функцию Sin(ex)

Критерии оценок:

1 (один)

– 2-3 балла

6 (шесть)

– 15-16 баллов

2 (два)

– 4-7 баллов

7 (семь)

– 17-18 баллов

3 (три)

– 8-10 баллов

8 (восемь)

– 19-20 баллов

4 (четыре)

– 11-12 баллов

9 (девять)

– 21 балл

5 (пять)

– 13-14 баллов

10 (десять)

– 22 балла