PascalABC.NET
begin
var (x, y) := ReadReal2('x, y: ');
var a := sin(x) + sqrt(x - (y**3));
a.Println;
end.
Объяснение:
