составьте программу для решения :
дано натуральное число n. найти сумму s=1+1/2+1/3+ +1/n.

Question

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

динка82 · Answer

program raf105; var  n: integer;  sum: real; begin  write( n = );  readln(n);  for var i:=1 to n do    sum:= sum + 1/i;  writeln( Сумма: ,sum); end.PascalABC...

составьте программу для решения : дано натуральное число n. найти сумму s=1+1/2+1/3+ +1/n.

Популярные вопросы

составьте программу для решения :
дано натуральное число n. найти сумму s=1+1/2+1/3+ +1/n.