Реферат: Лабораторная работа №12

💣 👉🏻👉🏻👉🏻 ВСЯ ИНФОРМАЦИЯ ДОСТУПНА ЗДЕСЬ ЖМИТЕ 👈🏻👈🏻👈🏻

Цель работы:
Изучение правил
описания и
вызова подпрограмм:
процедур и
функций. Получение
навыков и овладение
приемами работы
над подпрограммами.

Задание№ 17 .
Посчитать сумму
элементов
лежащих выше
главной диагонали
матрицы для
матрицы Z=X 2 +Y 2 .
{Программа:
Kyrsaс h

}
{Цель:
Найти сумму
элементов выше
главной диагонали
}
{Переменные:

}
{
X , Y
- вводимые
массивы
}
{
N, M, A , B ,
Z
- промежуточные
массивы
}
{
t
- Размер массива
}
{
i, j - переменные
цикла
}
{Программист:
Позднышев А.А.
группа 316
}
{Проверил:
Новичков В.С.
}
Nmax=10;
{Максимальный
размер массива}

Matrics=array[1..Nmax,1..Nmax] of integer;
{Параметры:
t - размер массива,
X - массив}
Procedure
Vvod (t:integer; Var X:matrics);
{Параметры:
X,Y - матрицы, t - размер}
Procedure
Echo (t:integer; X:matrics);
{Параметры:
X,Y - начальные
массивы, Z - массив
результат,t -
размер}
Procedure
Umn (X,Y:matrics;
t:integer; Var Z:matrics);
{Параметры:
X,Y - начальные
массивы, Z - массив
результат, t -
размер}
Procedure
Summa(X,Y:matrics; t:integer; Var Z:matrics);
{Процедура
для нахождения
суммы ниже
главной диагонали}
{Параметры:
X - начальные
массивы, Y - массив
результат, t -
размер}
Procedure
Under (X:matrics; t:integer; Var Y:masiv);

WriteLn('Сумма элементов,
лежащих ниже
главной диагонали=',
S:5:1);
{Процедура
для нахождения
суммы выше
главной диагонали}
{Параметры:
X - начальные
массивы, Y - массив
результат, t -
размер}
Procedure
Over (X:matrics; t:integer; Var Y:masiv);

WriteLn('Сумма элементов,
лежащих выше
главной диагонали=',
S:5:1);
writeln('Введите
размеры матриц
X,Y:');read(t);
writeln('Введите
',t*t,' элемента для
каждой матрицы:');
writeln('Введите
матрицу X:');vvod(t,X);
writeln('Введите
матрицу Y:');vvod(t,Y);
writeln('Результат
возведения
матрицы X в
квадрат:');
writeln('Результат
возведения
матрицы Y в
квадрат:');
writeln('Полученный
массив после
преобразований:');

Проведём
детализацию
в последовательности,
определяемой
нумерацией
блоков на рис.
1.

Ввод размеров
матриц X ,
Y .
В данном блоке
определён ввод
размеров квадратных
матриц X,
Y
(t
– размер матриц).

Печать элементов
матриц X ,
Y
(а также отладочная
печать). В данном
блоке определёна
печать значений
элементов
квадратных
матриц X,
Y
размером t*t.



Умножение
матриц
удобно представить
следующей
подпрограммой,
структурограмма
которой приведена
на рисунке 13.

Сложение
матрицы
X
и матрицы Y
представлено
в виде подпрограммы
на рис.15.

Подпрограммы
формирования
вектора
из сумм элементов
выше и ниже
главной диагонали
представлена
структурограммой
на рисунке 16
и 17.

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

Рязанская
государственная
радиотехническая
академия

Название: Лабораторная работа №12
Раздел: Рефераты по информатике, программированию
Тип: реферат
Добавлен 09:00:27 05 июля 2005 Похожие работы
Просмотров: 26
Комментариев: 17
Оценило: 4 человек
Средний балл: 5
Оценка: неизвестно   Скачать

Входные
параметры:
количество
элементов
t*t
Выходные
параметры:
X
– матрица
размером t*t.
Входные
параметры:
X,
Y
– матрицы
размером t*t
Выходные
параметры:
матрица Z
размером t*t
Входные
параметры:
X
– матрица,
размером t*t
Входные
параметры:
X,
Y
– матрицы,
размером t*t
Выходные
параметры:
Z
– матрица
размером t*t.
Рис.
15. Детализация
блока 7 схемы
алгоритма
Входные
параметры:
X
– матрица,
размером t*t
Входные
параметры:
X
– матрица,
размером t*t
Выходные
параметры:
Y
– матрица
размером t*t.
Рис.
18. Детализация
подпрограммы
вывода элементов
Срочная помощь учащимся в написании различных работ. Бесплатные корректировки! Круглосуточная поддержка! Узнай стоимость твоей работы на сайте 64362.ru
Если Вам нужна помощь с учебными работами, ну или будет нужна в будущем (курсовая, дипломная, отчет по практике, контрольная, РГР, решение задач, онлайн-помощь на экзамене или "любая другая" учебная работа...) - обращайтесь: https://clck.ru/P8YFs - (просто скопируйте этот адрес и вставьте в браузер) Сделаем все качественно и в самые короткие сроки + бесплатные доработки до самой сдачи/защиты! Предоставим все необходимые гарантии.
Привет студентам) если возникают трудности с любой работой (от реферата и контрольных до диплома), можете обратиться на FAST-REFERAT.RU , я там обычно заказываю, все качественно и в срок) в любом случае попробуйте, за спрос денег не берут)
Да, но только в случае крайней необходимости.

Реферат: Лабораторная работа №12
Математика 3 Класс Аттестационная Работа
Дипломная работа: Работа банка в условиях нестабильной экономики
Дипломная работа по теме Реализация информационной подсистемы 'Computers'
7 Класс Алгебра Контрольная Работа Уравнение
Курсовая работа по теме Валовая и товарная продукция и пути её повышения на примере КСУП 'Грозово-агро'
Курсовая Работа Государственно Правовые Режимы
Итоговое Сочинение Рекомендации К Подготовке
Талант Сочинение Рассуждение 15.3
Сочинение Про Осень 4 Класс По Русскому
Эссе Синее Сигареты
Курсовая работа по теме Исторический обзор развития концепции справедливой стоимости
Бизнес Процесс Диссертация
Интернет Маркетинг Курсовая
Реферат: Lyndon Baines Johnson Essay Research Paper Describe
Финансовый Анализ Курсовая Цена
Курсовая Работа На Тему Зож
Дипломная работа: Применение занимательного задачного материала для активизации познавательной деятельности учащихся при обучении решению текстовых задач
Реферат: Депортация народов в Казахстан - преступление тоталитаризма
Реферат по теме Информационные ресурсы современного общества
Реферат: Основные принципы и понятия поведенческой психотерапии
Реферат: Художественная обработка материалов животного происхождения в Приамурье
Реферат: Выбор поставщика
Реферат: Первоначальные навыки хорового пения у детей младшего школьного возраста на уроках музыки