Прошу помогите решить задачу в Pascal. Срочно!!!! По теме "циклы с неизвестным числом повторени"

[Danilzp]

Вычислить сумму 1+1/2^2+1/3^2+1/4^2+... с точностью ε> 0 и определить значение числа пи если известно, что эта бесконечная сумма приближается к числу пи^2/6.

Задача по теме "циклы с неизвестным числом повторений".
Вот не большая наработка по этой же теме но для другой задачи, надеюсь оно вам поможет.
Учитель сказал чтобы я решал такимже способом, но у меня неполучаеться, буду очень блогодарен за решение.

var genres : real;
var e, res1, res2:real;
var i:integer;


begin
genres:=0;
write ('Введите значение e:');
read(e);

if e<0 then
write('go back');

i:=1;

res1 := 1/(i*(i+1));
res2 := 1/((i+1)*(i+2));

while abs(res2-res1)<=e do
begin
res1 := 1/(i*(i+1));
res2 := 1/((i+1)*(i+2));
genres := genres + res1;
i := i + 1;



end;

write (genres);



end.

[Arigato]

В следующий раз думайте лучше над названием темы.