Вход

Расчет на Эвм характеристик входных и выходных сигналов электрических цепей.

Рекомендуемая категория для самостоятельной подготовки:
Курсовая работа*
Код 346633
Дата создания 06 июля 2013
Страниц 20
Мы сможем обработать ваш заказ (!) 29 марта в 12:00 [мск]
Файлы будут доступны для скачивания только после обработки заказа.
1 310руб.
КУПИТЬ

Содержание

Оглавление
Постановка задачи
Текст программы
Таблица идентификаторов
Таблица описания пользовательских подпрограмм
Пояснения к тексту программы
Контрольный расчет
Выполнение программы при рабочем наборе исходных данных.



Введение

Расчет на Эвм характеристик входных и выходных сигналов электрических цепей.

Фрагмент работы для ознакомления

min:=uout[1];
for i:=2 to n do
if uout[i]>max
then max:=uout[i]
else
begin
if uout[i]<min
then min:=uout[i];
end;
MAXI_MINI:=max-min;
end; {of function MAXI_MINI}
{---------------------------------------------------------------------------}
{Описание процедуры записи массивов входного и выходного сигналов}
{на диск в файлы с именами f1.prn и f2.prn}
procedure WRITEINFO(n: integer;
uin, uout:ArrayType);
var
f1, f2: text;
i: integer;
begin
assign(f1,'f1.prn'); {связывание и открытие файлов}
assign(f2,'f2.prn');
rewrite(f1);
rewrite(f2);
for i:=1 to n do
begin
writeln(f1,uin[i]:7:3); {Запись в файлы}
writeln(f2,uout[i]:7:3);
end;
close(f1); {Закрытие файлов}
close(f2);
end; {of procedure WRITEINFO}
{---------------------------------------------------------------------------}
{Процедура вывода на экран результатов работы программы}
procedure REZULT(n: integer;
kl: byte;
uin, uout:ArrayType);
var
i: integer;
begin
if kl=1 {признак вывода результатов на экран монитора}
then
begin
writeln('Отсчеты входного сигнала');
for i:=1 to n do
writeln('uin[',i,']=',uin[i]:7:3);{вывод входных отсчетов}
writeln('Отсчеты выходного сигнала');
for i:=1 to n do
writeln('uout[',i,']=',uout[i]:7:3);{вывод выходных отсчетов}
writeln('макс.-мин. значение вых. сигнала=',MAXI_MINI(n,uout):7:3);
end
else
begin
writeln('Программа закончила свою работу. Массивы');
writeln('входных и выходных отсчетов сформированы');
writeln('и записаны в файлы f1.prn и f2.prn соответственно');
end;
end; {of procedure REZULT}
var
n: integer;
kl: byte; {глобальные параметры напрямую недоступные}
{ни одной из выше описанных процедур}
tn, tk, U0, U1, U2, Uin1, Uin2: real;
uin, uout: ArrayType;
BEGIN {of main}
Clrscr;
Data(n, kl, tn, tk, U0, U1, U2, Uin1, Uin2);
U_IN(n, tn, tk, U0, U1, uin);
U_OUT(n, U2, Uin1, Uin2, uin, uout);
WRITEINFO(n, uin, uout);
Rezult(n, kl, uin, uout);
readln
END. {of main}
Таблица идентификаторов
Обозначение в задаче
Идентификатор
Назначение
n
Текущее значение количества отсчетов входного сигнала
kl
Признак – ключ, определяющий режим работы kl=1, если вывод на монитор, kl=0, если вывод в файл на диск
Uвх(t)
uin
Массив для хранения отсчетов входного сигнала
Uвых(t)
uout
Массив для хранения отсчетов выходного сигнала
U0
U0
Параметр входного напряжения Uвх(t).
U1
U1
Параметр входного напряжения Uвх(t).
t
t
Текущий момент времени
a
a
Коэффициент, появляющийся при переходе от графического изображения сигнала к его аналитическому виду
det
Очень похожие работы
Пожалуйста, внимательно изучайте содержание и фрагменты работы. Деньги за приобретённые готовые работы по причине несоответствия данной работы вашим требованиям или её уникальности не возвращаются.
* Категория работы носит оценочный характер в соответствии с качественными и количественными параметрами предоставляемого материала. Данный материал ни целиком, ни любая из его частей не является готовым научным трудом, выпускной квалификационной работой, научным докладом или иной работой, предусмотренной государственной системой научной аттестации или необходимой для прохождения промежуточной или итоговой аттестации. Данный материал представляет собой субъективный результат обработки, структурирования и форматирования собранной его автором информации и предназначен, прежде всего, для использования в качестве источника для самостоятельной подготовки работы указанной тематики.
bmt: 0.00459
© Рефератбанк, 2002 - 2024