Дано натуральное число n. вычислить: s=1/1+1/2+1/3+⋯+1/n составить программу в паскале

Question

Информатика: Дано натуральное число n. вычислить: s=1/1+1/2+1/3+⋯+1/n составить программу в паскале

lol1046 · Answer

Vari,n:integer;s:real;begin   readln(n);      for i:=1 to n do            s:=s+1/i;writeln(s:4:2);end....