Найти сумму ряда с заданной точностью - VB (63192)

Формулировка задачи:

Помогите решить, пожалуйста, пропускал информатику - теперь засада самая настоящяя. Прям без предельно буду благодарен. 1) Вычислить значиение выражения Y. Y = 2 + 1/1*2*3 + 1/2*3*4 + 1/3*4*5...Ответ: Y=2.2486843 2) Найти сумму ряда с заданной точностью ƹ = 10 в минус 3 степени S = 1 + 1/2 в 4 степ. + 1/3 в 4 степ. + 1/4 в 4 степ. + ... 3) Напечатать в обратном порядке 30 чисел, кратных 5, по пять в ряду ЗЫ (тут я даже представить не смог как это должно выглядеть) 4) Вычислить значение выражения YY = Ʃ (сверху 7, снизу l=1) ( l в квадрате - Ʃ (сверху l, снизу h=1) h l ) Help me plz!


textual

Код к задаче: «Найти сумму ряда с заданной точностью - VB (63192)»

Dim S As Single, K As Integer, Eps As Single
Eps= Val (InputBox ***)
s=0
k=1
while 1/k^2>=Eps
s=s+1/k^2
k=k+1
wend
print "sume=" ; s
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

15   голосов, оценка 4.200 из 5

Источник
Похожие ответы