Лабораторная работа 6 студента группы XXX XXXXXXXXXXXXXXXXX Выполнение Защита
Работа добавлена на сайт samzan.net:
Лабораторная работа № 6
студента группы XXX
XXXXXXXXXXXXXXXXX
Выполнение____________ Защита____________
ПРОЦЕДУРЫ И ФУНКЦИИ
Цель работы: научиться организовывать и использовать процедуры
и функции.
СОДЕРЖАНИЕ РАБОТЫ
1. Составить блок-схему, подпрограмму-процедуру и подпрограмму функцию для вычисления значений элементов aij матрицы A = ||aij||nm по формуле aij = z(xi, yj), где xi = a + (i – 1)×h1, yj = c + (j – 1)×h2, где h1 = (b –a)/n, h2 = (d – c)/m, i = 1, 2, …, n+1, j = 1, 2, …, m+1, z = z(x, y) – функция, заданная в варианте задания.
2. Составить подпрограмму-процедуру для вычисления матрицы B, элементы строк которой равны элементам строк матрицы А, расположенных в порядке убывания (возрастания).
3. Составить подпрограмму-процедуру для вычисления матрицы строки (вектора) Х.
4. Составить подпрограмму-процедуру для вычисления матрицы Х' (вектор столбец). Х' – транспонированная матрица Х.
5. Используя составленные выше процедуры и функцию, нарисовать блок-схему, написать программу для вычисления величины M = X×A×X'. Вариант задания см. в лабораторной работе № 5.
КРАТКИЕ ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ
Процедура и функция – это именованная последовательность описаний и операторов. При использовании процедур или функций Паскаль-программа должна содержать текст процедуры или функции и обращение к процедуре или функции. Тексты процедур и функций помещаются в раздел описаний процедур и функций.
Процедура может содержать такие же разделы описаний, что и Паскаль-программа, а именно: разделы описания модулей, меток, констант, типов, переменных, процедур и функций. В заголовке функции определяется идентификатор функции, формальные параметры (если они имеются) и тип результата функции. Примеры описания процедуры и функции:
procedure NumString(N: integer; var S: string);
var
V: integer;
begin
V := Abs(N); S := ' ';
...
end;
function Max(a: Vector; n: integer): real;
var
x: real; i: integer;
begin
x := a[1];
for i := 2 to n do if x < a[i] then x := a[i];
Max := x;
end;
Процедура активизируется с помощью оператора процедуры, в котором содержатся имя процедуры и необходимые параметры. Пример вызова процедуры и функции:
NumString(25432, str);
rMax := Max(rV, 10);
ХОД РАБОТЫ
- Составил блок-схему, подпрограмму-процедуру и подпрограмму функцию для вычисления значений элементов aij матрицы A = ||aij||nm по формуле aij = z(xi, yj), где xi = a + (i – 1)×h1, yj = c + (j – 1)×h2, где h1 = (b –a)/n, h2 = (d – c)/m, i = 1, 2, …, n+1, j = 1, 2, …, m+1, Функция вычисляется функцией FunZ(x, y:Real):Real. Элементы матрицы вычисляются процедурой ComputeA.
Рис.1. Блок-схема FunZ.
Рис. 2. Блок-схема ComputeA
- Составил подпрограмму-процедуру для вычисления матрицы B, элементы строк которой равны элементам строк матрицы А, расположенных в порядке убывания (возрастания). Элементы матрицы B вычисляются процедурой ComputeB.
Рис.3. Блок-схема ComputeB
- Составил подпрограмму-процедуру для вычисления вектора Х. Координаты вектора X равны элементам матрицы В, стоящим на главной диагонали. Элементы вектора X вычисляются процедурой ComputeX.
Рис. 4. Блок-схема ComputeX
- Составил подпрограмму-процедуру для вычисления вектора Х' (вектор столбец). Х' – транспонированная матрица Х. Элементы вектора Х' вычисляются процедурой ComputeXt.
Рис. 5. Блок-схема ComputeXt
- Используя составленные выше процедуры и функцию, нарисовал блок-схему и написал программу для вычисления величины M = X×A×X'. Значение M вычисляется в процедуре ComputeM.
Рис. 6. Блок-схема ComputeM
- Написал программу используя созданные процедуры. Текст программы содержится в файле lab6.pas.
Рис. 7. Блок-схема программы
2. В поисках алмазов.html
3. рефератов по социологии- 1
4. Тема Основи віршування Поняття про віршовану й прозову мови спільне й відмінне між ними
5. ГОСТ Р 526682006 Мука из твердой пшеницы для макаронных изделий
6. Особенности расследования преступлений, связанных со взрывом
7. Личное Опубликовано- 09
8. Comparison of the Renaissance and Enlightenment (Сравнение Ренессанса и Просвещения)
9. ом слоге бАнты неподвижн
10. Особенности операционной системы UNIX
11. Учет товарноматериальных запасов
12. РЕФЕРАТ ДИСЕРТАЦІЇ НА ЗДОБУТТЯ НАУКОВОГО СТУПЕНЯ КАНДИДАТА МЕДИЧНИХ НАУК КИЇВ 20011
13. 1980 гг была сложной
14. ДОКЛАД О НАРКОТИКАХ 2010 РЕЗЮМЕ Накануне Международного дня борьбы со злоупотреблением наркотическими сред
15. ОПИСАНИЕ НЕСТАНДАРТНЫХ СРЕДСТВ АВТОМАТИЗАЦИИ
16. Введение Опровержение как разновидность доказательства Правила в опровержении Вместо заключения С
17. предъявите документы
18. Утверждаю Декан факультета подготовки государственных и муниципальных служащих ФКОУ ВПО ПЮИ ФСИН Росс
19. права человека одно из наиболее часто употребляемых сочетаний
20. Антисептика понятие виды современная антисептика