Таблица 2
Таблица описаний процедур и функций Подпрограмма (функция) Входные и выходные параметры Назначение procedure Data (
var n: integer;
var kl: byte;
var tn, tm, tk, Um, Uin1, Uin2, a, b: real) Все формальные параметры процедуры являются выходными (var — параметры) Позволяет ввести с клавиатуры необходимые для решения задачи исходные данные и передать эти данные в другие подпрограммы procedure Uint (
n:integer;
kl:byte;
tn, tm, tk, Um: real;
var uin: ArrayType) n, kl, tn, tm, tk, Um — входные параметры. Используются процедурой при формировании массива входных отсчетов сигнала.
uin — выходной var-параметр хранит значения отсчетов входного сигнала Процедура формирует массив отсчетов входного сигнала, который в дальнейшем может быть использован в других подпрограммах procedure Uout1(
n:integer;
kl:byte;
a:real;
b:real;
Uin1:real;
Uin2:real;
uin:ArrayType;
var uout: ArrayType) n, kl, a, b, Uin1, Uin2, uin — входные параметры процедуры, используемые при формировании массива выходных отсчетов сигнала.
uout — выходной var-параметр, хранит значения отсчетов выходного сигнала Процедура формирует массив отсчетов выходного сигнала, который в дальнейшем может быть использован другими подпрограммами function Mini (
n:integer;
uout:ArrayType):real; n и uout — входные параметры значения, с их помощью функция рассчитывает свое единственной значение — минимальное значение выходного сигнала Функция находит максимальное значение выходного сигнала и возвращает его в точку вызова procedure WriteInfo (
n:integer;
uin, uout: ArrayType) n, uin, uout — входные параметры, которые процедура использует для проведения операции записи массивов входных и выходных сигналов в файлы на диск Процедура записывает отсчеты входного и выходного сигналов в нужном формате в файлы f1. prn и f2. prn соотвественно. procedure Rezult (
n:integer;
kl:byte;
uin, uout: ArrayType) n, kl, uin, uout — входные параметры, используемые процедурой для вывода результатов на экран монитора Выводит результат работы программы на экран монитора, если пользователь ввел с помощью процедуры Data нужное значение признака kl=1
5. Контрольный расчет
В рассматриваемом варианте необходимо выбрать контрольный набор значений исходных данных для следующих величин:, ,, ,, , .
Для удобства вычислений количество точек выберем .
На рис. 3 представлена геометрическая интерпретация контрольного расчета Рис. 3. Вычисленные значения входного и выходного сигнала для контрольного расчета Сформированный массив отсчетов входных сигналов представлен в табл. 3.
Таблица 3
Массив отсчетов входных сигналов
t, с U, В 0.5 0.0 1.0 5.12 500 1.5 10.25 000 2.0 15.37 500 2.5 20.50 000 3.0 17.57 143 3.5 14.64 286 4.0 11.71 429 4.5 8.78 571 5.0 5.85 714 5.5 2.92 857 6.0 0.0
Сформированный массив отсчетов выходных сигналов представлен в табл. 4.
Таблица 4
Массив отсчетов выходных сигналов
t, с U, В 0.5 35.0 1.0 35.0 1.5 35.62 500 2.0 48.43 750 2.5 61.25 000 3.0 53.92 857 3.5 46.60 714 4.0 39.28 571 4.5 35.0 5.0 35.0 5.5 35.0 6.0 35.0
6. Выполнение программы при рабочем наборе исходных данных
С помощью набора исходных данных, использовавшегося при контрольном расчете, выполняются вычисления с помощью программы. После окончания работы программы результаты вычислений будут помещены в файлы f1. prn и f2.prn. Эти файлы используются для построения графиков входного и выходного сигнала цепи в системе MathCad.
Графики представлены на рис. 4.
Рис. 4. Графики входного и выходного сигналов Список используемой литературы Поляков Д. Б., Круглов Н. Ю. Программирование в среде Турбо Паскаль/МАИ. — М.:
1992.
Епанешников А., Епанешников В. Программирование в среде Turbo Pascal 7.0 — М.: Диалог-Мифи, 1993.
Губанова Т.В., Дубкова Е. В. Методические указания к контрольным работам по курсу «Информатика» — СПб: СПБГУТ, 1997.
Бузюков Л.Б., Дубкова Е. В. Интегрированная программная система MathCAD в задачах связи. — СПб: СПбГУТ, 1996.
Дьяконов В. П. Система MathCAD. — М.: Радиосвязь, 1993.
