вычислить с помощью оператора оператора цикла сумму и произведение последовательности чисел: 1/3; 1/5; 1/7;...1/23

vari,n:integer;s,p:real;begins:=0; p:=1;  n:=3;for i:=1 to 11 dobegins:=s+1/n;p:=p*1/n;n:=n+2;end;writeln('summa: ',s);writeln('proizvedenie: ',p);end.