Составить программу вычисления суммы для любого натурального числа n и вычислить ее для n=12:

если хочешь, то отформатируй

Я понял - Вы в хлеву воспитывались. Дальнейшее общение считаю неуместным.

Я точно не в хлеву воспитывался. Утверждаете про это, совсем неизвестного вам человека.

От комментарий нельзя точно узнать о воспитании человека.

Хоть я и вел себя на данном общении не воспитанно, но это ничего не значит.

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('n=');  Writeln('S=',SeqGen(n,i->(i+1)/(i+2)).Sum)end.Примерn= 12S=9.81986624486625Во вложении дано точное решение в простых дробях и его приближение десятичной дробью с 20 знаками. Вычисление по приведенной программе различается на единицу в последнем разряде, что в данном случае является пределом точности машинной арифметики, принятой для переменных типа double.