Рассмотрим последовательность натуральных чисел 1, 1, 2, 1, 1, 2, 3, 2, 1, 1, 2, 3, 4, 3, 2, 1, 1, 2, 3, 4, 5, 4, 3, 2, 1, …. Члены последовательности нумеруются, начиная с единицы. На каком месте впервые встретится заданное натуральное число n?
программа на Pascal

//PascalABC.NET 3.4.2

var

 N: biginteger;

 s: string;

begin

 read(S);

 N := S.tobiginteger;

 write(sqr(N) - N + 1);

end.

//Пример ввода

//4

//Пример вывода

//13

//Пример ввода

//462759159785241952916752967892695713792395

//Пример вывода

//21414603996514309310315332548607182637508978065326333815975//4597242275715937446043631