0 / 0 / 0
Регистрация: 05.02.2016
Сообщений: 35
1

Написал код на VBA вроде работает но не знаю правильно или нет показывает)по заданию

06.02.2016, 12:25. Показов 387. Ответов 1
Метки нет (Все метки)

Найти сумму ряда с точностью e=10^(-4)

S=1-2+4/2!-...+((-2)^k)/k!, k=0,1,2,....

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Cells.Clear
z1 = 1
Z = 0
k = 1
fakt = 1
e = 0.0001
s = 0
Cells(k, 1) = "порядковый номер"
Cells(k, 2) = "факториал"
Cells(k, 3) = "Z(последовательность)"
While Abs(Z - z1) >= e
z1 = Z
fakt = fakt * k
Z = ((-2) ^ k) / fakt
s = s + Z
Cells(k + 1, 1) = k
Cells(k + 1, 2) = fakt
Cells(k + 1, 3) = Z
k = k + 1
Wend
MsgBox "Сумма ряда равна=" & s
End Sub
Миниатюры
Написал код на VBA вроде работает но не знаю правильно или нет показывает)по заданию  
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.02.2016, 12:25
Ответы с готовыми решениями:

Написал код для уточнения корней уравнения методом хорд. Но не знаю правильно ли. Посмотрите кто может
Программа работает, но правильно ли? unit Unit1; interface uses Windows, Messages,...

Ошибки вроде бы нет, но работает не правильно!
Христос Воскресе! Вот код: #include <iostream> #include <conio.h> #include <clocale> #include...

Написал программу, не могу понять правильно или нет
Написать функцию sum с переменным числом параметров, которая находит сумму чисел типа int по...

С++ Borland 6.0, написал код, ошибки нет, но программа не работает
в общем надо лабу сделать, уже 2 пары маюсь и не могу понять где шибка код написал, ошибок не...

1
15038 / 6362 / 1726
Регистрация: 24.09.2011
Сообщений: 9,971
07.02.2016, 01:14 2
Kortess18, первой единицы не хватает, 7 строка s=1
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
07.02.2016, 01:14

Почему не работает код, хотя вроде всё правильно
Есть код. Предполагается, что при помещении текста в RichEdit текст будет подстраиваться под...

Вроде всё правильно написал,но серавно ошибка
Вообщем делаю кнопку добавить Вот код procedure TForm2.Button1Click(Sender: TObject); begin ...

Задача на рекурсию - почему вроде бы ошибочный код внутри работает правильно?
Изучаю учебник C++, решаю задачки в конце глав. В одной задачке надо было написать рекурсивную...

Подскажите, не работает код, не могу понять почему - вроде бы все правильно
Доброго времени суток Есть задача - при клике на кнопку должен создаваться параграф в теле...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.