Расчёт полного электрического сопротивления участка электрической цепи

Расчёт комплексного сопротивления участка электрической цепи.Разработка программы расчета электрической цепи в среде Turbo Pascal.Электрическое сопротивление цепь pascal.Рисунок 1. Схема участка эл. цепи.Закон Ома для участка цепи в комплексной форме.Модуль полного сопротивления.Где - активное сопротивление;- реактивное сопротивление.Для резистора Z=R, где R - активное сопротивление резистора.Также была создана процедура вычисления эквивалентного сопротивления двух параллельных ветвей.Также были созданы две процедуры работающие с графикой.