Question

Напишите программу вычислений плиз

Answer 1

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 Println(Tan(Exp(4) / 7 + (Pi * (ArcSin(0.27) - Cos(DegToRad(75))))

     ** (1 / 6)) / (Ln(5) + Log10(7)) * Tan(5 ** 4

     - Range(1, 6).Aggregate(1, (p, q)-> p * q)))

end.

0.630443611995394

Во вложении приведен результат контрольного решения, выполненный в пакете компьютерной алгебры Maple15 и выведенный с 20 значащими цифрами.