// PascalABC.NET 3.6.3
begin
var (a, b, x) := ReadReal3('Введите a, b, x:');
var ω := Cos(x ** 3) - x/Sqrt(a * a + b * b);
Print(ω)
end.
