3. Разработка приложения с использованием окон ввода-вывода текста

Задание: Составить программу вычислений функции в соответствии с условием (табл. 3).

Т а б л и ц а 3

Исходные функции и данные

Вар	Функции	Исходные данные
1
2
3
4
5
6
7
8
9
10

Рекомендовано к использованию:

Функцию InputBox, которая отображает простое диалоговое окно с заданным Заголовком (Caption) и Подсказкой (Prompt). Оно просит, чтобы пользователь ввел данные в текстовое поле диалогового окна. Значение по умолчанию отображено в текстовом поле.

Процедуру ShowMessage выводит простое диалоговое окно на экране с кнопкой ОК, содержащее строку Text.

Пример:

var

value : string;

begin

// Продолжаем спрашивать пользователя его город

repeat

value := InputBox('Ваше имя', 'Пожалуйста, укажите свое имя', 'Женя');

until value <> '';

// Показываем его название

ShowMessage('Ваше имя- '+value);

end;

Диалог отобразит спрашиваемое имя пользователя, с установленным начальным значением 'Женя'. Если пользователь нажмёт OK, тогда отобразится: Ваше имя – Женя.

Содержание отчета: Условие, листинг программы, результат выполнения программы, выводы.

4. Использование компонента stringgrid для обработки массивов

Задание: Составить программу для вычисления произведения вектора В на матрицу М третьего порядка. Численные значения элементов вектора и матрицы приведены в таблице 4.

Структура команд:

<имя массива>: array [<размерность массива>] of <тип массива>;

Пример:

MyArray: array [1..10, 1..10] of Real;

Т а б л и ц а 4

Исходные данные

Вар	Элементы вектора	Элементы матрицы
1	B1={1.21; 3.42;4.51}	0.24 0.27 0.31 M1 = 0.43 0.84 0.92 1.21 1.63 1.98
2	B2={2.1; 3.40; 4.14}	4.05 5.15 6.13 M2 = 5.91 8.05 9.06 7.17 9.29 9.19
3	B3={0.56; 0.75; 0.89}	1.22 1.65 2.05 M3 = 0.45 0.67 0.81 2.31 3.07 4.05
4	B4={3.2; 4.31; 6.07}	0.95 1.32 2.40 M4 = 40 3.72 4.12 2.17 3.60 5.20
5	B5={0.75; 1.25; 2.5}	3.14 4.09 5.10 M5 = 2.17 3.05 4.10 1.28 2.40 3.20
6	B6={3.1; 4.25; 5.4}	0.34 0.65 0.85 M6 = 1.34 2.17 3.05 0.75 0.85 4.07
7	B7={0.8; 0.9; 1.3}	2.40 3.10 4.35 M7 = 0.60 0.74 0.95 3.40 4.02 4.90
8	B8={4.4; 5.45; 6.15}	0.32 0.47 0.62 M8 = 0.85 0.70 0.25 3.52 4.17 2.10
9	B9={1.21; 3.42; 4.51}	0.24 0.27 0.31 M9 = 0.43 0.84 0.92 1.21 1.63 1.98
10	B10={2.1; 3.40; 4.14}	4.05 5.15 6.13 M10 = 5.91 8.05 9.06 7.17 9.29 9.19

Рекомендовано к использованию:

Для ввода массива удобно использовать компонент StringGrid. Значок компонента StringGrid находится на вкладке Additional. Компонент StringGrid представляет собой таблицу, ячейки которой содержат строки символов.

Некоторые свойства компонента StringGrid:

ColCount – количество колонок таблицы;

RowCount – количество строк таблицы;

Cells – соответствующий таблице двумерный массив. Ячейка таблицы, находящаяся на пересечении столбца (номер col) и строки (номер row) определяется элементом cells [col, row];

FixedCols – количество зафиксированных слева колонок таблицы. Зафиксированные колонки выделяются цветом и при горизонтальной прокрутке таблицы остаются на месте;

FixedRows – количество зафиксированных сверху строк таблицы. Зафиксированные строки выделяются цветом и при вертикальной прокрутке таблицы остаются на месте;

Options.goEditing – признак допустимости редактирования содержимого ячеек таблицы. True — редактирование разрешено, False — запрещено;

Options.goTab – разрешает (True) или запрещает (False) использование клавиши <Таb> для перемещения курсора в следующую ячейку таблицы.