Рассмотрим последовательность натуральных чисел 1, 1, 2, 1, 1, 2, 3, 2, 1, 1, 2, 3, 4, 3,...

Question

Рассмотрим последовательность натуральных чисел 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

Answer 1

//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