Разработать схему алгоритма для вычисления суммы ряда:S=1/2+1/3+1/4....1/N.Число N вводится с клавиатуры. Протестировать алгоритм для N=1, N=2, N=4, N=6.
Правильность ответов проверить с помощью калькулятора.

var  n,i:integer;  s:real;begin  Write('Введите значение N: '); Readln(n);  s:=0;  for i:=2 to n do s:=s+1/n;  Writeln('Сумма ряда 1/2+1/3+1/4+...+1/n = ',s)end.Тестовые решения:Введите значение N: 1Сумма ряда 1/2+1/3+1/4+...+1/n = 0Введите значение N: 2Сумма ряда 1/2+1/3+1/4+...+1/n = 0.5Введите значение N: 4Сумма ряда 1/2+1/3+1/4+...+1/n = 0.75Введите значение N: 6Сумма ряда 1/2+1/3+1/4+...+1/n = 0.833333333333333