Question

Помогите пожалуйста, нужно сделать программу на С.

Answer 1

Ответ:

var i: integer;

sum:real;

begin

sum:=0;

for i:=1 to 50 do

sum:=sum+1/i;

writeln(sum);

end

точно не помню