Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
otvety_k_ekzamenu.doc
Скачиваний:
88
Добавлен:
20.04.2019
Размер:
747.01 Кб
Скачать

18. Одномерный массив в qbasic.Команда описания массивов.

Программа для определения Евклидовой нормы случайного вектора.

Массив – упорядоченный набор каких-либо элементов. Массив, прежде всего, характеризуется числом элементов.Все элементы массива имеют одно и то же имя. Имя массива – совокупность букв и цифр. Всегда начинающаяся с букв. Индексы массива не могут быть дробными числами. Каждый массив должен быть объявлен в подпрограмме, для чего существует оператор DIM.

Оператор DIM:

DIM [shared] имя (границы) [As тип]

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

[граница]= [нижняя граница ТО] верхняя граница

CLS

Input “введите число элементов одномерного массива”;N

DIM X(1 to N)

For I=1 to N

Input x(i)

Print “x(“I “)”=”;

Next i

S=0

For i=1 to n

S=s+(x(i))^2

Next i

En=sqr(s)

Print using”EN= ###.###”;En

End

19. Одномерный массив в qbasic.Команда описания массивов.Ввод

элементов массива в память ЭВМ. Программа для определения

максимального и минимального элемента массива и его номера.

Массив – упорядоченный набор каких-либо элементов. Массив, прежде всего, характеризуется числом элементов.Все элементы массива имеют одно и то же имя. Имя массива – совокупность букв и цифр. Всегда начинающаяся с букв. Индексы массива не могут быть дробными числами. Каждый массив должен быть объявлен в подпрограмме, для чего существует оператор DIM.

Оператор DIM:

DIM [shared] имя (границы) [As тип]

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

[граница]= [нижняя граница ТО] верхняя граница

Вычисление максимального и минимального элементов массива:

CLS

Input “N=”;N

DIM X(1 To N)

For I=1 to N

Read x(i)

Next (i)

Data 1,2,3,4,

Max=x(N) : min=x(n)

For i=1 to n

If x(i)>max then

Max=x(i)

Nmax=i

End if

If x(i)<min then

Min=x(i)

Nmin=i

End if

Print

? “max=”;max

? “min=”;min

End

20. Двумерный массив в mathcad. Создать двумерный массив и показать основные виды матричныхных операций.Вычисления с использованием двумерных массивов.

Двумерный массив снабжается двумя индексами.

M=(Mij)

I=o,m

J=o,n

M=n- матрица называется квадратной

M<>n – матрица называется прямоугольной

Матричные операции:

1) сложение матриц

2) вычитание матриц

3) умножение на скаляр

4) нахождение обратной матрицы (M-1)

5) возведение матрицы в степень

6) вычисление определителя матрицы

7) транспонирование матрицы (MT)

8) выделение полного столбца матрицы (M<n>)

9) выделение элементов матрицы (индесы в МС записываются через запятую)

21. Двумерные массивы в qbasic.Команда описания массивов. Ввод элементов двумерного массива в память эвм.Определение нормы матрицы по 1-му способу.

Массив – упорядоченный набор каких-либо элементов. Массив, прежде всего, характеризуется числом элементов.Все элементы массива имеют одно и то же имя. Имя массива – совокупность букв и цифр. Всегда начинающаяся с букв. Индексы массива не могут быть дробными числами. Каждый массив должен быть объявлен в подпрограмме, для чего существует оператор DIM.

Оператор DIM:

DIM [shared] имя (границы) [As тип]

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

[граница]= [нижняя граница ТО] верхняя граница

||M||=maxiEjMij – норма матрицы по первому способу (максимальное значение суммы строк)

В матрице суммируются все строки. Таким образом получается одномерный массив с числом элементов, равным числу строк.

||M||=maxjEixij – суммируются элементы столбцов, т.е. получается одномерный массив с размером, равным числу столбцов в матрице. Из них выбирается максимальный элемент.

- евклидова норма матрицы

CLS

(ввод исходной матрицы)

dim M(n,k)

Dim rows(n)

For i=1 to n

Rows(i)=0

For j=1 to m

Rows(i)=Rows(i)+M(I,j)

Next j

? “rows(”I”)=”Rows(i)

Next i

Dim cols(k)

For j=1 to M

Cols(J)=0

For i=1 to m

Cols(j)=cols(J)+M(I,j)

Next I

? “cols(“J”)=”cols(j)

next j

(поиск максимальных элементов из одномерных массивов Cols(j))

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]