Исследование диаграмм направленности и коэффициента направленного действия апертурных антенн СВЧ диапазона. Струков И.Ф - 36 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

36
write(Q, y);
if y>Max then Max:=y;
i:=i+di;
end;
{-------------------------------------------------}
init;
Xm:=GetMaxX;
Ym:=GetMaxY;
SetColor (White);
XYplot;
OutTextXY (Xm div 2+10, 5, 'Fh(Teta)');
i:=-1;
Reset(Q);
Read(Q, y1);
While i<=1 do
begin
Read(Q, y);
Line(Round(Xm*(1+i)/2), Round(Ym*0.9*(1-y1/Max)), Round(Xm*(1+i+di)/2),
Round(Ym*0.9*(1-y/Max))); y1:=y;
i:=i+di;
end;
OutTextXY (10, Ym-15, 'Press any key');
ReadLn;
CloseGraph
end.
ПРИЛОЖЕНИЕ IV
Для проведения вычислений при выполнении лабораторных работ может
оказаться полезным математический пакет MathCAD. Ниже рассмотрены
основные приемы работы с пакетом и приведен ряд примеров по вычислению
параметров исследуемых в работе антенн. Для подробного знакомства с пакетом
MathCAD см ., например, [12].
Основные приемы работы с системой MathCAD
В простейших случаях работа с системой MathCAD сводится к подготовке в
окне редактирования задания на вычисления и к установке форматов для их
результатов. Общение пользователя с системой происходит на некотором
промежуточном математически ориентированном языке визуального
программирования. Многие математические записи в этом языке вводятся просто
заполнением шаблонов соответствующих операторов и функций. Этот язык
настолько приближен к обычному математическому языку описания
вычислительных задач, что практически не требует их программирования. Нужно
лишь точно описать алгоритм решения задачи на привычном языке математики.
Программа при этом генерируется автоматически .
Для того чтобы воспользоваться готовыми файлами документов MathCAD,
приведенными ниже в виде примеров, нужно выбрать команду
Open
в меню
File
и указать имя документа (документы MathCAD имеют расширение *.mcd).
Для создания нового документа используется команда
New
, закрытие документа
осуществляется операцией
Close
, выход из системы –
Exit
.
Для присвоения значения переменной или задания функции в системе
используется оператор присваивания "
:=
", для ввода которого нужно нажать "
:
".
Например, чтобы задать функцию
(
)
)2(cos
2
Θ=ΘF , нужно набрать
"
F(
Θ
):=cos(
Θ
/2)
2
". Многие математические функции являются 
                                                       36
                  write(Q, y);
                  if y>Max then Max:=y;
                  i:=i+di;
           end;
   {-------------------------------------------------}
         init;
         Xm:=GetMaxX;
         Ym:=GetMaxY;
         SetColor (White);
         XYplot;
         OutTextXY (Xm div 2+10, 5, 'Fh(Teta)');
         i:=-1;
         Reset(Q);
         Read(Q, y1);
         While i<=1 do
          begin
              Read(Q, y);
                     Line(Round(Xm*(1+i)/2), Round(Ym*0.9*(1-y1/Max)), Round(Xm*(1+i+di)/2),
                     Round(Ym*0.9*(1-y/Max))); y1:=y;
                     i:=i+di;
           end;
         OutTextXY (10, Ym-15, 'Press any key');
         ReadLn;
         CloseGraph
end.


                                               П РИ Л О Ж Е Н И Е IV
       Д ля пр о ве де ни я вы чи сле ни й пр и вы по лне ни и ла б о р а то р ны х р а б о т м о же т
о ка за ться по ле зны м м а те м а ти че ски й па ке т MathCAD. Н и же р а ссм о тр е ны
о сно вны е пр и е м ы р а б о ты с па ке то м и пр и ве де н р яд пр и м е р о в по вы чи сле ни ю
па р а м е тр о в и ссле дуе м ы х в р а б о те а нте нн. Д ля по др о б но г о зна ко м ства с па ке то м
MathCAD см ., на пр и м е р , [12].
       О сновны е прием ы работы с систем ой MathCAD
       В пр о сте йш и х случа ях р а б о та с си сте м о й MathCAD сво ди тся к по дг о то вке в
о кне р е да кти р о ва ни я за да ни я на вы чи сле ни я и к уста но вке фо р м а то в для и х
р е зульта то в. О б щ е ни е по льзо ва те ля с си сте м о й пр о и сх о ди т на не ко то р о м
пр о м е жуто чно м            м а те м а ти че ски     о р и е нти р о ва нно м         язы ке   ви зуа льно г о
пр о г р а м м и р о ва ни я. М но г и е м а те м а ти че ски е за пи си в это м язы ке вво дятся пр о сто
за по лне ни е м ш а б ло но в со о тве тствую щ и х о пе р а то р о в и функци й. Э то т язы к
на сто лько          пр и б ли же н к о б ы чно м у м а те м а ти че ско м у язы ку о пи са ни я
вы чи сли те льны х за да ч, что пр а кти че ски не тр е б уе ти х пр о г р а м м и р о ва ни я. Н ужно
ли ш ь то чно о пи са ть а лг о р и тм р е ш е ни я за да чи на пр и вы чно м язы ке м а те м а ти ки .
П р о г р а м м а пр и это м г е не р и р уе тся а вто м а ти че ски .
       Д ля то г о что б ы во спо льзо ва ться г о то вы м и фа йла м и до кум е нто в MathCAD,
пр и ве де нны м и ни же в ви де пр и м е р о в, нужно вы б р а ть ко м а нду Open в м е ню
File и ука за ть и м я до кум е нта (до кум е нты MathCAD и м е ю т р а сш и р е ни е *.mcd).
Д ля со зда ни я но во г о до кум е нта и спо льзуе тся ко м а нда New, за кр ы ти е до кум е нта
о сущ е ствляе тся о пе р а ци е й Close, вы х о д и з си сте м ы – Exit.
       Д ля пр и сво е ни я зна че ни я пе р е м е нно й и ли за да ни я функци и в си сте м е
и спо льзуе тся о пе р а то р пр и сва и ва ни я ":=", для вво да ко то р о г о нужно на жа ть ":".
Н а пр и м е р , что б ы            за да ть функци ю              F (Θ ) = cos 2 ( Θ 2 ) ,   нужно    на б р а ть
"F(Θ):=cos(Θ/2) ".              2
                                          М но г и е      м а те м а ти че ски е        функци и      являю тся

Страницы