problema de algoritmo

[so diretoria 0]

estou em duvidas de como resolver o seguinte algoritmo :em matematica uma serie é uma sequencia de numeros que possui uma lei de formação.Faça um algoritmo para calcular a soma da serie abaixo, onde N e fornecido pelo usuario:1/2+1/4+1/6......1/n a barra significa fração se alguem poder me ajudar eu agradeço muito

[EwE 0]

var i, n: integer;soma: real;beginread(n);for i := 2 to n dosoma := soma + 1/i;end.