Question

Число х представить в виде суммы двух неотрицательных слагаемых так, чтобы их сумма квадратов была наименьшей

Answer 1

PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  var a:=n div 2;
  var b:=n-a;
  Writeln(n,'=',a,'+',b,', сумма квадратов равна ',a*a+b*b)
end.

Пример
n= 35
35=17+18, сумма квадратов равна 613