Информатика, опубликовано 2018-08-22 23:29:43 by Гость

Вычислить сумму: 1+1/2+1/3+...+1/nСоставить не менее 2 видов цикла Прошу,пожалуйста, в BASIC-256

Ответ оставил Гость

s=0
for i=1 to a
s=s+1/i
next i
print s

ИЛИ

input a
s=0
n=1
while ns=s+1/n
n=n+1
end while
print s

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.