Используя цикл for посчитать S=1/N-2/(N-1)+3/(N-2)-….+N/1;
Input n for i=1 to n s=s+(1/(n-i)) next i print s