Здавалка
Главная | Обратная связь

Программа на паскале. Процедура общего вида



 

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

2.Уточненная постановка задачи.

Даны максимальный, минимальный элементы и заданная величина p. Узнать больше ли их разность , чем p

3.Примеры.

Разность больше: тест 7

Разность меньше: тест 6

Таблица данных

Класс Имя Описание (смысл), диапазон, точность Тип Структура
  Входные данные max Максимальный элемент матрицы |max|<=25 вещ простая переменная
min Минимальный элемент матрицы |min|<=25 вещ простая переменная
p Заданная величина |p|<=99 Вещ простая переменная
Выходные данные F2 =true,если разность больше чем p,иначе =false Лог простая переменная

 

Промежу-точные данные d Разность максимального и минимального элементов |d|<=50 вещ простая переменная

 

5.Входная форма.

нет ввода/вывода

 

Выходная форма

нет ввода/вывода

 

Аномалии

нет ввода/вывода

 

Тесты

Тесты

Разность больше: тест 7

Разность меньше: тест 6

Метод

Присваиваем логической переменной f2 значение false . Считаем значение переменной d=max-min. Если d>p, тогда присваиваем переменной f2 значение true.

Алгоритм

 

 


Вых. F2

 

 

Программа на паскале. Процедура общего вида

procedure Compare(var d:real;var p:real; var max,min:real;var f2:boolean);

 

var i,j:byte;

 

begin

 

d:=max-min;

 

f2:=true;

 

if d<p then f2:=false;

 

end;

 

Абстракция А0.9

1.Условие. Изменение матрицы

2.Уточненная постановка задачи.

Даны матрица A, значение логической переменной F2, n. Заменить матрицу следующим образом : Если f2=false , то оставить матрицу без изменений, иначе заменить все положительные элементы матрицы на 1, а отрицательные на 0.

3.Примеры.

Матрица изменяется: тест 7,8

Матрица не изменяется: тест 6

Таблица данных

Класс Имя Описание (смысл), диапазон, точность Тип Структура
Входные данные n число строк и столбцов в матрице A, 0 < n £ 5 цел простая переменная
A Заданная матрица, |Aij|<=25 вещ Двумерный массив
Выходные данные A Измененная матрица, |Aij|<=25 вещ Двумерный массив

 

Промежу-точные данные i Номер текущей строки, 0 < i £ 5 цел простая переменная
j Номер текущей столбца, 0 < j £ 5 цел простая переменная

5.Входная форма.

нет ввода/вывода

 

Выходная форма

нет ввода/вывода

 

Аномалии

нет ввода/вывода

 

Тесты

Матрица изменяется: тест 7,8

Матрица не изменяется: тест 6

 

Метод

Если F2=false, тогда оставляем матрицу без изменений, иначе меняем все положительные элементы матрицы на 1, а отрицательные на 0.

Алгоритм

 

 

 
 

 








©2015 arhivinfo.ru Все права принадлежат авторам размещенных материалов.