Необходимо 3 главы , общий объём на 25 страниц 1. Мероприятия по повышению финансовой устойчивости гостиничного предприятия 2. Анализ показателей экономической эффективности по повышению финансовой устойчивости гостиничного предприятия 3. Обеспечение экономической безопасности гостиничного предприятия

Составление программы на алгоритмическом языке, выполняя указанные преобразования с матрицами

Задание № 37

Расположить в матрице A(N,N) элементы в последовательности указанной на рисунке.

 

Требования:

1.   Составить программу на алгоритмическом языке выполняет указанные преобразования с матрицами;

2.   Вывести вектор, полученный случайно;

3.   Вывести преобразованную матрицу с новым содержимым вектора;

4.   Программа должна быть построена таким образом, чтобы существовала возможность ее использования с массивами любой размерности, содержащими элементы произвольного;

5.   В программе должна быть предусмотрена выдача на печать исходных и преобразованных матриц;

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

Изменены свойства приложений

Begin VB.Форма frmMain

BorderStyle = 1 'Fixed Single

Caption = &';Задание № 37&';

ClientHeight = 4365

ClientLeft = 45

ClientTop = 435

ClientWidth = 6180

LinkTopic = &';Form1&';

MaxButton = 0 'False

ScaleHeight = 4365

ScaleWidth = 6180

StartUpPosition = 2 'CenterScreen

Begin VB.Фрейм Frame2

Caption = &';Управление&';

BeginProperty Font

Name = &';MS Sans Serif&';

Size = 8.25

charset = 204

Weight = 700

Underline = 0 'False

Курсив = 0 'False

Strikethrough = 0 'False

EndProperty

Height = 4125

Left = 4590

TabIndex = 7

Топ = 120

Width = 1485

Begin VB.CommandButton cmdSave

Caption = &';&Сохранение&';

Enabled = 0 'False

Height = 375

Left = 120

TabIndex = 11

Топ = 1530

Width = 1245

End

Begin VB.CommandButton cmdPrint

Caption = &';&Печати&';

Enabled = 0 'False

Height = 375

Left = 120

TabIndex = 10

Топ = 930

Width = 1245

End

Begin VB.CommandButton cmdExit

Cancel = -1 'True

Caption = &';&Выход&';

Height = 375

Left = 120

TabIndex = 9

Топ = 3630

Width = 1245

End

Begin VB.CommandButton cmdRun

Caption = &';&Решение&';

Default = -1 'True

Enabled = 0 'False

Height = 375

Left = 120

TabIndex = 8

Топ = 330

Width = 1245