PascalABC.NET 3.4.2, сборка 1880 от 18.11.2018
Внимание! Если программа не работает, обновите версию!
begin
var (x, y) := ReadReal2('Введите x и y:');
var z := (7 * x / x ** 3 + 1) - x * x * y;
Print(z)
end.
Пример
Введите x и y: 37 4
-5474.99488677867