Решить : 1)даны x,y,z.найти f=max(x^2+y^2-z; x^2+z^2-y)+64 2)y=(20x-10x^3,при x< =10 (25x^3-61x^2,x> 10

// PascalABC.NET 3.2, сборка 1363 от 17.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var x,y,z:real;
  Read(x,y,z);
  var f:=max(x*x+y*y-z,x*x+z*z-y)+64;
  Writeln('f=',f)
end.

// PascalABC.NET 3.2, сборка 1363 от 17.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var x:=ReadReal('x=');
  var y:=x>10?x*x*(25*x-61):10*x*(2-x*x);
  Writeln('y=',y)
end.