//print_r($_POST)
Array
(
**всякий мусор**
program analiz
begin
int i, n ; {Описание переменных}
float sum ; {Описание переменных}
readln n ; {Указание количества итераций}
sum:= 0.31e-1 ;
i:=1 ;
while (i<=n)
begin
sum:=sum+(1/i);
i:=i+1;
end
writeln sum; {Вывод результата}
end.
**всякий мусор**
)