Процедуры и функции
Составление блок-схемы, подпрограммы-процедуры и подпрограммы-функции для вычисления значений элементов матрицы. Подпрограмма для вычисления матрицы, элементы строк которой равны элементам строк матрицы, расположенных в порядке убывания (возрастания).
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | практическая работа |
| Язык | русский |
| Дата добавления | 25.12.2012 |
| Размер файла | 14,1 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Размещено на http://www.allbest.ru/
ФЕДЕРАЛЬНОЕ АГЕНСТВО ПО ОБРАЗОВАНИЮ
Белгородский государственный технологический университет
им. В.Г. Шухова
Кафедра информатики и информационных технологий
Расчетно-графическое задание по информатике
на тему: “Процедуры и функции”
Выполнил:
Федорин Сергей
Проверила:
Воронкова Е.А
Введение
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=XAX'.
6. , x [0; 1], y [0; 1], n=m=10. Координаты вектора Х равны -1, если соответствующие элементы первой и второй строк матрицы В отрицательны, в противном случае координаты равны +1.
Лабораторная работа №7
Пример:
1., x [0; 1], y [0; 1], n=m=10. Координаты вектора Х равны -1, если соответствующие элементы первой и второй строк матрицы В отрицательны, в противном случае координаты равны +1.
Program lab7;
uses crt;
const n1=25;
const m1=25;
Type arr=array [1..n1, 1..m1] of real;
Var M3,a,x, x1, b1:arr;
var i, j, k, n, m, b, z, c, d:integer;
H1, h2,g: real;
Procedure one (Var a: arr; n, m: integer
Begin
For i:= 1 to n+1 do
For j:= 1 to m+1 do
a[I, j] := SQRT (ABS (z+(i-1)*h1)) -SQRT (ABS (c+(j-1)*h2));
end;
2. Составить подпрограмму-функцию для вычисления значений элементов 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) - функция, заданная в варианте задания.
Procedure ty (a: arr; n, m: integer); {vivod massiva}
Begin
a,b1: arr; n, m: integer); Begin
For i:= 1 to n+1 do
For j:= 1 to m do
For k:= j+1 to m+1 do
If a[i,j] < a[I,k] then begin g:= a[I,j]; a[I,j]:= a[I,k]; a[i,k]:= g ;
End;
For i:= 1 to n+1 do
For j:= 1 to m+1 do
B1[I, j] := A[I, j];
End;
Procedure fo (Var a, x: arr; n, m: integer);
Begin
For i:= 1 to n+1 do
For j:= 1 to m+1 do begin
If ( a[I, j] <0) and (I <= 2) then a[I, j]:= -a [I, j]; x[I, j]:= a [I, j]; end;
3. Составить подпрограмму-процедуру для вычисления матрицы B, элементы строк которой равны элементам строк матрицы А, расположенных в порядке убывания (возрастания).
End;
Procedure fu (Var x1, x: arr; n, m: integer); {trasponirovanie massiva}
Begin
For i:= 1 to n+1 do
For j:= 1 to m+1 do
X1 [j, i]:= x [I, j];
4. Составить подпрограмму-процедуру для вычисления матрицы строки (вектора) Х.
элемент матрица строка подпрограмма
End;
Procedure tyr (Var M3, a, b1: arr; n, m: integer); {umnozenie massiva na massiv}
Begin
For i:= 1 to n+1 do
For j:= 1 to m+1 do begin
M3[I, j]:= 0;
For k:= 1 to m+1 do
M3[I, j]:= m3[I, j] + a [I, k] * b1 [k, j];
End;
End;
Begin
clrscr;
Writeln ('bbegume n u m'); readln (n, m);
B:= 1; z:= 0; c:= 0; d:= 1; h1:= (b - z)/n; h2:= (d - c)/m;
one (a, n, m);
ty (a, n,m);
tri (a, b1, n ,m);
ty (a, n, m);
fo (a, x, n, m);
ty (x, n, m);
fu (x1, x, n, m);
ty (x1, n, m);
tyr (m3, x, a, n, m);
tyr (x, m3, x1, n, m);
ty (x, n, m);
readkey;
end.
Результаты вычисления:
bbegume n u m
3 3
0.00 -0.58 -0.82 -1.00
0.58 0.00 -0.24 -0.42
0.82 0.24 0.00 -0.18
1.00 0.42 0.18 0.00
0.00 -0.58 -0.82 -1.00
0.58 0.00 -0.24 -0.42
0.82 0.24 0.00 -0.18
1.00 0.42 0.18 0.00
0.00 0.58 0.82 1.00
0.58 0.00 0.24 0.42
0.82 0.24 0.00 -0.18
1.00 0.42 0.18 0.00
0.00 0.58 0.82 1.00
0.58 0.00 0.24 0.42
0.82 0.24 0.00 0.18
1.00 0.42 -0.18 0.00
0.71 1.27 1.76 2.32
1.31 0.71 0.54 0.96
1.71 0.53 -0.11 0.25
2.25 0.93 0.26 0.82
Размещено на Allbest.ru
...Подобные документы
Понятие определителя матрицы, математические и алгоритмические основы его расчета, функциональные модели, блок-схемы и программная реализация. Сущность метода Гаусса для решения систем линейных алгебраических уравнений и вычисления определителя матрицы.
контрольная работа [455,2 K], добавлен 18.01.2010Разработка различных программ для вычисления X и Y по формуле, для вычисления интеграла, для вычисления таблицы значений функции и для вычисления элементов вектора. Составление блок-схемы программы. Ввод значений, описание переменных и условия расчета.
контрольная работа [148,1 K], добавлен 08.11.2013Описание алгоритма решения задачи по вычислению суммы элементов строк матрицы с использованием графического способа. Детализация укрупненной схемы алгоритма и разработка программы для решения задачи в среде Turbo Pascal. Листинг и тестирование программы.
курсовая работа [446,0 K], добавлен 19.06.2014Составление процедуры для матрицы, разложения матрицы на множители, решения системы линейных уравнений, нахождения определителя матрицы и матрицы с транспонированием. Суть метода квадратного корня. Разложение матрицы на множители. Листинг программы.
лабораторная работа [39,4 K], добавлен 18.09.2012Понятие и содержание процедур и функций среды TP как логически самостоятельных фрагментов программы. Описание списка формальных параметров процедуры Pascal и преобразование подпрограммы в массив. Локализация имен и правила работы с модулями среды TP.
презентация [154,6 K], добавлен 10.10.2013Разновидности и задачи подпрограмм в языке Турбо Паскаль, их локальные и глобальные параметры. Использование процедуры для выполнения законченной последовательности действий. Формат объявления функции, особенности рекурсивного оформления подпрограммы.
реферат [20,0 K], добавлен 08.02.2012Характеристика основных способов вычисления определителя матрицы с помощью языка программирования СИ. Выбор инструментальных и аппаратных средств, его обоснование. Общая структура и принцип действия программного модуля, описание блок-схем алгоритмов.
курсовая работа [262,4 K], добавлен 08.06.2010Область видимости переменных. Хранение локальных данных в памяти компьютера. Использование опережающего описания для развязки закольцованных вызовов подпрограммы. Условия работоспособности рекурсивных подпрограмм. Параметры-функции и параметры-процедуры.
презентация [36,8 K], добавлен 13.10.2013Решение задачи вычисления и вывода значений функций. Разветвляющиеся и циклические вычислительные процессы. Задача табулирования. Блок схема и код программы. Вычисления по рекуррентным формулам. Программирование вложенных циклов. Сумма элементов матрицы.
контрольная работа [1,1 M], добавлен 10.12.2013Назначение и механизмы подпрограмм в программировании, их описание и вызов. Характеристика формальных и фактических параметров. Разновидности параметров в программе Паскаль. Способы передачи информации в подпрограммы, их виды. Отличие процедур от функций.
реферат [20,9 K], добавлен 06.03.2014Интерполяция функции с равноотстоящими узлами - прогнозирование в Exel. Составление программы для вычисления значений функции в заданных точках при помощи полинома Ньютона. Решение систем уравнений в Exel методом обратной матрицы и простых итераций.
контрольная работа [34,0 K], добавлен 19.03.2008Элементарные функции: тригонометрические и экспоненциальные, для определения округлений и остатков, размерности и размера матриц, задания одномерных и дву- массивов, векторов-столбцов и векторов-строк, удаления строк и столбцов, перестановки элементов.
презентация [139,0 K], добавлен 24.01.2014Разработка простейших линейных алгоритмов (составление логических выражений), программ с ветвлениями, циклических программ и составление их блок-схем. Практическое выполнение обработки массивов на примере вычисления элементов квадратной матрицы.
контрольная работа [173,3 K], добавлен 01.03.2010Описание работы ЭВМ при выполнении программы по указанной блок-схеме и исходным данным. Составление линейной программы на языке Basic в виде подпрограммы-функции для вычисления заданной величины. Разработка в ЭТ Excel макроса для указанной функции.
контрольная работа [765,6 K], добавлен 16.10.2011Основные операции над матрицами. Формирование матрицы из файла. Ввод матрицы с клавиатуры. Заполнение матрицы случайными числами. Способы формирования двухмерных массивов в среде программирования С++. Произведение определенных элементов матрицы.
курсовая работа [537,0 K], добавлен 02.06.2015Разработка структурной диаграммы программного модуля. Представление схемы для основных расчетов выбранного приложения для создания прямоугольной матрицы. Особенности создания пользовательского интерфейса. Тестирование и отладка спроектированного модуля.
курсовая работа [648,4 K], добавлен 27.05.2015Составление программы разветвляющейся структуры для вычисления заданной функции. Нахождение произведения чётных и нечётных первых чисел натурального ряда. Приёмы программирования обработки одномерных массивов. Расчет суммы положительных элементов массива.
контрольная работа [1,3 M], добавлен 20.12.2012Составление программы вычисления матрицы и программы вычисления интеграла с погрешностью, не превышающей заданную величину. Схема алгоритма и её описание. Инструкция по использованию разработанной программы и проверка правильности е функционирования.
курсовая работа [54,8 K], добавлен 27.10.2010Характеристика модульного программирования: процедуры и функции, модули и их структура, открытые массивы и строки, нетипизированные параметры. Способы передачи параметров в подпрограммы в Borland Pascal. Объектно-ориентированное программирование.
контрольная работа [28,9 K], добавлен 28.04.2009Методика разработки и листинг программы для вычисления значений функции F(x) на отрезке [а, Ь] с заданным шагом. Вычисление значения выражения по формуле. Расчет параметров равностороннего треугольника. Порядок формирования квадратной матрицы порядка.
контрольная работа [425,1 K], добавлен 10.03.2014
