Работа с процессорами Word и Excel при создании технических текстов. Однофакторная модель прогноза уровня спроса на выпускаемую продукцию: Методические указания к лабораторным работам, страница 6

	A	B	C	D	E	F
1	Моменты времени
2	ti	ti^2	ti^3	ti^4	ti^5	ti^6
3	1	1	1	1	1	1
4	2	4	8	16	32	64
5	3	9	27	81	243	729
6	4	16	64	256	1024	4096
7	5	25	125	625	3125	15625
8	6	36	216	1296	7776	46656
9	7	49	343	2401	16807	117649
10	8	64	512	4096	32768	262144
11	9	81	729	6561	59049	531441
12	10	100	1000	10000	100000	1000000
13	11	121	1331	14641	161051	1771561
14	12	144	1728	20736	248832	2985984
15	78	650	6084	60710	630708	6735950

   Таблица 3

	H	I	J	K
2	Y=yi	YT1=yi*ti	YT2=yi*ti^2	YT3=yi*ti^3
3	10,0	10,0	10,0	10 ,0
4	10,2	20,4	40,8	81,6
5	10,4	31,2	93,6	280,8
6	10,8	43,2	172,8	691,2
7	11,4	57,0	285,0	1425,0
8	12,0	72,0	432,0	2592,0
9	12,8	89,6	627,2	4390,4
10	13,6	108,8	870,4	6963,2
11	14,3	128,7	1158,3	10424,7
12	15,1	151,0	1510,0	15100,0
13	15,8	173,8	1911,8	21029,8
14	16,4	196,8	2361,6	28339,2
15	152,8	1082,0	9473,5	91327,9

                                                                                                            Таблица 4

	A	B	C	D	E	F	H
18	Исходная матрица системы уравнений				Число уравн.	Правая Часть
19	12	78	650	6084		152,8
20	78	650	6084	60710	3	1082,5
21	650	6084	60710	630708		9473,5
22	6084	60710	630708	6735950		91327,9
23
24	Треугольная матрица					Правая Часть	Решение
25	12	78	650	6084		152,8	10,184
26	0	143	1859	21164		89,3	-0,2611
27	0	0	1334,6	-604682		35,93	0,1259
28	0	0	0	12310410		-58,798	-0,0051

Для выполнения второй операции воспользуемся макросом с именем Гаусс, в котором хранится программа, предназначенная для решения системы линейных уравнений (9) на языке Visual Basic Application (см. приложение 2). Эта программа составлена в соответствии с блок-схемой алгоритма, рассмотренного в  лабораторной работе № 3. Отметим характерные особенности программы. Макрос начинается инструкцией Sub, содержащей его имя, а заканчивается End Sub. Структура программы содержит разделы: описание переменных, констант, массивов; ввод исходных данных из рабочей таблицы Excel; вычислительная часть программы и вывод полученных результатов в рабочую таблицу Excel.

 Конструкция выражения для ввода значения переменной в макрос имеет вид:

[Имя переменной] = Range(˝[Номер ячейки таблицы Excel, содержимое которой присваивается переменной в Visual Basic]˝).Value.

Например, для ввода значения элемента массива А(3,3) необходимо записать А(3,3)=Range(˝D22˝).Value.

Конструкция выражения вывода:

Range(˝[Номер ячейки таблицы Excel]˝).Value = [Имя переменной, значение которой необходимо вывести].

Например, Range(˝H25˝).Value=X(0).

  Таблица 5