
- •Национальный исследовательский университет «мэи» Типовой расчет «Процедуры, функции, модули» Вариант 9
- •2. Уточненная постановка задачи:
- •3. Пример:
- •4.Таблица данных:
- •8. Функциональные тесты
- •9. Метод
- •10. Алгоритм
- •11. Программа на Delphi (с процедурами-заглушками, кроме процедур ввода и вывода).
- •2.Уточненная постановка задачи.
- •4. Таблица данных
- •11. Программа на паскале. Процедура общего вида
- •2.Уточненная постановка задачи.
- •4. Таблица данных
- •2.Уточненная постановка задачи.
- •4. Таблица данных
- •2.Уточненная постановка задачи.
- •4. Таблица данных
- •2.Уточненная постановка задачи.
- •4. Таблица данных
2.Уточненная постановка задачи.
Дана квадратная матрица A из n строк и столбцов. Найти максимальный элемент матрицы
3.Примеры.
Тест 6: max:=8;
4. Таблица данных
Класс |
Имя |
Описание (смысл), диапазон, точность |
Тип |
Структура |
Входные данные |
A |
Заданная матрица, |Aij|<=25 |
вещ |
Двухмерный массив (5x5) |
n |
число строк и столбцов в матрице A, 0 < n 5 |
цел |
простая переменная |
|
Выходные данные |
max |
Максимальный элемент матрицы |
вещ |
простая переменная |
Промежу-точные данные |
i |
Номер текущей строки, 0 < i 5 |
цел |
простая переменная |
|
j |
Номер текущей столбца, 0 < j 5 |
цел |
простая переменная |
5.Входная форма.
нет ввода/вывода
6.Выходная форма
Нет.
7. Аномалии
нет ввода/вывода
8. Тесты
Все элементы разные: тест 6 max=8
Все элементы одинаковые: тест 8 max=0
9. Метод
Будем просматривать строки, начиная с первой до последней (i:=1;+1;n)
Присвоим первому элементу максимальное значение (max:=A[1,1])
В каждой строке будем просматривать все элементы,
начиная с первого до последнего (j:=1;+1;n)
Если элемент будем больше max, то присваиваем ему максимальное значение
Переходим к следующему элементу в строке
Переходим к следующей строке (i:=i+1)
10. Алгоритм
Max:=A[1,1]
Вх.
n, A
Aij
:= max
Вых.
max
11. Программа на паскале. Процедура общего вида
procedure Maximum(var n:byte; var a:Matrix; out max:real);
var i,j:byte;
begin
max:=A[1,1];
for i:=1 to n do begin
for j:=1 to n do if A[i,j]>max then max:=A[i,j];
end;
end;
Абстракция А0.7
1.Условие. Поиск минимального элемента матрицы
2.Уточненная постановка задачи.
Дана квадратная матрица A из n строк и столбцов. Найти минимальный элемент матрицы
3.Примеры.
Тест 6: min:=-10;
4. Таблица данных
Класс |
Имя |
Описание (смысл), диапазон, точность |
Тип |
Структура |
Входные данные |
A |
Заданная матрица, |Aij|<=25 |
вещ |
Двухмерный массив (10x10) |
n |
число строк и столбцов в матрице A, 0 < n 5 |
цел |
простая переменная |
|
Выходные данные |
min |
Минимальный элемент матрицы |
вещ |
простая переменная |
Промежу-точные данные |
i |
Номер текущей строки, 0 < i 5 |
цел |
простая переменная |
j |
Номер текущей столбца, 0 < j 5 |
цел |
простая переменная |
5.Входная форма.
нет ввода/вывода
6.Выходная форма
нет ввода/вывода
7. Аномалии
нет ввода/вывода
8. Тесты
Тесты
Все элементы разные: тест 7; min= -7
Все элементы одинаковые: тест 8 min=0
9. Метод
Будем просматривать строки, начиная с первой до последней (i:=1;+1;n)
Присвоим первому элементу минимальное значение (min:=A[1,1])
В каждой строке будем просматривать все элементы,
начиная с первого до последнего (j:=1;+1;n)
Если элемент будем меньше min, то присваиваем ему минимальное значение
Переходим к следующему элементу в строке
Переходим к следующей строке (i:=i+1)
10. Алгоритм
Min:
=A[1,1]
Вх.
n, A
Aij
:=min
Вых.
min
11. Программа на паскале. Процедура общего вида
procedure Minimum(var n:byte; var a:Matrix;out min:real);
var i,j:byte;
begin
min:=A[1,1];
for i:=1 to n do begin
for j:=1 to n do if A[i,j]<min then min:=A[i,j];
end;
end;
Абстракция А0.8
1.Условие. Cравнение разности максимального и минимального элементов с p