<u>PascalABC.NET 3.3.5, сборка 1648 от 31.03.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var (x,y):=ReadReal2('x,y=');
Writeln((Sin(x)+cos(y))/(Cos(x)-Sin(y))*Tan(x*y))
end.
Исходник во вложении.
P.S.Правда не совсем удачная реализация...
Знайти цукерки, пакет покласти на стіл, відкрити пакет з цукерками, взяти 1 цукерку , відкрити її , з'їсти цукерку.
26 = 35 = 3 * 7^1 + 5 * 7^0 = 35; Ответ: 7.