Написать программу ** языке QBasic.Дано натуральное n. Вычислить . Результат вывести **...

Question

Написать программу на
языке QBasic.


Дано натуральное n. Вычислить . Результат вывести на печать.

Comments

Чего вычислить?)))

---

Дано натуральное n. Вычислить 1/1 + 1/3 + ...+ 1/(2*n-1) . Результат вывести на печать.

Answer 1

INPUT "N="; N
FOR I = 1 TO N
    S = S + 1 / (2 * I - 1)
NEXT I
PRINT "S="; S