набрать в ворде текст с формулами(у меня ворд не работает, поэтому не могу набрать) Буду очень благодарна

var

 a, b, S, c, alpha, betta, gamma, H, P: real;

 x, ar, br, gr: real;{alpha, beta. gamma в радианах}

begin

 write('Введите длины двух сторон треугольника и площадь: ');

 readln(a, b, S);

 x := 2 * S / (a * b);

 if x > 1 then writeln('Такой треугольник невозможен')

 else

 begin

   gr := ArcSin(x);

   c := Sqrt(Sqr(a) + Sqr(b) - 2 * a * b * Cos(gr));

   P := a + b + c;

   ar := ArcSin(a * Sin(gr) / c);

   br := Pi - (ar + gr);

   H := b * Sin(ar);

   alpha := ar * 180 / Pi;

   betta := br * 180 / Pi;

   gamma := 180 - (alpha + betta);

   writeln('Решение треугольника');

   writeln('a=', a, ', b=', b, ', c=', c:0:5);

   writeln('Alpha=', alpha:0:2, ', Betta=', betta:0:2, ', Gamma=', gamma:0:2);

   writeln('P=', P:0:5, ', H=', H:0:5, ', S=', S)

 end

end.

Тестовое решение:

Введите длины двух сторон треугольника и площадь: 3 4 6

Решение треугольника

a=3, b=4, c=5.00000

Alpha=36.87, Betta=53.13, Gamma=90.00

P=12.00000, H=2.40000, S=6

Шина

Простой и дешевый подключения.

При выходе компьютера из строя сеть работает.

При разрыве шины сеть выходит из строя.

Данные передаются по очереди.

Низкий уровень безопасности.

Звезда

Обрыв кабеля и выход из строя компьютера не влияет на работу сети.

Сеть не работает, если сервер вышел из строя.

Высокий уровень безопасности (т.к сервер).

Большой расход кабеля.

Размер ограничен.

Кольцо

Выход из строя любого компьютера может разрушить сеть.

Размер сети до 2км.

Низкая безопасность.

Скорость передачи данных снижается при увеличении размеров сети