Задание:
Найти площадь равнобедренной трапеции с основанием А и В и углом при большом основании С написать напаскале
Решение:
Var a, b, c, h, s, tg: double; begin read (a, b, c); tg: =sin (c*pi / 180) / cos (c*pi / 180); //функции принимают углы в радианах h: =tg*abs (a — b) / 2; s: =h*(a+b) / 2; writeln (s); end.
Знаете другой ответ?