VBA (сумма элементов последовательности) - Помощь студентам

SOMBRE · 18.04.2010, 14:36

решить в VBA

eoln · 18.04.2010, 15:13

Код:

Sub programma()
S = 0
N = 63
Cells(1, 1) = 0
Cells(2, 1) = 4
For I = 3 To 63
Cells(I, 1) = Cells((I - 1), 1) - 3 * Cells((I - 2), 1)
If Cells(I, 1) < 0 Then
S = S + Cells(I, 1)
End If
Next I
MsgBox "сумма = " & S
End Sub

SOMBRE · 18.04.2010, 15:26

спасибо большое!!!!!!!

ура)))

18.04.2010, 14:36	#1
SOMBRE Новичок Джуниор Регистрация: 18.04.2010 Сообщений: 2	VBA (сумма элементов последовательности) решить в VBA Последний раз редактировалось SOMBRE; 18.04.2010 в 15:27.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Написание программы на языке C (по теме - сумма чисел в последовательности)	PPPPPP	Помощь студентам	6	01.03.2010 12:10
C++. сумма элементов массива	BzDoN	Помощь студентам	3	01.12.2009 07:04
Сумма четных элементов матрицы. Произведение элементов 3-го столбца. Минимальный элемент матрицы.	renovare	Помощь студентам	2	03.07.2009 21:13
СУММА ЗНАЧЕНИЙ ЭЛЕМЕНТОВ	Dimak24	Помощь студентам	1	24.12.2008 09:29
Вычиcлить сумму элементов последовательности X1,X2,...Xn. (n=<20), удовлетворяющих неравенству x > p	e-l-f	Общие вопросы C/C++	3	28.11.2008 19:11

18.04.2010, 15:26	#3
SOMBRE Новичок Джуниор Регистрация: 18.04.2010 Сообщений: 2	спасибо большое!!!!!!! ура)))